From 3cb3cb216d511d5686abfd0f20257dc11af63993 Mon Sep 17 00:00:00 2001 From: mike Date: Wed, 12 Apr 2006 12:30:09 +0000 Subject: [PATCH] Remove blank line. --- t/16-packages.t | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/t/16-packages.t b/t/16-packages.t index 1e725a2..6c09bcf 100644 --- a/t/16-packages.t +++ b/t/16-packages.t @@ -1,4 +1,4 @@ -# $Id: 16-packages.t,v 1.11 2006-04-12 12:23:02 mike Exp $ +# $Id: 16-packages.t,v 1.12 2006-04-12 12:30:09 mike Exp $ # Before `make install' is performed this script should be runnable with # `make test'. After `make install' it should work as `perl 16-packages.t' @@ -130,7 +130,6 @@ sub dropdb { my $p = Net::Z3950::ZOOM::connection_package($conn, $o); # No need to keep ok()ing this, or checking the option-setting Net::Z3950::ZOOM::package_option_set($p, databaseName => $dbname); - Net::Z3950::ZOOM::package_send($p, "drop"); my($errcode, $errmsg, $addinfo) = (undef, "dummy", "dummy"); $errcode = Net::Z3950::ZOOM::connection_error($conn, $errmsg, $addinfo); -- 1.7.10.4