--- loncom/interface/lonmenu.pm 2003/02/14 14:30:09 1.36 +++ loncom/interface/lonmenu.pm 2003/02/14 15:14:37 1.37 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.36 2003/02/14 14:30:09 www Exp $ +# $Id: lonmenu.pm,v 1.37 2003/02/14 15:14:37 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -146,19 +146,6 @@ ENDOPEN return ''; } -# ============================================================ Switch Menu Item - -sub switchmenu { - my ($row,$col,$imgsrc,$texttop,$textbot,$action,$description)=@_; - if ($ENV{'browser.interface'} eq 'textual') { return ''; } - my $openwin=&openmenu(); - return(< - var swmenu=$openwin - swmenu.switchbutton($row,$col,"$imgsrc","$texttop","$textbot","$action","$description"); - -ENDSMENU -} # ================================================================== Raw Config