save_customer und save_vendor hatten die falschen return-Werte

diff --git a/SL/CT.pm b/SL/CT.pm
index a7b0a2f..308a36e 100644 (file)
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -355,9 +355,10 @@ sub save_customer {
   # add shipto
   $form->add_shipto($dbh, $form->{id});
 
-  $dbh->disconnect;
+  $rc = $dbh->disconnect;
 
   $main::lxdebug->leave_sub();
+  return $rc;
 }
 
 sub save_vendor {
@@ -488,9 +489,10 @@ sub save_vendor {
   # add shipto
   $form->add_shipto($dbh, $form->{id});
 
-  $dbh->disconnect;
+  $rc = $dbh->disconnect;
 
   $main::lxdebug->leave_sub();
+  return $rc;
 }
 
 sub delete {