X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fcommon.pl;h=1b054cf22ab4858d2ba94408da07566850d6b743;hb=9218e5a1c7e997b02f2b44033980f3bd1f33f670;hp=dfa7d0f788517128b98c86b4dabe6bfbb08dacf4;hpb=7f34b3c1f69619eaf3c41945ab22cf21883bb945;p=kivitendo-erp.git diff --git a/bin/mozilla/common.pl b/bin/mozilla/common.pl index dfa7d0f78..1b054cf22 100644 --- a/bin/mozilla/common.pl +++ b/bin/mozilla/common.pl @@ -9,7 +9,6 @@ # ###################################################################### -use Carp; use SL::Common; use SL::DB::Helper::Mappings; use SL::DBUtils; @@ -440,9 +439,6 @@ sub call_sub { $form->error(sprintf($locale->text("Attempt to call an undefined sub named '%s'"), $name)); } - $::called_subs{$name}++; - confess "RECURSION DETECTION: call_sub($name) called " . $::called_subs{$name} . " time(s)" if $::called_subs{$name} > 10; - { no strict "refs"; &{ $name }(@_);