From 67a7ff3627b764bdabbedd4670623b2a7f81d3aa Mon Sep 17 00:00:00 2001 From: Lars Dieckow Date: Thu, 13 Jun 2013 16:07:53 +0200 Subject: [PATCH] Catalyst 5.90040 --- lib/NGCP/Panel/Controller/Billing.pm | 4 ++-- lib/NGCP/Panel/Controller/Domain.pm | 6 +++--- lib/NGCP/Panel/Controller/Peering.pm | 4 ++-- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/lib/NGCP/Panel/Controller/Billing.pm b/lib/NGCP/Panel/Controller/Billing.pm index eff83affe1..674d478366 100644 --- a/lib/NGCP/Panel/Controller/Billing.pm +++ b/lib/NGCP/Panel/Controller/Billing.pm @@ -23,7 +23,7 @@ sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) :AllowedRol return 1; } -sub profile_list :Chained('/') :PathPart('billing') :CaptureArgs(0) :Args(0) { +sub profile_list :Chained('/') :PathPart('billing') :CaptureArgs(0) { my ( $self, $c ) = @_; NGCP::Panel::Utils::check_redirect_chain(c => $c); @@ -49,7 +49,7 @@ sub ajax :Chained('profile_list') :PathPart('ajax') :Args(0) { $c->detach( $c->view("JSON") ); } -sub base :Chained('profile_list') :PathPart('') :CaptureArgs(1) :Args(0) { +sub base :Chained('profile_list') :PathPart('') :CaptureArgs(1) { my ($self, $c, $profile_id) = @_; unless($profile_id && $profile_id->is_integer) { diff --git a/lib/NGCP/Panel/Controller/Domain.pm b/lib/NGCP/Panel/Controller/Domain.pm index 80e31e3596..c5a8cec9ae 100644 --- a/lib/NGCP/Panel/Controller/Domain.pm +++ b/lib/NGCP/Panel/Controller/Domain.pm @@ -12,7 +12,7 @@ sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) :AllowedRol return 1; } -sub dom_list :Chained('/') :PathPart('domain') :CaptureArgs(0) :Args(0) { +sub dom_list :Chained('/') :PathPart('domain') :CaptureArgs(0) { my ($self, $c) = @_; $c->stash(has_edit => 0); @@ -51,7 +51,7 @@ sub create :Chained('dom_list') :PathPart('create') :Args(0) { $c->stash(form => $form); } -sub base :Chained('/domain/dom_list') :PathPart('') :CaptureArgs(1) :Args(0) { +sub base :Chained('/domain/dom_list') :PathPart('') :CaptureArgs(1) { my ($self, $c, $domain_id) = @_; unless($domain_id && $domain_id->is_integer) { @@ -161,7 +161,7 @@ sub preferences :Chained('base') :PathPart('preferences') :Args(0) { $c->stash(template => 'domain/preferences.tt'); } -sub preferences_base :Chained('base') :PathPart('preferences') :CaptureArgs(1) :Args(0) { +sub preferences_base :Chained('base') :PathPart('preferences') :CaptureArgs(1) { my ($self, $c, $pref_id) = @_; $self->load_preference_list($c); diff --git a/lib/NGCP/Panel/Controller/Peering.pm b/lib/NGCP/Panel/Controller/Peering.pm index 7292fbcf71..94ea52c275 100644 --- a/lib/NGCP/Panel/Controller/Peering.pm +++ b/lib/NGCP/Panel/Controller/Peering.pm @@ -15,7 +15,7 @@ sub auto :Does(ACL) :ACLDetachTo('/denied_page') :AllowedRole(admin) { return 1; } -sub group_list :Chained('/') :PathPart('peering') :CaptureArgs(0) :Args(0) { +sub group_list :Chained('/') :PathPart('peering') :CaptureArgs(0) { my ( $self, $c ) = @_; NGCP::Panel::Utils::check_redirect_chain(c => $c); @@ -41,7 +41,7 @@ sub ajax :Chained('group_list') :PathPart('ajax') :Args(0) { $c->detach( $c->view("JSON") ); } -sub base :Chained('group_list') :PathPart('') :CaptureArgs(1) :Args(0) { +sub base :Chained('group_list') :PathPart('') :CaptureArgs(1) { my ($self, $c, $group_id) = @_; unless($group_id && $group_id->is_integer) {