version 1.240, 2003/02/26 17:52:14
|
version 1.241, 2003/03/25 22:51:48
|
Line 795 sub default_homework_load {
|
Line 795 sub default_homework_load {
|
my ($safeeval)=@_; |
my ($safeeval)=@_; |
&Apache::lonxml::debug('Loading default_homework'); |
&Apache::lonxml::debug('Loading default_homework'); |
my $default=&Apache::lonnet::getfile('/home/httpd/html/res/adm/includes/default_homework.lcpm'); |
my $default=&Apache::lonnet::getfile('/home/httpd/html/res/adm/includes/default_homework.lcpm'); |
if ($default == -1) { |
if ($default eq -1) { |
&Apache::lonxml::error("<b>Unable to find <i>default_homework.lcpm</i></b>"); |
&Apache::lonxml::error("<b>Unable to find <i>default_homework.lcpm</i></b>"); |
} else { |
} else { |
&Apache::run::run($default,$safeeval); |
&Apache::run::run($default,$safeeval); |
Line 1187 sub handler {
|
Line 1187 sub handler {
|
my %mystyle; |
my %mystyle; |
my $result = ''; |
my $result = ''; |
my $filecontents=&Apache::lonnet::getfile($file); |
my $filecontents=&Apache::lonnet::getfile($file); |
if ($filecontents == -1) { |
if ($filecontents eq -1) { |
$result=(<<ENDNOTFOUND); |
$result=(<<ENDNOTFOUND); |
<html> |
<html> |
<head> |
<head> |