--- loncom/publisher/testbankimport.pm	2004/02/17 23:03:34	1.1
+++ loncom/publisher/testbankimport.pm	2004/02/18 21:50:00	1.2
@@ -1521,12 +1521,12 @@ sub create_mcq {
                 $tol = 5;
                 $numans = $$answerref[0];
             } else {
-                my $min = 0;
-                my $max = 0;    
-                for (my $i=0; $i<@{$answerref}; $i++) {
-                    if ($$answerref[$i]<$min) {
+                my $min = $$answerref[0];
+                my $max = $$answerref[0];    
+                for (my $i=1; $i<@{$answerref}; $i++) {
+                    if ($$answerref[$i]<=$min) {
                         $min = $$answerref[$i];
-                    } elsif ($$answerref[$i] > $max) {
+                    } elsif ($$answerref[$i] >= $max) {
                         $max = $$answerref[$i];
                     }
                 }