summaryrefslogtreecommitdiff
path: root/lib/TUWF/Request.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2011-01-25 17:18:04 +0100
committerYorhel <git@yorhel.nl>2011-01-25 17:18:04 +0100
commitbefa63e4a110c3f6f31ec93bc049b915e15532ab (patch)
tree8fd29f9fa0920329b5f220b30a4a1828f23e15b1 /lib/TUWF/Request.pm
parentc9ebc852014679dce9ecef8fdf0ad161abf2780f (diff)
Fixed bug that caused cookie_prefix to be ignored with reqCookie()
Diffstat (limited to 'lib/TUWF/Request.pm')
-rw-r--r--lib/TUWF/Request.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/TUWF/Request.pm b/lib/TUWF/Request.pm
index 47cfca7..4121d0e 100644
--- a/lib/TUWF/Request.pm
+++ b/lib/TUWF/Request.pm
@@ -132,7 +132,7 @@ sub _parse_cookies {
s/ +$//;
next if !$_ || !m{^([^\(\)<>@,;:\\"/\[\]\?=\{\}\t\s]+)=("?)(.*)\2$};
my($n, $v) = ($1, $3);
- next if $self->{_TUWF}{cookie_prefix} && !s/^\Q$self->{_TUWF}{cookie_prefix}\E//;
+ next if $self->{_TUWF}{cookie_prefix} && !($n =~ s/^\Q$self->{_TUWF}{cookie_prefix}\E//);
$dat{$n} = $v if !exists $dat{$n};
}
return \%dat;