X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/38e2876fa8ab04fe1ee78aeaa415aa6e71c0f524..4bd1e2f8b588972f10f92728301feacefd5ee4dd:/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); }