--- loncom/interface/lonaboutme.pm 2022/10/27 20:33:31 1.162 +++ loncom/interface/lonaboutme.pm 2022/11/14 18:50:42 1.164 @@ -1,7 +1,7 @@ # The LearningOnline Network # Personal Information Page # -# $Id: lonaboutme.pm,v 1.162 2022/10/27 20:33:31 raeburn Exp $ +# $Id: lonaboutme.pm,v 1.164 2022/11/14 18:50:42 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -230,6 +230,7 @@ sub handler { if ($title eq '') { $title = &mt('Personal Information Page'); } + $title = &HTML::Entities::encode($title,'\'"<>&'); my $brcrum = &Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1); if (ref($brcrum) eq 'ARRAY') { @@ -807,10 +808,8 @@ sub parse_directory { sub aboutme_access { my ($uname,$udom) = @_; my $privcheck = $env{'request.course.id'}; - my $sec; if ($env{'request.course.sec'} ne '') { - $sec = $env{'request.course.sec'}; - $privcheck .= '/'.$sec; + $privcheck .= '/'.$env{'request.course.sec'}; } my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};