X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/efb9a24f2252104ab4af5c25334119d7c5c70a8c..6ea1dd9bb2e7965da7d0ef66a0b464267ce41a9b:/SL/GL.pm diff --git a/SL/GL.pm b/SL/GL.pm index f97e2b248..016601e01 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -104,7 +104,7 @@ sub post_transaction { $query = qq|INSERT INTO gl (id, employee_id) | . qq|VALUES (?, (SELECT id FROM employee WHERE login = ?))|; - @values = ($form->{id}, $form->{login}); + @values = ($form->{id}, $::myconfig{login}); do_query($form, $dbh, $query, @values); }