diff --git a/Build.PL b/Build.PL index 50e70a4b77..6c1621f37f 100644 --- a/Build.PL +++ b/Build.PL @@ -13,6 +13,8 @@ my $builder = Local::Module::Build->new( }, requires => { 'base' => 0, + 'Catalyst::Action::RenderView' => 0, + 'Catalyst::Model::DBIC::Schema' => 0, 'Catalyst::Plugin::ConfigLoader' => 0, 'Catalyst::Plugin::Static::Simple' => 0, 'Catalyst::Plugin::Authentication' => 0, @@ -23,6 +25,7 @@ my $builder = Local::Module::Build->new( 'Catalyst::Runtime' => '5.90014', 'Catalyst::View::JSON' => 0, 'Catalyst::View::TT' => 0, + 'Config::General' => 0, 'HTML::FormHandler' => 0, 'HTML::FormHandler::Field' => 0, 'HTML::FormHandler::Field::Compound' => 0, @@ -54,6 +57,7 @@ my $builder = Local::Module::Build->new( 'Test::WebDriver' => 0, 'strict' => 0, 'Sys::Sig' => 0, + 'Test::WWW::Mechanize::Catalyst' => 0, 'URI' => 0, 'warnings' => 0, }, diff --git a/lib/NGCP/Panel/Controller/Contact.pm b/lib/NGCP/Panel/Controller/Contact.pm index c809f2e2c1..b226bfa36a 100644 --- a/lib/NGCP/Panel/Controller/Contact.pm +++ b/lib/NGCP/Panel/Controller/Contact.pm @@ -1,10 +1,7 @@ package NGCP::Panel::Controller::Contact; use Moose; use namespace::autoclean; -use Data::Dumper; - BEGIN { extends 'Catalyst::Controller'; } - use NGCP::Panel::Form::Contact; =head1 NAME diff --git a/lib/NGCP/Panel/Controller/Contract.pm b/lib/NGCP/Panel/Controller/Contract.pm index 07ad19da4b..cc354a5322 100644 --- a/lib/NGCP/Panel/Controller/Contract.pm +++ b/lib/NGCP/Panel/Controller/Contract.pm @@ -1,10 +1,7 @@ package NGCP::Panel::Controller::Contract; use Moose; use namespace::autoclean; -use Data::Dumper; - BEGIN { extends 'Catalyst::Controller'; } - use NGCP::Panel::Form::Contract; use NGCP::Panel::Utils; diff --git a/lib/NGCP/Panel/Controller/Dashboard.pm b/lib/NGCP/Panel/Controller/Dashboard.pm index adc2925261..7eb5754af0 100644 --- a/lib/NGCP/Panel/Controller/Dashboard.pm +++ b/lib/NGCP/Panel/Controller/Dashboard.pm @@ -1,11 +1,8 @@ package NGCP::Panel::Controller::Dashboard; use Moose; use namespace::autoclean; - BEGIN { extends 'Catalyst::Controller'; } - use NGCP::Panel::Widget; -use Data::Dumper; =head1 NAME diff --git a/lib/NGCP/Panel/Controller/Domain.pm b/lib/NGCP/Panel/Controller/Domain.pm index aa27e03146..1838aebbf3 100644 --- a/lib/NGCP/Panel/Controller/Domain.pm +++ b/lib/NGCP/Panel/Controller/Domain.pm @@ -1,8 +1,6 @@ package NGCP::Panel::Controller::Domain; use Moose; use namespace::autoclean; -use Data::Dumper; -use Data::Printer; BEGIN { extends 'Catalyst::Controller'; } diff --git a/lib/NGCP/Panel/Controller/Reseller.pm b/lib/NGCP/Panel/Controller/Reseller.pm index 23c4054eea..d79d78a763 100644 --- a/lib/NGCP/Panel/Controller/Reseller.pm +++ b/lib/NGCP/Panel/Controller/Reseller.pm @@ -1,10 +1,7 @@ package NGCP::Panel::Controller::Reseller; use Moose; use namespace::autoclean; -use Data::Dumper; - BEGIN { extends 'Catalyst::Controller'; } - use NGCP::Panel::Form::Reseller; use NGCP::Panel::Utils; @@ -96,8 +93,6 @@ sub base :Chained('/reseller/list') :PathPart('') :CaptureArgs(1) { sub edit :Chained('base') :PathPart('edit') :Args(0) { my ($self, $c) = @_; - print Dumper $c->stash->{reseller}; - my $posted = ($c->request->method eq 'POST'); my $form = NGCP::Panel::Form::Reseller->new; $form->process( diff --git a/lib/NGCP/Panel/Form/Preferences.pm b/lib/NGCP/Panel/Form/Preferences.pm index 0080a3bf9e..1e3eeb7181 100644 --- a/lib/NGCP/Panel/Form/Preferences.pm +++ b/lib/NGCP/Panel/Form/Preferences.pm @@ -7,8 +7,6 @@ use Moose::Util::TypeConstraints; use HTML::FormHandler::Widget::Block::Bootstrap; -use Data::Printer; - has '+widget_wrapper' => ( default => 'Bootstrap' ); sub build_render_list {[qw/myfields actions/]} sub build_form_element_class { [qw/form-horizontal/] } diff --git a/lib/NGCP/Panel/Utils.pm b/lib/NGCP/Panel/Utils.pm index ba2ffbf804..8b43a252cf 100644 --- a/lib/NGCP/Panel/Utils.pm +++ b/lib/NGCP/Panel/Utils.pm @@ -2,8 +2,6 @@ package NGCP::Panel::Utils; use strict; use warnings; -use Data::Dumper; - sub check_redirect_chain { my %params = @_; diff --git a/lib/NGCP/Panel/Widget.pm b/lib/NGCP/Panel/Widget.pm index 8de2a31eb7..21b091904a 100644 --- a/lib/NGCP/Panel/Widget.pm +++ b/lib/NGCP/Panel/Widget.pm @@ -2,8 +2,6 @@ package NGCP::Panel::Widget; use Moose; with 'MooseX::Object::Pluggable'; -use Data::Dumper; - sub handle { my ($self, $c) = @_; return; diff --git a/t/controller_Reseller.t b/t/controller_Reseller.t index 9201916ddf..8d851bddce 100644 --- a/t/controller_Reseller.t +++ b/t/controller_Reseller.t @@ -3,9 +3,6 @@ use warnings; use Test::More; use JSON::Parse 'valid_json'; use JSON qw( from_json ); -use Data::Dumper; - - use Catalyst::Test 'NGCP::Panel'; use NGCP::Panel::Controller::Reseller;