--- loncom/interface/lonmenu.pm 2002/05/06 21:57:11 1.20 +++ loncom/interface/lonmenu.pm 2002/05/29 14:51:43 1.22 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.20 2002/05/06 21:57:11 matthew Exp $ +# $Id: lonmenu.pm,v 1.22 2002/05/29 14:51:43 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -42,17 +42,21 @@ use vars qw(@desklines $readdesk); # =============================================================== Open the menu sub open { -# return(< + my $returnval=''; + unless (shift eq 'unix') { +# resizing does not work on linux because of virtual desktop sizes + $returnval.=(< ENDOPEN + return ''; } # ============================================================ Switch Menu Item @@ -170,6 +174,7 @@ sub rawconfig { } } } + $output.="swmenu.clock.setTime(1000*".time.");"; return $output; }