X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Farap.pl;h=08cdc3be28695df54d12e2c5ae9e30e3562ed58b;hb=8cef58b276ce4005c0e2ada350fecd5d7a103e89;hp=f2e4e822b7a712453e5e95609c06cadb2a17c2fd;hpb=ef17e41a8364c6c97566a054768f573659dbec79;p=kivitendo-erp.git diff --git a/bin/mozilla/arap.pl b/bin/mozilla/arap.pl index f2e4e822b..08cdc3be2 100644 --- a/bin/mozilla/arap.pl +++ b/bin/mozilla/arap.pl @@ -40,6 +40,8 @@ if (-f "$form->{path}/$form->{login}_arap.pl") { 1; +require "bin/mozilla/common.pl"; + # end of main sub check_name { @@ -445,7 +447,7 @@ sub project_selected { map { delete $form->{$_} } qw(ndx lastndx nextsub is_global); if ($form->{update}) { - &{ $form->{update} }; + call_sub($form->{"update"}); } else { &update; } @@ -453,7 +455,7 @@ sub project_selected { $lxdebug->leave_sub(); } -sub continue { &{ $form->{nextsub} } } +sub continue { call_sub($form->{"nextsub"}); } sub gl_transaction { &add } sub ar_transaction { &add_transaction('ar') } sub ap_transaction { &add_transaction('ap') }