--- trunk/lib/WebPAC/Input.pm	2005/07/16 20:35:30	10
+++ trunk/lib/WebPAC/Input.pm	2005/07/16 20:54:28	11
@@ -35,7 +35,6 @@
     while (my $row = $db->fetch) {
 	...
     }
-    $db->close;
 
 =head1 FUNCTIONS