|
version 1.509, 2007/09/08 23:41:49
|
version 1.510, 2007/10/11 22:49:49
|
|
Line 1969 ENDPART
|
Line 1969 ENDPART
|
| } |
} |
| |
|
| my $URLback=''; #link to original document |
my $URLback=''; #link to original document |
| if ($helper->{'VARS'}->{'construction'} ne '1') { |
if ($helper->{'VARS'}->{'construction'} eq '1') { |
| #prints published resource |
|
| $URLback=&escape('/adm/flip?postdata=return:'); |
|
| } else { |
|
| #prints resource from the construction space |
#prints resource from the construction space |
| $URLback='/'.$helper->{'VARS'}->{'filename'}; |
$URLback='/'.$helper->{'VARS'}->{'filename'}; |
| if ($URLback=~/([^?]+)/) { |
if ($URLback=~/([^?]+)/) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonprintout.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface