X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/46b430e4f4e0cc49c175840eb6ef6735bf6223b7..8c1d5d7530f3a1c923ee470b7ff31616800a8574:/SL/IC.pm diff --git a/SL/IC.pm b/SL/IC.pm index 45604b0c9..d4b341340 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -399,6 +399,8 @@ sub save { ); do_query($form, $dbh, $query, @values); + $form->new_lastmtime('parts'); + # delete translation records do_query($form, $dbh, qq|DELETE FROM translation WHERE parts_id = ?|, conv_i($form->{id})); @@ -570,6 +572,8 @@ sub update_assembly { $qty * ($form->{weight} - $weight), conv_i($id)); do_query($form, $dbh, $query, @values); + $form->new_lastmtime('parts') if $id == $form->{id}; + $main::lxdebug->leave_sub(); }