[WWcvs] pg: Produce error messages when the student enters something like x=1 or x=1.

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

Log Message:
-----------
Produce error messages when the student enters something like x=1 or x=1.

Modified Files:
--------------
    pg/macros:
        contextInequalities.pl

Revision Data
-------------
Index: contextInequalities.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/contextInequalities.pl,v
retrieving revision 1.16
retrieving revision 1.17
diff -Lmacros/contextInequalities.pl -Lmacros/contextInequalities.pl -u -r1.16 -r1.17
--- macros/contextInequalities.pl
+++ macros/contextInequalities.pl
@@ -30,15 +30,15 @@
 =head1 USAGE
 
 	loadMacros("contextInequalities.pl");
-	
+
 	Context("Inequalities");
 	$S1 = Compute("1 < x <= 4");
 	$S2 = Inequality("(1,4]");     # force interval to be inequality
-	
+
 	Context("Inequalities-Only");
 	$S1 = Compute("1 < x <= 4");
 	$S2 = Inequality("(1,4]");     # generates an error
-	
+
 	$S3 = Compute("x < -2 or x > 2");  # forms a Union
 	$S4 = Compute("x = 1");            # forms a Set
 
@@ -516,10 +516,9 @@
       "overlaps" => "Your$nth answer contains overlapping inequalities",
       "overlaps in sets" => "Your$nth answer contains equalities that are already included elsewhere",
       "uncombined intervals" => "Your$nth answer can be simplified by combining some inequalities",
-      #  shouldn't get the following ones from inequalities
-      "uncombined sets" => "",
-      "repeated elements in set" => "",
-      "repeated elements" => "",
+      "uncombined sets" => "",          #  shouldn't get this from inequalities
+      "repeated elements in set" => "Your$nth answer contains repeated values",
+      "repeated elements" => "Your$nth answer contains repeated values",
     }->{$error};
   } else {
     return unless Value::can($student,"isReduced");