| 1 |
vip-ire |
1.1 |
diff -Nur e-smith-manager-2.8.0/root/etc/e-smith/web/common/cgi-bin/logout e-smith-manager-2.8.0_bz9527/root/etc/e-smith/web/common/cgi-bin/logout |
| 2 |
|
|
--- e-smith-manager-2.8.0/root/etc/e-smith/web/common/cgi-bin/logout 2016-02-05 23:38:13.000000000 +0100 |
| 3 |
|
|
+++ e-smith-manager-2.8.0_bz9527/root/etc/e-smith/web/common/cgi-bin/logout 2016-06-01 08:45:08.496950288 +0200 |
| 4 |
|
|
@@ -35,8 +35,7 @@ |
| 5 |
|
|
my ($server_name, $server_port) = split /:/, $q->http('X-Forwarded-Host') || $ENV{HTTP_HOST}; |
| 6 |
|
|
#warn "servername is $server_name; HOST is $ENV{HTTP_HOST}\n"; |
| 7 |
|
|
$server_name ||= $ENV{SERVER_NAME}; |
| 8 |
|
|
-$server_port ||= $ENV{SERVER_PORT}; |
| 9 |
|
|
-$server_port ( $server_name eq 'localhost' ) ? '80' : '443'; |
| 10 |
|
|
+$server_port = ( $server_name eq 'localhost' ) ? '80' : '443'; |
| 11 |
|
|
my $AUTH_DOMAIN = $server_name; |
| 12 |
|
|
my $back = $q->cookie($at->back_cookie_name) if $at->back_cookie_name; |
| 13 |
|
|
$back ||= $q->param($at->back_arg_name) if $at->back_arg_name; |
Parent Directory
| 
Revision Log
| 
Revision Graph
