X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/aae0ac792d23a44a894fe876fed5159ca593d550..c4eb3b162e711e5ceda601a0f12b0277f99139b2:/SL/Controller/Base.pm?ds=sidebyside

diff --git a/SL/Controller/Base.pm b/SL/Controller/Base.pm
index 4dace86ed..1188ffe8b 100644
--- a/SL/Controller/Base.pm
+++ b/SL/Controller/Base.pm
@@ -204,7 +204,9 @@ sub _run_action {
 }
 
 sub _controller_name {
-  return (split(/::/, ref($_[0]) || $_[0]))[-1];
+  my $class = ref($_[0]) || $_[0];
+  $class    =~ s/^SL::Controller:://;
+  return $class;
 }
 
 sub _dispatch {