--- loncom/publisher/loncfile.pm	2009/12/02 09:53:02	1.103
+++ loncom/publisher/loncfile.pm	2010/11/27 23:20:46	1.104
@@ -9,7 +9,7 @@
 #  and displays a page showing the results of the action.
 #
 #
-# $Id: loncfile.pm,v 1.103 2009/12/02 09:53:02 bisitz Exp $
+# $Id: loncfile.pm,v 1.104 2010/11/27 23:20:46 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -756,10 +756,9 @@ sub NewDir1 {
     if ($type eq 'error') {
 	$request->print('</form>');
     } else {
-	if ($mode eq 'testbank') {
-	    $request->print('<input type="hidden" name="callingmode" value="testbank" />');
-	} elsif ($mode eq 'imsimport') {
-	    $request->print('<input type="hidden" name="callingmode" value="imsimport" />');
+	if (($mode eq 'testbank') || ($mode eq 'imsimport')) {
+	    $request->print('<input type="hidden" name="callingmode" value="'.$mode.'" />'."\n".
+                            '<input type="hidden" name="inhibitmenu" value="yes" />');
 	}
         $request->print('<input type="hidden" name="newfilename" value="'
                        .$newfilename.'" />'