diff options
author | Michael Scherer <misc@mageia.org> | 2011-07-21 12:11:34 +0000 |
---|---|---|
committer | Michael Scherer <misc@mageia.org> | 2011-07-21 12:11:34 +0000 |
commit | ba1ebfe77fbebb5591076b94c2870b43e8596072 (patch) | |
tree | 1d3e246d73aec119750a3b6df67e4d5c511dfff1 /lib/CatDap/Controller/admin.pm | |
parent | e3b85713ec1221164e5d93e08c3bcd929a6f7428 (diff) | |
download | identity-ba1ebfe77fbebb5591076b94c2870b43e8596072.tar identity-ba1ebfe77fbebb5591076b94c2870b43e8596072.tar.gz identity-ba1ebfe77fbebb5591076b94c2870b43e8596072.tar.bz2 identity-ba1ebfe77fbebb5591076b94c2870b43e8596072.tar.xz identity-ba1ebfe77fbebb5591076b94c2870b43e8596072.zip |
fix code, Catalyst::Result do not have a forward method
Diffstat (limited to 'lib/CatDap/Controller/admin.pm')
-rw-r--r-- | lib/CatDap/Controller/admin.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/CatDap/Controller/admin.pm b/lib/CatDap/Controller/admin.pm index de0c76a..814475f 100644 --- a/lib/CatDap/Controller/admin.pm +++ b/lib/CatDap/Controller/admin.pm @@ -612,7 +612,7 @@ sub group_modify : Local { $c->detach('/user/login') if not $c->user; my $mainrole = 'account'; if ( ! $c->check_user_roles('Account Admins') and ! $c->check_user_roles('Group Admins')) { - $c->res->forward('/user'); + $c->forward('/user'); } $mainrole = 'group' if (not $c->check_user_roles('Account Admins')); $c->stash( subpages => gensubpages($mainrole) ); |