Lieferanten in Warensuche nicht nach id sondern nach Namen suchen.

[kivitendo-erp.git] / SL / Printer.pm

diff --git a/SL/Printer.pm b/SL/Printer.pm
index 346d734a2b7ddc0f3c4cdad55c7a75e031ebd93a..ed42b01afa78f233ddd6bc4d48962f06898d705b 100644 (file)
--- a/SL/Printer.pm
+++ b/SL/Printer.pm
@@ -12,6 +12,8 @@ sub all_printers {
   my $query = qq|SELECT * FROM printers ORDER BY printer_description|;
   my @printers = selectall_hashref_query($::form, $dbh, $query);
 
+  $dbh->disconnect;
+
   $::lxdebug->leave_sub;
 
   return wantarray ? @printers : \@printers;
@@ -27,6 +29,8 @@ sub get_printer {
   my $query = qq|SELECT * FROM printers WHERE id = ?|;
   my ($printer) = selectfirst_hashref_query($::form, $dbh, $query, $params{id});
 
+  $dbh->disconnect;
+
   $::lxdebug->leave_sub;
 
   return $printer;
@@ -61,6 +65,7 @@ SQL
   );
 
   $dbh->commit;
+  $dbh->disconnect;
 
   $::lxdebug->leave_sub;
 }
@@ -76,6 +81,7 @@ sub delete_printer {
   do_query($::form, $dbh, $query, $params{id});
 
   $dbh->commit;
+  $dbh->disconnect;
 
   $::lxdebug->leave_sub;
 }