--- loncom/interface/lonhtmlcommon.pm 2008/11/26 23:20:56 1.186 +++ loncom/interface/lonhtmlcommon.pm 2008/12/03 19:34:01 1.191 @@ -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.191 2008/12/03 19:34:01 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; }