--- 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