--- loncom/publisher/londiff.pm 2012/04/18 20:14:35 1.35 +++ loncom/publisher/londiff.pm 2012/10/29 17:38:55 1.36 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to show differences between file versions # -# $Id: londiff.pm,v 1.35 2012/04/18 20:14:35 raeburn Exp $ +# $Id: londiff.pm,v 1.36 2012/10/29 17:38:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -38,7 +38,6 @@ use File::Copy; use File::Compare; use Algorithm::Diff qw(diff); use Apache::Constants qw(:common :http :methods); -use Apache::loncacc(); use Apache::lonnet; use Apache::loncommon(); use Apache::lonretrieve(); @@ -101,7 +100,7 @@ sub handler { if (($env{'form.versionone'} eq 'priv') || ($env{'form.versiontwo'} eq 'priv')) { my ($cstrname,$cstrdom) = - &Apache::loncacc::constructaccess("/priv/$cudom/$cuname".$env{'form.filename'}); + &Apache::lonnet::constructaccess("/priv/$cudom/$cuname".$env{'form.filename'}); unless (($cstrname eq $cuname) && ($cstrdom eq $cudom)) { $allowed = 0; } @@ -109,7 +108,7 @@ sub handler { } } else { ($cuname,$cudom)= - &Apache::loncacc::constructaccess($env{'form.filename'}); + &Apache::lonnet::constructaccess($env{'form.filename'}); if ($cuname ne '' && $cudom ne '') { $allowed = 1; } else {