From 45e33ff74717f39c421091f1a74f7d895e38bf57 Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Wed, 23 Jan 2008 19:17:09 +0000
Subject: Add a destroy() method to the Wallet::Admin object and use that
 instead of Wallet::Schema::drop in the test suite.

---
 perl/t/acl.t | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl/t/acl.t')

diff --git a/perl/t/acl.t b/perl/t/acl.t
index 15796d2..59e1071 100755
--- a/perl/t/acl.t
+++ b/perl/t/acl.t
@@ -227,6 +227,5 @@ is ($acl->name, 'example', ' and the right name');
 is ($acl->id, 3, ' and a new ID');
 
 # Clean up.
-my $schema = Wallet::Schema->new;
-$schema->drop ($dbh);
+$setup->destroy;
 unlink 'wallet-db';
-- 
cgit v1.2.3