[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /auth lonacc.pm
raeburn
raeburn at source.lon-capa.org
Thu Oct 1 06:42:56 EDT 2020
raeburn Thu Oct 1 10:42:56 2020 EDT
Modified files: (Branch: version_2_11_X)
/loncom/auth lonacc.pm
Log:
- For 2.11
Backport 1.181
Index: loncom/auth/lonacc.pm
diff -u loncom/auth/lonacc.pm:1.159.2.12 loncom/auth/lonacc.pm:1.159.2.13
--- loncom/auth/lonacc.pm:1.159.2.12 Wed Sep 30 19:33:59 2020
+++ loncom/auth/lonacc.pm Thu Oct 1 10:42:56 2020
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Cookie Based Access Handler
#
-# $Id: lonacc.pm,v 1.159.2.12 2020/09/30 19:33:59 raeburn Exp $
+# $Id: lonacc.pm,v 1.159.2.13 2020/10/01 10:42:56 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -617,6 +617,9 @@
my $query = $r->args;
foreach my $pair (split(/&/,$query)) {
my ($name, $value) = split(/=/,$pair);
+ $name = &unescape($name);
+ $value =~ tr/+/ /;
+ $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
if ($name eq 'symb') {
$poss_symb = &Apache::lonnet::symbclean($value);
last;
More information about the LON-CAPA-cvs
mailing list