X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b59ec96925334124e8e126e467181b766b7c701f..2794f75fd58d78a1229b7b0d62d5fcb958d241b9:/SL/CT.pm

diff --git a/SL/CT.pm b/SL/CT.pm
index a7b0a2f06..308a36e46 100644
--- 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 {