[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