Log Message:
-----------
Include a noinherit routine so that things like test_values and other
temporary items are not inheritted. Only things like limits and so on.
Modified Files:
--------------
pg/lib/Value:
Formula.pm
Revision Data
-------------
Index: Formula.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Formula.pm,v
retrieving revision 1.61
retrieving revision 1.62
diff -Llib/Value/Formula.pm -Llib/Value/Formula.pm -u -r1.61 -r1.62
--- lib/Value/Formula.pm
+++ lib/Value/Formula.pm
@@ -220,6 +220,16 @@
}
#
+# Don't inherit test values or adapted values, or other temporary items
+#
+sub noinherit {
+ my $self = shift;
+ ($self->SUPER::noinherit(@_),"test_values","test_adapt","tree","string","variables",
+ "f","stack","ref","tokens","values","space","domainMismatch");
+}
+
+
+#
# Create the value list from a given set of test points
#
sub createPointValues {
|