X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ftext_tradition_user.t;h=7dfa930252f518f07b8f0b65b988c2f3e8250bbb;hb=770f7a2ba4284bedc3d23e91d0a7923f5f37d721;hp=38773a0f962edfbb0f262f165cb254149ab70955;hpb=570cf8ba28203b3e022e019fdad0b8d95872bb9d;p=scpubgit%2Fstemmatology.git

diff --git a/t/text_tradition_user.t b/t/text_tradition_user.t
index 38773a0..7dfa930 100644
--- a/t/text_tradition_user.t
+++ b/t/text_tradition_user.t
@@ -4,19 +4,20 @@ use strict;
 use warnings;
 
 use Test::More 'no_plan';
-# use KiokuX::Model;
 use File::Temp;
 
-use_ok('Text::Tradition::UserStore');
+use_ok('Text::Tradition::Directory');
 
 my $fh = File::Temp->new();
 my $file = $fh->filename;
 $fh->close;
 my $dsn = "dbi:SQLite:dbname=$file";
 
-my $user_store = Text::Tradition::UserStore->new('dsn' => $dsn,
+my $user_store = Text::Tradition::Directory->new('dsn' => $dsn,
                                                  'extra_args' => { 'create' => 1 } );
 
+my $scope = $user_store->new_scope;
+
 ## passwords
 my $shortpass = 'bloggs';
 ok(!$user_store->validate_password($shortpass), '"bloggs" is too short for a password');