[prev in list] [next in list] [prev in thread] [next in thread]
List: lon-capa-cvs
Subject: [LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface domainprefs.pm
From: raeburn <raeburn () source ! lon-capa ! org>
Date: 2014-07-20 0:11:44
Message-ID: cvsraeburn1405815104 () cvsserver
[Download RAW message or body]
raeburn Sun Jul 20 00:11:44 2014 EDT
Modified files: (Branch: version_2_11_X)
/loncom/interface domainprefs.pm
Log:
- For 2.11
- Backport 1.250
Index: loncom/interface/domainprefs.pm
diff -u loncom/interface/domainprefs.pm:1.160.6.51 loncom/interface/domainprefs.pm:1.160.6.52
--- loncom/interface/domainprefs.pm:1.160.6.51 Tue Jul 15 21:52:16 2014
+++ loncom/interface/domainprefs.pm Sun Jul 20 00:11:43 2014
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.160.6.51 2014/07/15 21:52:16 raeburn Exp $
+# $Id: domainprefs.pm,v 1.160.6.52 2014/07/20 00:11:43 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -9057,8 +9057,8 @@
if ($newsettings->{'captcha'} eq 'recaptcha') {
$newpub = $env{'form.'.$container.'_recaptchapub'};
$newpriv = $env{'form.'.$container.'_recaptchapriv'};
- $newpub =~ s/\W//g;
- $newpriv =~ s/\W//g;
+ $newpub =~ s/[^\w\-]//g;
+ $newpriv =~ s/[^\w\-]//g;
$newsettings->{'recaptchakeys'} = {
public => $newpub,
private => $newpriv,
_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic