oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

forward port of HTTP setCookie patch

Browse source
This commit is contained in:
Colin Kuskie 2005-11-14 21:04:34 +00:00
parent 25d260c0b4
commit 5c66da33c7
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/HTTP.pm
View file

@ -159,7 +159,8 @@ The time that the cookie should remain in the browser. Defaults to "+10y" (10 ye
sub setCookie { sub setCookie {
my $name = shift; my $name = shift;
my $value = shift; my $value = shift;
my $ttl = shift || '+10y'; my $ttl = shift;
$ttl = (defined $ttl ? $ttl : '+10y');
if (exists $session{req}) { if (exists $session{req}) {
my $cookie = Apache2::Cookie->new($session{req}, my $cookie = Apache2::Cookie->new($session{req},
-name=>$name, -name=>$name,