summaryrefslogtreecommitdiff
path: root/perl/t/schema.t
diff options
context:
space:
mode:
authorRuss Allbery <rra@stanford.edu>2010-02-21 17:45:56 -0800
committerRuss Allbery <rra@stanford.edu>2010-02-21 17:45:56 -0800
commitae14bea1375dd5923d4a73e167b27bee13feb7b7 (patch)
treec1222395732cf8ce2cca32f013f080d19736f474 /perl/t/schema.t
parent57aba51dc26ebf0bdd034f6cb418a9ea5f1fc0be (diff)
parent60210334fa3dbd5dd168199063c6ee850d750d0c (diff)
Merge commit 'upstream/0.10' into debian
Diffstat (limited to 'perl/t/schema.t')
-rwxr-xr-xperl/t/schema.t3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl/t/schema.t b/perl/t/schema.t
index c7e9133..559ece4 100755
--- a/perl/t/schema.t
+++ b/perl/t/schema.t
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
#
# t/schema.t -- Tests for the wallet schema class.
#
@@ -22,7 +21,7 @@ ok (defined $schema, 'Wallet::Schema creation');
ok ($schema->isa ('Wallet::Schema'), ' and class verification');
my @sql = $schema->sql;
ok (@sql > 0, 'sql() returns something');
-is (scalar (@sql), 29, ' and returns the right number of statements');
+is (scalar (@sql), 28, ' and returns the right number of statements');
# Connect to a database and test create.
db_setup;