--- loncom/interface/lonmenu.pm 2006/06/30 02:14:58 1.189
+++ loncom/interface/lonmenu.pm 2006/07/07 21:55:05 1.193
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines to control the menu
#
-# $Id: lonmenu.pm,v 1.189 2006/06/30 02:14:58 albertel Exp $
+# $Id: lonmenu.pm,v 1.193 2006/07/07 21:55:05 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -129,12 +129,12 @@ ENDRELOAD
$lt{'docs'}
ENDDOCS
}
- if ($showgroups) {
- $groups =(<$lt{'groups'}
-ENDGROUPS
- }
- }
+# if ($showgroups) {
+# $groups =(<$lt{'groups'}
+#ENDGROUPS
+# }
+# }
my $form=&serverform();
my $utility=&utilityfunctions();
my $output=(<$text
ENDDOCS
}
- if ($showgroups) {
- my $text = ($is_group) ? $lt{'teams'} : $lt{'groups'};
- $groups =(<$text
-ENDGROUPS
- }
+# if ($showgroups) {
+# my $text = ($is_group) ? $lt{'teams'} : $lt{'groups'};
+# $groups =(<$text
+#ENDGROUPS
+# }
if (
($env{'request.noversionuri'}=~m[^/(res|public)/] &&
$env{'request.symb'} eq '')
@@ -442,10 +442,7 @@ sub innerregister {
('','',6,1,'cstr.gif','edit[_1]','resource[_2]',
"go('".$cfile."');","Edit this resource");
} elsif ($editbutton eq '') {
- $editbutton=&switch('','',6,1,'port.gif',
- 'port-[_1]','folio[_1]',
- "go('/adm/portfolio');",
- "Enter my portfolio space");
+ $editbutton=&clear(6,1);
}
}
###
@@ -777,7 +774,7 @@ ENDRESIZE
$returnval.=(<'.$returnval.'';