summaryrefslogtreecommitdiff
path: root/scripts/login.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/login.pl')
-rw-r--r--scripts/login.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/login.pl b/scripts/login.pl
index 02a188cf..ea0cf652 100644
--- a/scripts/login.pl
+++ b/scripts/login.pl
@@ -47,7 +47,7 @@ sub authenticate {
if ($request->{dbh} && $request->{next}) {
print "Content-Type: text/html\n";
- print "Set-Cookie: LedgerSMB=Login; path=$path\n";
+ print "Set-Cookie: ${LedgerSMB::Sysconfig::cookie_name}=Login; path=$path\n";
print "Status: 302 Found\n";
print "Location: ".$path.$request->{next}."\n";
print "\n";
@@ -55,7 +55,7 @@ sub authenticate {
}
elsif ($request->{dbh} || $request->{log_out}){
print "Content-Type: text/html\n";
- print "Set-Cookie: LedgerSMB=Login; path=$path\n";
+ print "Set-Cookie: ${LedgerSMB::Sysconfig::cookie_name}=Login; path=$path\n";
print "Status: 200 Success\n\n";
if ($request->{log_out}){
exit;