X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4dc97e80cb06497c386300c9bbe2d134c4722996..13152ecc34f354968f48f4b9a779b652aaec383a:/bin/mozilla/ic.pl diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl index 34915eaf9..022422b1c 100644 --- a/bin/mozilla/ic.pl +++ b/bin/mozilla/ic.pl @@ -669,11 +669,3 @@ sub generate_report { } #end generate_report sub continue { call_sub($form->{"nextsub"}); } - -sub dispatcher { - my $action = first { $::form->{"action_${_}"} } qw(add); - $::form->error($::locale->text('No action defined.')) unless $action; - - $::form->{dispatched_action} = $action; - call_sub($action); -}