loncom/publisher/testbankimport.pm - diff

Return to testbankimport.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.34, 2011/11/14 00:20:31	version 1.35, 2012/10/29 17:38:55
Line 28 package Apache::testbankimport;	Line 28 package Apache::testbankimport;

use strict;	use strict;
use Apache::Constants qw(:common :http :methods);	use Apache::Constants qw(:common :http :methods);
use Apache::loncacc;
use Apache::loncommon();	use Apache::loncommon();
use Apache::lonnet;	use Apache::lonnet;
use HTML::Entities();	use HTML::Entities();
Line 1827 sub handler {	Line 1826 sub handler {
return HTTP_NOT_FOUND;	return HTTP_NOT_FOUND;
}	}

my ($uname,$udom) = &Apache::loncacc::constructaccess($fn);	my ($uname,$udom) = &Apache::lonnet::constructaccess($fn);
if (($uname eq '') \|\| ($udom eq '')) {	if (($uname eq '') \|\| ($udom eq '')) {
$r->log_reason($uname.':'.$udom.' trying to convert testbank file '.	$r->log_reason($uname.':'.$udom.' trying to convert testbank file '.
$fn.' - not authorized',$r->filename);	$fn.' - not authorized',$r->filename);