version 1.12, 2011/10/23 23:46:07
|
version 1.13, 2011/10/24 22:39:21
|
Line 407 sub handler {
|
Line 407 sub handler {
|
my $uname; |
my $uname; |
my $udom; |
my $udom; |
|
|
($uname,$udom)= |
($uname,$udom)=&Apache::loncacc::constructaccess($fn); |
&Apache::loncacc::constructaccess($fn,$r->dir_config('lonDefDomain')); |
|
unless (($uname) && ($udom)) { |
unless (($uname) && ($udom)) { |
$r->log_reason($uname.' at '.$udom. |
$r->log_reason($uname.' at '.$udom. |
' trying to cleanup file '.$env{'form.filename'}. |
' trying to cleanup file '.$env{'form.filename'}. |
Line 451 sub handler {
|
Line 450 sub handler {
|
'</form>' |
'</form>' |
.&Apache::lonhtmlcommon::start_funclist() |
.&Apache::lonhtmlcommon::start_funclist() |
.&Apache::lonhtmlcommon::add_item_funclist( |
.&Apache::lonhtmlcommon::add_item_funclist( |
'<a href="/priv/'.$uname.'/'.$fn.'">'.&mt('Back to Source File').'</a>') |
'<a href="/priv/'.$udom.'/'.$uname.'/'.$fn.'">'.&mt('Back to Source File').'</a>') |
.&Apache::lonhtmlcommon::add_item_funclist( |
.&Apache::lonhtmlcommon::add_item_funclist( |
'<a href="/priv/'.$uname.'/'.$dir.'">'.&mt('Back to Source Directory').'</a>') |
'<a href="/priv/'.$udom.'/'.$uname.'/'.$dir.'">'.&mt('Back to Source Directory').'</a>') |
.&Apache::lonhtmlcommon::end_funclist() |
.&Apache::lonhtmlcommon::end_funclist() |
.&Apache::loncommon::end_page() |
.&Apache::loncommon::end_page() |
); |
); |