1 |
slords |
1.1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-manager-1.14.0/root/etc/e-smith/web/common/cgi-bin/login mezzanine_patched_e-smith-manager-1.14.0/root/etc/e-smith/web/common/cgi-bin/login |
2 |
|
|
--- e-smith-manager-1.14.0/root/etc/e-smith/web/common/cgi-bin/login 2007-01-26 18:51:30.000000000 -0700 |
3 |
|
|
+++ mezzanine_patched_e-smith-manager-1.14.0/root/etc/e-smith/web/common/cgi-bin/login 2007-03-05 16:18:00.000000000 -0700 |
4 |
|
|
@@ -91,7 +91,7 @@ |
5 |
|
|
my $AUTH_DOMAIN = $server_name; |
6 |
|
|
warn "AUTH_DOMAIN is $AUTH_DOMAIN\n"; |
7 |
|
|
warn "AuthTkt->domain was set\n" if $at->domain; |
8 |
|
|
-my @auth_domain = $AUTH_DOMAIN ? ( -domain => $AUTH_DOMAIN ) : (); |
9 |
|
|
+my @auth_domain = $AUTH_DOMAIN && $AUTH_DOMAIN =~ /\./ ? ( -domain => $AUTH_DOMAIN ) : (); |
10 |
|
|
my $ticket = $q->cookie($at->cookie_name); |
11 |
|
|
my $probe = $q->cookie('auth_probe'); |
12 |
|
|
my $back = $q->cookie($at->back_cookie_name) if $at->back_cookie_name; |