[LON-CAPA-cvs] cvs: loncom(version_2_11_X) / lontrans.pm
raeburn
raeburn at source.lon-capa.org
Thu Mar 5 17:02:32 EST 2020
raeburn Thu Mar 5 22:02:32 2020 EDT
Modified files: (Branch: version_2_11_X)
/loncom lontrans.pm
Log:
- For 2.11
Backport 1.26
Index: loncom/lontrans.pm
diff -u loncom/lontrans.pm:1.14 loncom/lontrans.pm:1.14.10.1
--- loncom/lontrans.pm:1.14 Fri Oct 21 16:03:06 2011
+++ loncom/lontrans.pm Thu Mar 5 22:02:32 2020
@@ -1,7 +1,7 @@
# The LearningOnline Network
# URL translation for User Files
#
-# $Id: lontrans.pm,v 1.14 2011/10/21 16:03:06 www Exp $
+# $Id: lontrans.pm,v 1.14.10.1 2020/03/05 22:02:32 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -52,8 +52,13 @@
$r->filename(&propath($udom,$uname).
'/userfiles/'.(join('/', at ufile)));
}
- } else { return DECLINED; }
- return OK;
+ return OK;
+ } elsif ($r->uri =~ m{^\Q/adm/wrapper/ext/https:/\E[^/]}) {
+ my $uri = $r->uri;
+ $uri =~ s{^(\Q/adm/wrapper/ext/https:/\E)}{$1/};
+ $r->uri($uri);
+ }
+ return DECLINED;
}
1;
More information about the LON-CAPA-cvs
mailing list