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

www lon-capa-cvs@mail.lon-capa.org
Mon, 15 Dec 2003 19:46:13 -0000


www		Mon Dec 15 14:46:13 2003 EDT

  Modified files:              
    /loncom/interface	lonhelp.pm 
  Log:
  Bug #2480: some browsers send : in escaped form
  
  
Index: loncom/interface/lonhelp.pm
diff -u loncom/interface/lonhelp.pm:1.11 loncom/interface/lonhelp.pm:1.12
--- loncom/interface/lonhelp.pm:1.11	Mon Sep 22 14:35:46 2003
+++ loncom/interface/lonhelp.pm	Mon Dec 15 14:46:13 2003
@@ -142,8 +142,8 @@
      my $docroot = $r->dir_config('lonDocRoot');
      my $serverroot = $ENV{'HTTP_HOST'};
 
-     my $filenames = substr ($ENV{'REQUEST_URI'} , 
-			    rindex($ENV{'REQUEST_URI'}, '/') + 1, -4);
+     my $filenames = &Apache::lonnet::unescape(substr ($ENV{'REQUEST_URI'} , 
+			    rindex($ENV{'REQUEST_URI'}, '/') + 1, -4));
      
      # Security check on the file; the whole filename must consist
      # of nothing but alphanums, ' ,, or ., or the file