Ein ueberfluessiges ' entfernt.

diff --git a/SL/Form.pm b/SL/Form.pm
index 0573ed9..867f946 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -2209,7 +2209,7 @@ sub audittrail {
        $query = qq|INSERT INTO audittrail (trans_id, tablename, reference,
                    formname, action, employee_id, transdate) VALUES (
                    $audittrail->{id}, '$audittrail->{tablename}', |
-                   .$dbh->quote($audittrail->{reference}).qq|',
+                   .$dbh->quote($audittrail->{reference}).qq|,
                    '$audittrail->{formname}', '$audittrail->{action}',
                    $employee_id, '$audittrail->{transdate}')|;
       } else {