--- loncom/interface/lonmenu.pm 2003/05/27 15:50:29 1.72 +++ loncom/interface/lonmenu.pm 2003/06/06 02:24:49 1.76 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.72 2003/05/27 15:50:29 www Exp $ +# $Id: lonmenu.pm,v 1.76 2003/06/06 02:24:49 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -158,13 +158,6 @@ ENDINLINEMENU } } -# ===== Early call to LONCAPAreg for long-running pages, preferably used right -# ===== before $r->rflush() - -sub regflush { - return ''; -} - # ====================================== This gets called in the header section sub registerurl { @@ -187,27 +180,8 @@ sub registerurl { ((($ENV{'request.publicaccess'}) || (!&Apache::lonnet::is_on_map($ENV{'REQUEST_URI'}))) && (!$forcereg))) { - my $loadfunction=''; - my $unloadfunction=''; - unless (($ENV{'browser.interface'} eq 'textual') || - ($ENV{'environment.remote'} eq 'off') || - ($ENV{'request.publicaccess'})) { - my $reopen=&Apache::lonmenu::reopenmenu(); - $loadfunction='swmenu='.$reopen.'swmenu.windowloaded(self.name);'; - $unloadfunction='swmenu='.$reopen.'swmenu.windowunloaded(self.name);'; - } - return $result.(< -function LONCAPAreg() { - $loadfunction -} - -function LONCAPAstale() { - $unloadfunction -} - -$force_title -ENDFUNCTIONS + return $result. + ''.$force_title; } # Graphical display after login only if ($Apache::lonxml::registered && !$forcereg) { return ''; } @@ -398,7 +372,6 @@ var swmenu=null; function LONCAPAreg() { swmenu=$reopen; - swmenu.windowloaded(self.name); swmenu.clearTimeout(swmenu.menucltim); $timesync $newmail @@ -426,7 +399,6 @@ var swmenu=null; 'clearbut(2,1);clearbut(2,3);clearbut(8,1);clearbut(8,2);clearbut(8,3);'+ 'clearbut(9,1);clearbut(9,2);clearbut(9,3);clearbut(6,3);clearbut(6,1)', 2000); - swmenu.windowunloaded(self.name); } // END LON-CAPA Internal @@ -450,7 +422,6 @@ var swmenu=null; function LONCAPAreg() { swmenu=$reopen - swmenu.windowloaded(self.name); $timesync swmenu.currentStale=1; swmenu.clearbut(2,1); @@ -467,8 +438,6 @@ var swmenu=null; } function LONCAPAstale() { - swmenu=$reopen - swmenu.windowunloaded(self.name); } // END LON-CAPA Internal