X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7349649bae8d80eabfd253592d59f8455f9ef6b0..8e0f6e70:/SL/IS.pm

diff --git a/SL/IS.pm b/SL/IS.pm
index d7ba6b563..a05f25e3d 100644
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1312,7 +1312,10 @@ SQL
     do_query($form, $dbh, qq|UPDATE ar SET paid = amount WHERE id = ?|, conv_i($form->{"id"}));
   }
 
-  $form->new_lastmtime('ar');
+  # maybe we are in a larger transaction and the current
+  # object is not yet persistent in the db, therefore we
+  # need the current dbh to get the not yet committed mtime
+  $form->new_lastmtime('ar', $provided_dbh);
 
   $form->{name} = $form->{customer};
   $form->{name} =~ s/--\Q$form->{customer_id}\E//;