[WWcvs] webwork2: HEAD backport: Catch multiply defined user warning (gage)

[Sam H. v. a. <we...@ma...>]

Log Message:
-----------
HEAD backport: Catch multiply defined user warning (gage)

Tags:
----
rel-2-1-patches

Modified Files:
--------------
    webwork2/lib/WeBWorK:
        ContentGenerator.pm

Revision Data
-------------
Index: ContentGenerator.pm
===================================================================
RCS file: /webwork/cvs/system/webwork2/lib/WeBWorK/ContentGenerator.pm,v
retrieving revision 1.123.2.1
retrieving revision 1.123.2.2
diff -Llib/WeBWorK/ContentGenerator.pm -Llib/WeBWorK/ContentGenerator.pm -u -r1.123.2.1 -r1.123.2.2
--- lib/WeBWorK/ContentGenerator.pm
+++ lib/WeBWorK/ContentGenerator.pm
@@ -1378,7 +1378,8 @@
 		} elsif (defined $r->param($name)) {
 			@values = $r->param($name);
 		}
-		
+		#FIXME  -- evntually we'd like to catch where this happens
+		croak "internal error --  user has been multiply defined!" if $name eq 'user' and @values >1;
 		if (@values) {
 			if ($first) {
 				$url .= "?";