--- loncom/interface/lonhtmlcommon.pm 2009/10/31 14:27:48 1.237 +++ loncom/interface/lonhtmlcommon.pm 2009/11/06 10:14:12 1.239 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.237 2009/10/31 14:27:48 raeburn Exp $ +# $Id: lonhtmlcommon.pm,v 1.239 2009/11/06 10:14:12 amueller Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1727,7 +1727,7 @@ sub course_selection { $output .= '
'; } } - $output .= ''.$pickspec.' '.$courseform.'  selected.
'."\n"; + $output .= ''.$pickspec.' '.$courseform.'  selected.
'."\n"; return $output; } @@ -1819,12 +1819,21 @@ sub course_custom_roles { # with a background color defined in the corresponding CSS: LC_topic_bar # sub topic_bar { - my ($imgnum,$title) = @_; - return '
' + my ($imgnum,$title, $show_number) = @_; + my $output = undef; + if (!$show_number) { + $output = '
' .''.&mt('Step [_1]',$imgnum).'' .' '.$title .'
'; + } else { + $output = '
' + .$title + .'
'; + } + + return $output; } ##############################################