--- loncom/interface/lonaboutme.pm 2024/07/03 23:49:50 1.161.2.1
+++ loncom/interface/lonaboutme.pm 2023/12/28 03:33:15 1.167
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Personal Information Page
#
-# $Id: lonaboutme.pm,v 1.161.2.1 2024/07/03 23:49:50 raeburn Exp $
+# $Id: lonaboutme.pm,v 1.167 2023/12/28 03:33:15 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -84,6 +84,7 @@ use Apache::lonlocal;
use Apache::lonmsgdisplay();
use Apache::lontemplate;
use Apache::longroup;
+use Apache::lonhtmlcommon();
use HTML::Entities();
use Image::Magick;
@@ -146,7 +147,7 @@ sub handler {
# ------------------------------------------------------------ Get Query String
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
['forceedit','forcestudent','todocs',
- 'register','popup','folderpath','title']);
+ 'register','popup','folderpath','title','only_body']);
# ----------------------------------------------- Available Portfolio file display
if (($target ne 'tex') && ($action eq 'portfolio')) {
&display_portfolio_header($r,$is_course);
@@ -225,17 +226,22 @@ sub handler {
if ($env{'form.popup'}) { # Don't show breadcrumbs in popup window
$args->{'no_nav_bar'} = 1;
} elsif (!$env{'form.register'}) { #Don't show breadcrumbs twice, when this page is part of course content and you call it
- if (($env{'request.course.id'}) &&
- ($env{'form.folderpath'} =~ /^supplemental/)) {
+ if (($env{'form.only_body'}) && ($env{'request.course.id'})) {
+ $args->{'only_body'} = 1;
+ } elsif (($env{'request.course.id'}) &&
+ ($env{'form.folderpath'} =~ /^supplemental/)) {
+ &Apache::loncommon::validate_folderpath(1,'',$coursenum,$coursedomain);
my $crstype = &Apache::loncommon::course_type();
my $title = $env{'form.title'};
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') {
$args->{'bread_crumbs'} = $brcrum;
+ $args->{'bread_crumbs_nomenu'} = 1;
}
} else {
$args->{'bread_crumbs'} = [{href=>"/adm/$cdom/$cnum/aboutme",
@@ -401,6 +407,9 @@ sub handler {
if ($target ne 'tex') {$r->print('
');} else {$r->print('\\\\');}
} else {
$r->print('
'.&mt('No personal information provided').'.
'); + if ($target ne 'tex') { + &print_portfiles_link($r,$is_course); + } } if ($env{'request.course.id'} @@ -809,10 +818,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'};