[interchange-cvs] interchange - heins modified scripts/interchange.PL

interchange-core@interchange.redhat.com interchange-core@interchange.redhat.com
Wed Jul 3 12:23:00 2002


User:      heins
Date:      2002-07-03 16:22:22 GMT
Modified:  scripts  Tag: STABLE_4_8-branch interchange.PL
Log:
* Skip host-checking if WideOpen as per Ed.

Revision  Changes    Path
No                   revision



No                   revision



2.7.2.15  +5 -2      interchange/scripts/interchange.PL


rev 2.7.2.15, prev_rev 2.7.2.14
Index: interchange.PL
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/scripts/interchange.PL,v
retrieving revision 2.7.2.14
retrieving revision 2.7.2.15
diff -u -r2.7.2.14 -r2.7.2.15
--- interchange.PL	27 Jun 2002 22:38:25 -0000	2.7.2.14
+++ interchange.PL	3 Jul 2002 16:22:22 -0000	2.7.2.15
@@ -50,7 +50,7 @@
 #
 # Interchange version 4.8.6
 #
-# $Id: interchange.PL,v 2.7.2.14 2002/06/27 22:38:25 jon Exp $
+# $Id: interchange.PL,v 2.7.2.15 2002/07/03 16:22:22 mheins Exp $
 #
 # Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -1972,7 +1972,10 @@
 								? ($Vend::Session->{shost})
 								: ($Vend::Session->{ohost});
=20
-			if(! $compare_host) {
+			if($Vend::Cfg->{WideOpen}) {
+				# do nothing, no host checking
+			}
+			elsif(! $compare_host) {
 				# don't drop the session on the first time we switch
 				# over to the secure server
 				unless ($CGI::secure