Log Message:
-----------
Had the test reversed in isReduced when returning a boolean rather
than an array (Argh!)
Modified Files:
--------------
pg/lib/Value:
Union.pm
Revision Data
-------------
Index: Union.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value/Union.pm,v
retrieving revision 1.40
retrieving revision 1.41
diff -Llib/Value/Union.pm -Llib/Value/Union.pm -u -r1.40 -r1.41
--- lib/Value/Union.pm
+++ lib/Value/Union.pm
@@ -253,7 +253,7 @@
$error = "overlaps" if !$error && $S->intersects($U);
$error = "uncombined sets" if !$error && $Sn > 1 && !$self->getFlag('reduceSets');
$error = "repeated elements in set" if !$error && !$S->isReduced;
- return $error ne "" unless $error && wantarray;
+ return $error eq "" unless $error && wantarray;
return (0,$error);
}
|
