version 1.263, 2009/11/19 05:18:08
|
version 1.264, 2009/11/24 01:44:44
|
Line 1771 sub phasetwo {
|
Line 1771 sub phasetwo {
|
my $thissrcdir=$thissrc; |
my $thissrcdir=$thissrc; |
$thissrcdir=~s/\/[^\/]+$/\//; |
$thissrcdir=~s/\/[^\/]+$/\//; |
|
|
$r->print(&Apache::lonhtmlcommon::start_funclist()); |
$r->print(&Apache::loncommon::head_subbox( |
unless ($env{'request.role'}=~/^(aa)/) { |
&Apache::lonhtmlcommon::start_funclist(). |
$r->print( |
|
&Apache::lonhtmlcommon::add_item_funclist( |
|
'<a href="'.$thisdistarget.'">' |
|
.&mt('View Published Version') |
|
.'</a>') |
|
); |
|
} |
|
$r->print( |
|
&Apache::lonhtmlcommon::add_item_funclist( |
&Apache::lonhtmlcommon::add_item_funclist( |
'<a href="'.$thissrc.'">' |
'<a href="'.$thisdistarget.'">'. |
.&mt('Back to Source') |
&mt('View Published Version'). |
.'</a>') |
'</a>'). |
.&Apache::lonhtmlcommon::add_item_funclist( |
&Apache::lonhtmlcommon::add_item_funclist( |
'<a href="'.$thissrcdir.'">' |
'<a href="'.$thissrc.'">'. |
.&mt('Back to Source Directory') |
&mt('Back to Source'). |
.'</a>') |
'</a>'). |
.&Apache::lonhtmlcommon::end_funclist() |
&Apache::lonhtmlcommon::add_item_funclist( |
|
'<a href="'.$thissrcdir.'">'. |
|
&mt('Back to Source Directory'). |
|
'</a>'). |
|
&Apache::lonhtmlcommon::end_funclist()) |
); |
); |
} |
} |
return 1; |
return 1; |