Verknüpfte Belege: beliebige Verknüpfungen hinzufügen können

[mfinanz.git] / SL / Presenter / Invoice.pm

diff --git a/SL/Presenter/Invoice.pm b/SL/Presenter/Invoice.pm
index f1aaf7f6fea03d6c531b38c4e2a9bac306b83cdd..c078450160c755440ac7185f362f977c396fa23c 100644 (file)
--- a/SL/Presenter/Invoice.pm
+++ b/SL/Presenter/Invoice.pm
@@ -24,7 +24,7 @@ sub ar_transaction {
 sub purchase_invoice {
   my ($self, $invoice, %params) = @_;
 
-  return _is_ir_record($self, $invoice, 'is', %params);
+  return _is_ir_record($self, $invoice, 'ir', %params);
 }
 
 sub ap_transaction {