sipwise
/
ngcp-panel
mirror of https://github.com/sipwise/ngcp-panel.git
1
0
Fork 0
Code Issues Releases Wiki Activity

MT#4413 Remove debugging messages.

Browse Source 
This even breaks domain creation for PBX.
apogrebennyk/3_1_force_outbound
Andreas Granig 12 years ago
parent 36a020c376
commit 05553d0406
11 changed files with 0 additions and 19 deletions
Show Stats Download Patch File Download Diff File

4
lib/NGCP/Panel/Controller/Customer.pm
Unescape View File

@ -610,7 +610,6 @@ sub pbx_device_create :Chained('base') :PathPart('pbx/device/create') :Args(0) {
my @lines = $form->field('line')->fields; my @lines = $form->field('line')->fields;
foreach my $line(@lines) { foreach my $line(@lines) {
say ">>>>>>>>>> handle line, subscriber_id=".$line->field('subscriber_id').", account_id=".$c->stash->{contract}->id;
my $prov_subscriber = $schema->resultset('provisioning_voip_subscribers')->find({ my $prov_subscriber = $schema->resultset('provisioning_voip_subscribers')->find({
id => $line->field('subscriber_id')->value, id => $line->field('subscriber_id')->value,
account_id => $c->stash->{contract}->id, account_id => $c->stash->{contract}->id,
@ -694,7 +693,6 @@ sub pbx_device_edit :Chained('pbx_device_base') :PathPart('edit') :Args(0) {
},{ },{
join => { 'config' => 'device' }, join => { 'config' => 'device' },
}); });
say ">>>>>>>>>>>>>>>>>>> ceate NGCP::Panel::Form::Customer::PbxFieldDevice";
my $form = NGCP::Panel::Form::Customer::PbxFieldDeviceEdit->new(ctx => $c); my $form = NGCP::Panel::Form::Customer::PbxFieldDeviceEdit->new(ctx => $c);
my $params = { $c->stash->{pbx_device}->get_inflated_columns }; my $params = { $c->stash->{pbx_device}->get_inflated_columns };
my @lines = (); my @lines = ();
@ -707,7 +705,6 @@ sub pbx_device_edit :Chained('pbx_device_base') :PathPart('edit') :Args(0) {
} }
$params->{line} = \@lines; $params->{line} = \@lines;
$params = $params->merge($c->session->{created_objects}); $params = $params->merge($c->session->{created_objects});
say ">>>>>>>>>>>>>>>>>>>>>>> process form";
$form->process( $form->process(
posted => $posted, posted => $posted,
params => $c->request->params, params => $c->request->params,
@ -737,7 +734,6 @@ sub pbx_device_edit :Chained('pbx_device_base') :PathPart('edit') :Args(0) {
$fdev->autoprov_field_device_lines->delete_all; $fdev->autoprov_field_device_lines->delete_all;
my @lines = $form->field('line')->fields; my @lines = $form->field('line')->fields;
foreach my $line(@lines) { foreach my $line(@lines) {
say ">>>>>>>>>> handle line, subscriber_id=".$line->field('subscriber_id').", account_id=".$c->stash->{contract}->id;
my $prov_subscriber = $schema->resultset('provisioning_voip_subscribers')->find({ my $prov_subscriber = $schema->resultset('provisioning_voip_subscribers')->find({
id => $line->field('subscriber_id')->value, id => $line->field('subscriber_id')->value,
account_id => $c->stash->{contract}->id, account_id => $c->stash->{contract}->id,

1
lib/NGCP/Panel/Controller/Device.pm
Unescape View File

@ -240,7 +240,6 @@ sub devmod_edit :Chained('devmod_base') :PathPart('edit') :Args(0) :Does(ACL) :A
foreach my $range($c->stash->{devmod}->autoprov_device_line_ranges->all) { foreach my $range($c->stash->{devmod}->autoprov_device_line_ranges->all) {
push @{ $params->{linerange} }, { $range->get_inflated_columns }; push @{ $params->{linerange} }, { $range->get_inflated_columns };
} }
use Data::Printer; p $params;
$params->{reseller}{id} = delete $params->{reseller_id}; $params->{reseller}{id} = delete $params->{reseller_id};
$params = $params->merge($c->session->{created_objects}); $params = $params->merge($c->session->{created_objects});
if($c->user->is_superuser) { if($c->user->is_superuser) {

1
lib/NGCP/Panel/Controller/Login.pm
Unescape View File

@ -111,7 +111,6 @@ sub index :Path Form {
$form->add_form_error('Invalid username/password'); $form->add_form_error('Invalid username/password');
} }
} else { } else {
$c->log->debug(">>>>>>>>>>>>>>>>>>>>>>>> initial get in Login");
# initial get # initial get
} }

1
lib/NGCP/Panel/Controller/Sound.pm
Unescape View File

@ -345,7 +345,6 @@ sub handles_base :Chained('handles_list') :PathPart('') :CaptureArgs(1) {
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{handles_base_uri}); NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{handles_base_uri});
} }
my @tmph = $c->stash->{handles_rs}->all; my @tmph = $c->stash->{handles_rs}->all;
use Data::Printer; p @tmph;
unless($c->stash->{handles_rs}->find({ 'handles.id' => $handle_id })) { unless($c->stash->{handles_rs}->find({ 'handles.id' => $handle_id })) {
$c->flash(messages => [{type => 'error', text => 'Sound handle id does not exist'}]); $c->flash(messages => [{type => 'error', text => 'Sound handle id does not exist'}]);
NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{handles_base_uri}); NGCP::Panel::Utils::Navigation::back_or($c, $c->stash->{handles_base_uri});

2
lib/NGCP/Panel/Controller/Subscriber.pm
Unescape View File

@ -39,8 +39,6 @@ use NGCP::Panel::Form::Faxserver::Destination;
use NGCP::Panel::Utils::XMLDispatcher; use NGCP::Panel::Utils::XMLDispatcher;
use UUID; use UUID;
use Data::Printer;
=head1 NAME =head1 NAME
NGCP::Panel::Controller::Subscriber - Catalyst Controller NGCP::Panel::Controller::Subscriber - Catalyst Controller

1
lib/NGCP/Panel/Field/SubscriberDestinationSet.pm
Unescape View File

@ -1,6 +1,5 @@
package NGCP::Panel::Field::SubscriberDestinationSet; package NGCP::Panel::Field::SubscriberDestinationSet;
use Sipwise::Base; use Sipwise::Base;
use Data::Printer;
extends 'HTML::FormHandler::Field::Select'; extends 'HTML::FormHandler::Field::Select';
sub build_options { sub build_options {

1
lib/NGCP/Panel/Field/SubscriberTimeSet.pm
Unescape View File

@ -1,6 +1,5 @@
package NGCP::Panel::Field::SubscriberTimeSet; package NGCP::Panel::Field::SubscriberTimeSet;
use Sipwise::Base; use Sipwise::Base;
use Data::Printer;
extends 'HTML::FormHandler::Field::Select'; extends 'HTML::FormHandler::Field::Select';
sub build_options { sub build_options {

1
lib/NGCP/Panel/Form/Customer/PbxFieldDevice.pm
Unescape View File

@ -21,7 +21,6 @@ has_field 'profile_id' => (
); );
sub build_profiles { sub build_profiles {
my ($self) = @_; my ($self) = @_;
print ">>>>>>>>>>>>>> build_profiles\n";
my $c = $self->form->ctx; my $c = $self->form->ctx;
my $profile_rs = $c->stash->{autoprov_profile_rs}; my $profile_rs = $c->stash->{autoprov_profile_rs};
my @options = (); my @options = ();

1
lib/NGCP/Panel/Form/Domain/ResellerPbx.pm
Unescape View File

@ -19,7 +19,6 @@ sub build_rwr_sets {
push @options, { label => '', value => undef }; push @options, { label => '', value => undef };
if(defined $c) { if(defined $c) {
my $sets = $c->stash->{reseller}->voip_rewrite_rule_sets; my $sets = $c->stash->{reseller}->voip_rewrite_rule_sets;
use Data::Printer; p $sets->all;
foreach my $s($sets->all) { foreach my $s($sets->all) {
push @options, { label => $s->name, value => $s->id }; push @options, { label => $s->name, value => $s->id };
} }

5
lib/NGCP/Panel/Utils/Navigation.pm
Unescape View File

@ -9,8 +9,6 @@ sub check_redirect_chain {
# TODO: check for missing fields # TODO: check for missing fields
my $c = $params{c}; my $c = $params{c};
$c->log->debug(">>>>>>>>>>>> check_redirect_chain");
return if($c->req->uri->path =~ /ajax/); return if($c->req->uri->path =~ /ajax/);
$c->session->{redirect_targets} = [] $c->session->{redirect_targets} = []
@ -22,14 +20,11 @@ sub check_redirect_chain {
$back_uri->query_param_delete('back'); $back_uri->query_param_delete('back');
delete $c->request->params->{back}; delete $c->request->params->{back};
if(@{ $c->session->{redirect_targets} }) { if(@{ $c->session->{redirect_targets} }) {
$c->log->debug(">>>>>>>>>>>> adding $back_uri to list of redirect targets");
unless(${ $c->session->{redirect_targets} }[0]->path eq $back_uri->path) { unless(${ $c->session->{redirect_targets} }[0]->path eq $back_uri->path) {
$c->log->debug(">>>>>>>>>>>> $back_uri not on top of redirect targets, do add");
unshift @{ $c->session->{redirect_targets} }, $back_uri unshift @{ $c->session->{redirect_targets} }, $back_uri
} }
# in case you press F5 with a back-uri in the url # in case you press F5 with a back-uri in the url
} else { } else {
$c->log->debug(">>>>>>>>>>>> initialize redirect targets with $back_uri");
$c->session->{redirect_targets} = [ $back_uri ]; $c->session->{redirect_targets} = [ $back_uri ];
} }
$c->stash(close_target => $back_uri); $c->stash(close_target => $back_uri);

1
lib/NGCP/Panel/Utils/Sounds.pm
Unescape View File

@ -55,7 +55,6 @@ sub stash_soundset_list {
my $sets_rs = $c->model('DB')->resultset('voip_sound_sets'); my $sets_rs = $c->model('DB')->resultset('voip_sound_sets');
if($contract) { if($contract) {
say ">>>>>>>>>>>>>>> we've a contract, limit rs";
$sets_rs = $sets_rs->search({ 'me.contract_id' => $contract->id }); $sets_rs = $sets_rs->search({ 'me.contract_id' => $contract->id });
} }

Write Preview
Loading…
Cancel
Save