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