From 10c21db62ffe14c6f208cbfa938f72bc4876f594 Mon Sep 17 00:00:00 2001 From: Russ Allbery Date: Mon, 27 Aug 2007 16:46:50 +0000 Subject: Rename Wallet::ACL to Wallet::ACL::Base to preserve the Wallet::ACL package name for higher-level ACL handling. --- perl/t/acl.t | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perl/t') diff --git a/perl/t/acl.t b/perl/t/acl.t index 7d5f230..5549afb 100755 --- a/perl/t/acl.t +++ b/perl/t/acl.t @@ -5,12 +5,12 @@ use Test::More tests => 13; -use Wallet::ACL; +use Wallet::ACL::Base; use Wallet::ACL::Krb5; -my $verifier = Wallet::ACL->new; -ok (defined $verifier, 'Wallet::ACL creation'); -ok ($verifier->isa ('Wallet::ACL'), ' and class verification'); +my $verifier = Wallet::ACL::Base->new; +ok (defined $verifier, 'Wallet::ACL::Base creation'); +ok ($verifier->isa ('Wallet::ACL::Base'), ' and class verification'); is ($verifier->check ('rra@stanford.edu', 'rra@stanford.edu'), 0, 'Default check declines'); is ($verifier->error, undef, 'No error set'); -- cgit v1.2.3