--- loncom/interface/lonmenu.pm 2001/07/04 16:52:10 1.7 +++ loncom/interface/lonmenu.pm 2001/08/07 21:47:34 1.8 @@ -5,7 +5,7 @@ # # 05/29/00,05/30 Gerd Kortemeyer) # -# 10/05,05/28,05/30,06/01,06/08,06/09,07/04 Gerd Kortemeyer +# 10/05,05/28,05/30,06/01,06/08,06/09,07/04,08/07 Gerd Kortemeyer package Apache::lonmenu; @@ -79,7 +79,7 @@ sub rawconfig { if ($ENV{'request.course.sec'}) { $crs.='_'.$ENV{'request.course.sec'}; } - $crs=~s/\_/\//; + $crs=~s/\_/\//g; } my $pub=($ENV{'request.state'} eq 'published'); my $con=($ENV{'request.state'} eq 'construct');