--- loncom/interface/londocs.pm 2005/03/10 16:11:32 1.171
+++ loncom/interface/londocs.pm 2005/04/04 23:51:54 1.173
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.171 2005/03/10 16:11:32 www Exp $
+# $Id: londocs.pm,v 1.173 2005/04/04 23:51:54 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1501,7 +1501,7 @@ sub checkonthis {
if ($url=~/^\/res\//) {
my $result=&Apache::lonnet::repcopy(
&Apache::lonnet::filelocation('',$url));
- if ($result eq 'OK') {
+ if ($result eq 'ok') {
$r->print(''.&mt('ok').'');
$r->rflush();
&Apache::lonnet::countacc($url);
@@ -1515,7 +1515,8 @@ sub checkonthis {
$r->print('- '.&mt('Rendering').': ');
my ($errorcount,$warningcount)=split(/:/,
&Apache::lonnet::ssi_body($url,
- ('return_only_error_and_warning_counts' => 1)));
+ ('grade_target'=>'web',
+ 'return_only_error_and_warning_counts' => 1)));
if (($errorcount) ||
($warningcount)) {
if ($errorcount) {
@@ -1540,9 +1541,9 @@ sub checkonthis {
&checkonthis($r,$_,$level+1);
}
}
- } elsif ($result eq 'HTTP_SERVICE_UNAVAILABLE') {
+ } elsif ($result eq 'unavailable') {
$r->print(''.&mt('connection down').'');
- } elsif ($result eq 'HTTP_NOT_FOUND') {
+ } elsif ($result eq 'not_found') {
unless ($url=~/\$/) {
$r->print(''.&mt('not found').'');
} else {