--- loncom/interface/lonmenu.pm	2005/11/08 14:45:44	1.162
+++ loncom/interface/lonmenu.pm	2005/11/08 17:57:41	1.163
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.162 2005/11/08 14:45:44 albertel Exp $
+# $Id: lonmenu.pm,v 1.163 2005/11/08 17:57:41 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -78,7 +78,7 @@ sub menubuttons {
 					    ['inhibitmenu']);
     if (($env{'form.inhibitmenu'} eq 'yes') ||
         ($ENV{'REQUEST_URI'} eq '/adm/logout')) { return ''; }
-
+    my %lt=&initlittle();
     my $navmaps='';
     my $reloadlink='';
     my $docs='';
@@ -94,7 +94,6 @@ sub menubuttons {
     }
     if ($env{'browser.interface'} eq 'textual') {
 # Textual display only
-	my %lt=&initlittle();
         $pgbg='#FFFFFF';
         $tabbg='#FFFFFF';
 	$font='#000000';
@@ -210,6 +209,13 @@ ENDDOCS
 ENDRELOAD
             }
         }
+	if (($env{'request.state'} eq 'construct') && ($env{'request.course.id'})) {
+	    my $escreload=&Apache::lonnet::escape('return:');
+	    $reloadlink=(<<ENDCRELOAD);
+<td bgcolor="$tabbg">
+<a href="/adm/flip?postdata=$escreload" target="_top"><font $face color="$font">$lt{'ret'}</font></a></td>
+ENDCRELOAD
+        }
         my $reg='';
         if ($registration) {
            $reg=&innerregister($forcereg,$target,$titletable);