[Catalyst-commits] r10804 - in trunk/Catalyst-Plugin-RequireSSL: . t
norbi at dev.catalyst.perl.org
norbi at dev.catalyst.perl.org
Mon Jul 6 22:31:21 GMT 2009
Author: norbi
Date: 2009-07-06 22:31:20 +0000 (Mon, 06 Jul 2009)
New Revision: 10804
Modified:
trunk/Catalyst-Plugin-RequireSSL/
trunk/Catalyst-Plugin-RequireSSL/t/04ssl.t
Log:
r10830 at vger: mendel | 2009-07-07 00:15:19 +0200
Fixed a warning (redefined variable).
Property changes on: trunk/Catalyst-Plugin-RequireSSL
___________________________________________________________________
Name: svk:merge
- cf8fe1c1-d5c0-41b4-84a9-31cb5e8e0cbe:/local/catalyst/Catalyst-Plugin-RequireSSL:10828
+ cf8fe1c1-d5c0-41b4-84a9-31cb5e8e0cbe:/local/catalyst/Catalyst-Plugin-RequireSSL:10830
Modified: trunk/Catalyst-Plugin-RequireSSL/t/04ssl.t
===================================================================
--- trunk/Catalyst-Plugin-RequireSSL/t/04ssl.t 2009-07-06 22:02:46 UTC (rev 10803)
+++ trunk/Catalyst-Plugin-RequireSSL/t/04ssl.t 2009-07-06 22:31:20 UTC (rev 10804)
@@ -21,7 +21,7 @@
is( $res->header('location'), 'https://localhost/ssl/secured?a=1&a=2&b=3&c=4', 'redirect with params ok' );
# test that it does not redirect for actions where SSL mode is optional
-ok( my $res = request('http://localhost/ssl/maybe_secured'), 'request ok' );
+ok( $res = request('http://localhost/ssl/maybe_secured'), 'request ok' );
is( $res->code, 200, 'no redirect for optional SSL action' );
# test that it doesn't redirect on POST
More information about the Catalyst-commits
mailing list