--- loncom/interface/lonhtmlcommon.pm 2008/11/26 23:20:56 1.186 +++ loncom/interface/lonhtmlcommon.pm 2008/12/03 18:53:54 1.190 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.186 2008/11/26 23:20:56 droeschl Exp $ +# $Id: lonhtmlcommon.pm,v 1.190 2008/12/03 18:53:54 droeschl Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2044,30 +2044,33 @@ END sub generate_menu { my @menu = @_; - my $menu_html = ''; + my $menu_html = qq|
|; foreach my $category (@menu) { #FIXME: insert appropriate classnames for styles when they're finished. - $menu_html .='

'.$category->{'categorytitle'}.'

|; return $menu_html; }