--- loncom/interface/lonhtmlcommon.pm 2006/05/01 19:07:16 1.126 +++ loncom/interface/lonhtmlcommon.pm 2006/05/29 16:01:22 1.129 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.126 2006/05/01 19:07:16 albertel Exp $ +# $Id: lonhtmlcommon.pm,v 1.129 2006/05/29 16:01:22 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -178,6 +178,7 @@ sub get_recent { sub textbox { my ($name,$value,$size,$special) = @_; $size = 40 if (! defined($size)); + $value = &HTML::Entities::encode($value,'<>&"'); my $Str = ''; return $Str; @@ -1165,8 +1166,7 @@ returns: nothing my @Crumbs; sub breadcrumbs { - my (undef,$component,$component_help,undef,undef,$menulink, - $helplink) = @_; + my ($component,$component_help,$menulink,$helplink) = @_; # my $Str = "\n".'
';
#
@@ -1430,11 +1430,11 @@ sub course_select_row {
|;
my $courseform=''.&Apache::loncommon::selectcourse_link
($formname,'pickcourse','pickdomain','coursedesc','',1).'';
+ $output .= ''.&mt('All courses').' '; if ($totcodes > 0) { - $output .= ''.&mt('All courses'); my $numtitles = @$codetitles; if ($numtitles > 0) { - $output .= ' '.&mt('Pick courses by category:').' '; + $output .= ''.&mt('Pick courses by category:').' '; $output .= '
|