X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/470a8fa1710b22e2b381eef4cacb01bebaeff725..28d69bb85e934088a56e6e8458cd08d3794e1f8b:/bin/mozilla/common.pl 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 }(@_);