BUG-Fix: Beim Stornieren einer Rechnungen wird der bezahlte Betrag verdoppelt.

Storniert man eine als bezahlt markierte Rechnung,
so wird der bezahlte Betrag ("paid") verdoppelt.
Im SQL wird, fälschlicherweise, amount zu paid dazu addiert. Soll aber nur zugewiesen werden.

diff --git a/SL/IS.pm b/SL/IS.pm
index 6affa1d..a9a115d 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1298,7 +1298,7 @@ SQL
   if ($form->{storno}) {
     $query =
       qq!UPDATE ar SET
-           paid = paid + amount,
+           paid = amount,
            storno = 't',
            intnotes = ? || intnotes
          WHERE id = ?!;