From: Moritz Bunkus Date: Thu, 30 Dec 2010 15:31:59 +0000 (+0100) Subject: Controller-Namensraum nur ohne "strict refs" durchsuchbar X-Git-Tag: release-2.6.2beta1~17^2~3^2~3 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=2738176804c36766e11e68ed558920bb096b454c;p=kivitendo-erp.git Controller-Namensraum nur ohne "strict refs" durchsuchbar --- diff --git a/SL/Controller/Base.pm b/SL/Controller/Base.pm index 982c379ab..0c8147015 100644 --- a/SL/Controller/Base.pm +++ b/SL/Controller/Base.pm @@ -98,6 +98,7 @@ sub _controller_name { sub _dispatch { my $self = shift; + no strict 'refs'; my @actions = grep { m/^action_/ } keys %{ ref($self) . "::" }; my $action = first { $::form->{$_} } @actions;