X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbackend.t;h=68347187f710d2d3f7922f67fb9fea9b67c7d966;hb=3e0bbcff879384a81c842abcede0dba6b4314790;hp=bf47856c9e1acd17c49445897dfd1c36a174be94;hpb=e8a7c384d5406c197382271ef873bad2883bbaf6;p=catagits%2FCatalyst-Authentication-Store-Htpasswd.git diff --git a/t/backend.t b/t/backend.t index bf47856..6834718 100644 --- a/t/backend.t +++ b/t/backend.t @@ -12,16 +12,16 @@ my $m; BEGIN { use_ok($m = "Catalyst::Plugin::Authentication::Store::Htpasswd::B (undef, my $tmp) = tempfile(); -my $passwd = Apache::Htpasswd->new({ passwdFile => "$tmp" }); +my $passwd = Authen::Htpasswd->new($tmp); -$passwd->htpasswd("user", "s3cr3t"); +$passwd->add_user("user", "s3cr3t"); can_ok($m, "new"); isa_ok(my $o = $m->new( $passwd ), $m); can_ok($m, "file"); -isa_ok( $o->file, "Apache::Htpasswd"); +isa_ok( $o->file, "Authen::Htpasswd"); can_ok( $m, "user_supports");