|
version 1.101, 2010/02/28 22:38:11
|
version 1.101.2.1, 2011/05/12 16:53:02
|
|
Line 88 sub handler {
|
Line 88 sub handler {
|
| |
|
| if ( ! $env{'request.course.fn'} || ! $checkallowed{'whatsnew'}) { |
if ( ! $env{'request.course.fn'} || ! $checkallowed{'whatsnew'}) { |
| # Not in a course, or no whn priv in course |
# Not in a course, or no whn priv in course |
| $env{'user.error.msg'}="/adm/whatsnew::whn:0:0:Cannot display what's new page"; |
$env{'user.error.msg'}="/adm/whatsnew:whn:0:0:Cannot display what's new page"; |
| return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
| } |
} |
| |
|
|
Line 1434 sub checkversions {
|
Line 1434 sub checkversions {
|
| 'lastrevisiondate'); |
'lastrevisiondate'); |
| $revdate = &Apache::lonlocal::locallocaltime($revdate); |
$revdate = &Apache::lonlocal::locallocaltime($revdate); |
| my $linkurl=&Apache::lonnet::clutter($key); |
my $linkurl=&Apache::lonnet::clutter($key); |
| my $usedversion=$navmap->usedVersion('version_'.$linkurl); |
my $usedversion=$navmap->usedVersion($linkurl); |
| my @resources = $navmap->getResourceByUrl($linkurl,1); |
my @resources = $navmap->getResourceByUrl($linkurl,1); |
| if (($usedversion) && ($usedversion ne 'mostrecent')) { |
if (($usedversion) && ($usedversion ne 'mostrecent')) { |
| $version = $usedversion; |
$version = $usedversion; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonwhatsnew.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface