[LON-CAPA-cvs] cvs: loncom / lontrans.pm
raeburn
raeburn at source.lon-capa.org
Thu Jul 26 15:01:26 EDT 2018
raeburn Thu Jul 26 19:01:26 2018 EDT
Modified files:
/loncom lontrans.pm
Log:
- Fix logic.
Index: loncom/lontrans.pm
diff -u loncom/lontrans.pm:1.23 loncom/lontrans.pm:1.24
--- loncom/lontrans.pm:1.23 Tue May 8 15:31:22 2018
+++ loncom/lontrans.pm Thu Jul 26 19:01:25 2018
@@ -1,7 +1,7 @@
# The LearningOnline Network
# URL translation for User Files
#
-# $Id: lontrans.pm,v 1.23 2018/05/08 15:31:22 raeburn Exp $
+# $Id: lontrans.pm,v 1.24 2018/07/26 19:01:25 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -170,16 +170,16 @@
my $remintdom = &Apache::lonnet::internet_dom($remprimary);
if (ref($replication->{'certreq'}) eq 'ARRAY') {
if (grep(/^\Q$remintdom\E$/,@{$replication->{'certreq'}})) {
- $redirect = 1;
- } else {
$redirect = 0;
+ } else {
+ $redirect = 1;
}
}
if (ref($replication->{'nocertreq'}) eq 'ARRAY') {
if (grep(/^\Q$remintdom\E$/,@{$replication->{'nocertreq'}})) {
- $redirect = 0;
- } else {
$redirect = 1;
+ } else {
+ $redirect = 0;
}
}
}
@@ -189,7 +189,7 @@
last;
}
}
- return $redirect;
+ return $redirect;
}
1;
More information about the LON-CAPA-cvs
mailing list