--- loncom/interface/lonaboutme.pm 2006/12/09 23:33:55 1.58 +++ loncom/interface/lonaboutme.pm 2006/12/11 03:46:31 1.60 @@ -1,7 +1,7 @@ # The LearningOnline Network # "About Me" Personal Information # -# $Id: lonaboutme.pm,v 1.58 2006/12/09 23:33:55 albertel Exp $ +# $Id: lonaboutme.pm,v 1.60 2006/12/11 03:46:31 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -57,7 +57,7 @@ sub handler { 'No user information available'); return OK; } else { - $is_course = &is_course($cdom,$cnum); + $is_course = &Apache::lonnet::is_course($cdom,$cnum); } # --------------------------------------------------------- The syllabus fields @@ -74,7 +74,13 @@ sub handler { # ----------------------------------------------- Available Portfolio file display if (($target ne 'tex') && ($action eq 'portfolio')) { &display_portfolio_header($r,$is_course); - &display_portfolio_files($r,$is_course); + my ($blocked,$blocktext) = + &Apache::loncommon::blocking_status('port',$cnum,$cdom); + if (!$blocked) { + &display_portfolio_files($r,$is_course); + } else { + $r->print($blocktext); + } $r->print(&Apache::loncommon::end_page()); return OK; }