Allow authenticating against fully loaded users

[catagits/Catalyst-Authentication-Store-DBIx-Class.git] / t / 03-authtest.t

diff --git a/t/03-authtest.t b/t/03-authtest.t
index faed777..f704281 100644 (file)
--- a/t/03-authtest.t
+++ b/t/03-authtest.t
@@ -17,9 +17,7 @@ BEGIN {
         or plan skip_all =>
         "DBIx::Class is required for this test";
 
-    plan tests => 17;
-
-    $ENV{TESTAPP_DB_FILE} = "$FindBin::Bin/auth.db" unless exists($ENV{TESTAPP_DB_FILE});
+    plan tests => 19;
 
     $ENV{TESTAPP_CONFIG} = {
         name => 'TestApp',
@@ -46,8 +44,6 @@ BEGIN {
     ];
 }
 
-use SetupDB;
-
 use Catalyst::Test 'TestApp';
 
 # log a user in
@@ -86,8 +82,13 @@ use Catalyst::Test 'TestApp';
     is( $res->content, 'nuffin logged in', 'searchargs based login ok' );
 }
 
+# result test
+{
+    ok( my $res = request('http://localhost/result_login?email=j%40cpants.org&password=letmein'), 'request ok' );
+    is( $res->content, 'jayk logged in', 'resultset based login ok' );
+}
+
 # resultset test
-# searchargs test
 {
     ok( my $res = request('http://localhost/resultset_login?email=j%40cpants.org&password=letmein'), 'request ok' );
     is( $res->content, 'jayk logged in', 'resultset based login ok' );
@@ -105,10 +106,3 @@ use Catalyst::Test 'TestApp';
     my $res = request('http://localhost/user_login?username=joeuser&password=hackme');
     like( $res->content, qr/\$\Qc->model('Nonexistent::Class') did not return a resultset. Did you set user_model correctly?/, 'test for wrong user_class' );
 }
-           
-         
-
-
-
-# clean up
-unlink $ENV{TESTAPP_DB_FILE};