X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FSSL.pm;h=6dae48f8fb3913099edc9fbbab51b8174d2cf429;hb=794abe2a200320318b087365f8141750a92f0647;hp=4d9ebf79485a60bbec21f1eaf66b2f9f505a90a2;hpb=b67d920751ccd16137c8ff3d6e3216a89fce8d9b;p=catagits%2FCatalyst-Plugin-RequireSSL.git diff --git a/t/lib/TestApp/Controller/SSL.pm b/t/lib/TestApp/Controller/SSL.pm index 4d9ebf7..6dae48f 100644 --- a/t/lib/TestApp/Controller/SSL.pm +++ b/t/lib/TestApp/Controller/SSL.pm @@ -25,4 +25,15 @@ sub maybe_secured : Local { $c->res->output( 'Maybe secured' ); } +sub test_detach : Local { + my ( $self, $c ) = @_; + + $c->require_ssl; + + $c->res->redirect('http://www.mydomain.com/redirect_from_the_action'); + + $c->res->output( 'Test detach' ); +} + + 1;