From 83b62a3f95a420134320955d21c54d46bc64e94c Mon Sep 17 00:00:00 2001 From: Yorhel Date: Sun, 20 Sep 2015 10:48:50 +0200 Subject: Use the new reqQuery() + update usage of reqPath() for TUWF 1.0 --- lib/VNDB/Util/Auth.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/VNDB/Util/Auth.pm') diff --git a/lib/VNDB/Util/Auth.pm b/lib/VNDB/Util/Auth.pm index d6a35d1d..a1c6cf08 100644 --- a/lib/VNDB/Util/Auth.pm +++ b/lib/VNDB/Util/Auth.pm @@ -200,7 +200,7 @@ sub authGetCode { # form-id is not given, the path of the current requests is used. sub authCheckCode { my $self = shift; - my $id = shift || '/'.$self->reqPath(); + my $id = shift || $self->reqPath(); my $code = shift || $self->reqParam('formcode'); return _incorrectcode($self) if !$code || $code !~ qr/^[0-9a-f]{16}$/; my $time = time; -- cgit v1.2.3