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/object.t | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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

diff --git a/perl/t/object.t b/perl/t/object.t
index 48604bc..94fe22b 100755
--- a/perl/t/object.t
+++ b/perl/t/object.t
@@ -320,6 +320,5 @@ EOO
 is ($object->history, $output, ' and the history is correct');
 
 # Clean up.
-my $schema = Wallet::Schema->new;
-$schema->drop ($dbh);
+$admin->destroy;
 unlink 'wallet-db';
-- 
cgit v1.2.3