version 1.6, 2001/05/09 16:57:07
|
version 1.8, 2001/05/26 15:29:22
|
Line 19 use Apache::File;
|
Line 19 use Apache::File;
|
use File::Copy; |
use File::Copy; |
use Apache::Constants qw(:common :http :methods); |
use Apache::Constants qw(:common :http :methods); |
use Apache::loncacc; |
use Apache::loncacc; |
|
use Apache::lonnet; |
|
|
|
|
sub handler { |
sub handler { |
Line 112 sub handler {
|
Line 113 sub handler {
|
$bgcol='#FFFFBB'; |
$bgcol='#FFFFBB'; |
if |
if |
(&Apache::lonnet::fileembstyle(($filename=~/\.(\w+)$/)) eq 'ssi') { |
(&Apache::lonnet::fileembstyle(($filename=~/\.(\w+)$/)) eq 'ssi') { |
$status.='<br><a href="/adm/diff?filename='.$filename. |
$status.='<br><a href="/adm/diff?filename=/~'.$uname. |
|
'/'.$filename. |
'&versionone=priv" target=cat>Diffs</a>'; |
'&versionone=priv" target=cat>Diffs</a>'; |
} |
} |
} |
} |