--- loncom/interface/lonhtmlcommon.pm 2008/11/26 23:20:56 1.186 +++ loncom/interface/lonhtmlcommon.pm 2008/12/01 16:33:32 1.187 @@ -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.187 2008/12/01 16:33:32 droeschl Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2044,22 +2044,24 @@ 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; }