X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate%2FPlugin%2FP.pm;h=44eeb436df35a5ca6997e5b89209f0e470b3006b;hb=73a58f3dceeb378343ceb151942828eea686b75a;hp=d2f44235409c1dc8b7f4aa0018896265755f1840;hpb=d445880375bce1462b8f9a8b1a502b34c296d41f;p=kivitendo-erp.git diff --git a/SL/Template/Plugin/P.pm b/SL/Template/Plugin/P.pm index d2f442354..44eeb436d 100644 --- a/SL/Template/Plugin/P.pm +++ b/SL/Template/Plugin/P.pm @@ -29,7 +29,12 @@ sub AUTOLOAD { my $method = $AUTOLOAD; $method =~ s/.*:://; - return '' unless $presenter->can($method); + return '' if $method eq 'DESTROY'; + + if (!$presenter->can($method)) { + $::lxdebug->message(LXDebug::WARN(), "SL::Presenter has no method named '$method'!"); + return ''; + } splice @args, -1, 1, %{ $args[-1] } if @args && (ref($args[-1]) eq 'HASH');