--- loncom/publisher/lonunauthorized.pm 2011/11/13 01:07:09 1.11 +++ loncom/publisher/lonunauthorized.pm 2012/10/29 17:38:55 1.15 @@ -1,7 +1,7 @@ # The LearningOnline Network # Unauthorized to access construction space # -# $Id: lonunauthorized.pm,v 1.11 2011/11/13 01:07:09 raeburn Exp $ +# $Id: lonunauthorized.pm,v 1.15 2012/10/29 17:38:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -32,7 +32,6 @@ use strict; use Apache::Constants qw(:common); use Apache::loncommon; use Apache::lonnet; -use Apache::loncacc; use Apache::lonlocal; use LONCAPA(); use HTML::Entities(); @@ -49,7 +48,7 @@ sub handler { my ($ownername,$ownerdomain,$ownerhome); if ($env{'request.editurl'} ne '') { ($ownername,$ownerdomain,$ownerhome) = - &Apache::loncacc::constructaccess($env{'request.editurl'}); + &Apache::lonnet::constructaccess($env{'request.editurl'}); } # Breadcrumbs @@ -57,7 +56,7 @@ sub handler { if ($env{'request.role'} =~ /^(au|ca|aa)/) { &Apache::lonhtmlcommon::add_breadcrumb({ 'text' => 'Construction Space', - 'href' => &Apache::loncommon::authorspace(), + 'href' => &Apache::loncommon::authorspace($env{'request.editurl'}), }); } elsif (($env{'request.course.id'}) && (&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { @@ -122,7 +121,7 @@ sub handler { $option = 'decompress'; } elsif ($name eq 'qualifiedfilename') { $qualifiedfilename = $value; - } elsif ($name = 'versionone') { + } elsif ($name eq 'versionone') { if ($value eq 'priv') { $option = 'cstr'; } @@ -155,7 +154,7 @@ sub handler { if ($warning) { if (($action eq 'diff') && ($option ne 'cstr')) { $r->print('
'. - $deniedactions{$action}.'
' + $deniedactions{$action}.'
'. &mt('You do not have privileges to view the published resource').' '. ''.$filename.''. '
');