--- loncom/publisher/testbankimport.pm	2010/12/14 16:26:04	1.28
+++ loncom/publisher/testbankimport.pm	2011/01/31 17:49:13	1.29
@@ -1,5 +1,5 @@
 # Handler for parsing text upload problem descriptions into .problems
-# $Id: testbankimport.pm,v 1.28 2010/12/14 16:26:04 www Exp $
+# $Id: testbankimport.pm,v 1.29 2011/01/31 17:49:13 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1942,6 +1942,7 @@ sub handler {
         my ($result,$flag) = &Apache::lonupload::phasetwo($r,$fn,$uname,$udom,'testbank');
         $r->print($result);
         if ($flag eq 'ok') {
+            my $current_page = 0;
             my $js;
             &jscript_zero($webpath,\$js);
             $js = '<script type="text/javascript">'."\n$js\n".'</script>';