X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Fir.pl;h=19b4f74a165f763b0cddff3983a2b2acfd9e5e35;hb=0e60202e4d9de0e0377e63fccc3a2f93e68bd24f;hp=e9a0f3d8a1909f6fc57b456c148945f5099fb2d5;hpb=f7b15d4334848fad1bcd0b569eff5139f9a6ba4d;p=kivitendo-erp.git diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index e9a0f3d8a..19b4f74a1 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -35,7 +35,6 @@ use SL::FU; use SL::IR; use SL::IS; -use SL::PE; use SL::DB::Default; use SL::DB::PurchaseInvoice; use List::Util qw(max sum); @@ -481,6 +480,10 @@ sub mark_as_paid { $main::lxdebug->leave_sub(); } +sub show_draft { + update(); +} + sub update { $main::lxdebug->enter_sub();