Bug 7295: (follow-up) update DBIx::Class schema classes

[koha.git] / acqui / invoice.pl

diff --git a/acqui/invoice.pl b/acqui/invoice.pl
index e38e02d..5971ed1 100755 (executable)
--- a/acqui/invoice.pl
+++ b/acqui/invoice.pl
@@ -83,6 +83,9 @@ elsif ( $op && $op eq 'mod' ) {
         ReopenInvoice($invoiceid);
     } elsif ($input->param('close')) {
         CloseInvoice($invoiceid);
+    } elsif ($input->param('merge')) {
+        my @sources = $input->param('merge');
+        MergeInvoices($invoiceid, \@sources);
     }
     $template->param( modified => 1 );
 }