[WWcvs] pg: Don't inherit the correct_ans field when combining objects via binary operators.

[dpvc v. a. <we...@ma...>]

Log Message:
-----------
Don't inherit the correct_ans field when combining objects via binary operators.

Modified Files:
--------------
    pg/lib:
        Value.pm

Revision Data
-------------
Index: Value.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value.pm,v
retrieving revision 1.93
retrieving revision 1.94
diff -Llib/Value.pm -Llib/Value.pm -u -r1.93 -r1.94
--- lib/Value.pm
+++ lib/Value.pm
@@ -596,7 +596,9 @@
 #
 sub inherit {
   my $self = shift;
-  bless {(map {%$_} @_),%$self}, ref($self);
+  $self = bless {(map {%$_} @_),%$self}, ref($self);
+  delete $self->{correct_ans};
+  return $self;
 }
 
 ######################################################################