[LON-CAPA-cvs] cvs: loncom /interface londocs.pm

[www]

www		Wed Jan 28 19:50:44 2004 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  Do not produce "not found" for variable file names
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.99 loncom/interface/londocs.pm:1.100
--- loncom/interface/londocs.pm:1.99	Wed Jan 14 22:18:19 2004
+++ loncom/interface/londocs.pm	Wed Jan 28 19:50:44 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.99 2004/01/15 03:18:19 www Exp $
+# $Id: londocs.pm,v 1.100 2004/01/29 00:50:44 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -535,7 +535,11 @@
           } elsif ($result==HTTP_SERVICE_UNAVAILABLE) {
              $r->print('<font color="red"><b>'.&mt('connection down').'</b></font>');
           } elsif ($result==HTTP_NOT_FOUND) {
-             $r->print('<font color="red"><b>'.&mt('not found').'</b></font>');
+	      unless ($url=~/\$/) {
+		  $r->print('<font color="red"><b>'.&mt('not found').'</b></font>');
+	      } else {
+		  $r->print('<font color="yellow"><b>'.&mt('unable to verify variable URL').'</b></font>');
+	      }
           } else {
              $r->print('<font color="red"><b>'.&mt('access denied').'</b></font>');
           }