From b02c92c01756db3935d437cc4d73a4253f7090b5 Mon Sep 17 00:00:00 2001 From: Andreas Granig Date: Mon, 15 Jun 2015 12:11:59 +0200 Subject: [PATCH] MT#13201 Cleanup debug output Change-Id: Id6346e3b20f29b0630cb05dc9e5810d52edde8db --- lib/NGCP/Panel/Controller/Voucher.pm | 1 - lib/NGCP/Panel/Utils/Subscriber.pm | 2 -- 2 files changed, 3 deletions(-) diff --git a/lib/NGCP/Panel/Controller/Voucher.pm b/lib/NGCP/Panel/Controller/Voucher.pm index f5b926f563..e588806513 100644 --- a/lib/NGCP/Panel/Controller/Voucher.pm +++ b/lib/NGCP/Panel/Controller/Voucher.pm @@ -321,7 +321,6 @@ sub voucher_upload :Chained('voucher_list') :PathPart('upload') :Args(0) { while(my $row = $csv->getline_hr($upload->fh)) { ++$linenum; - use Data::Printer; p $row; if($csv->is_missing(1)) { push @fails, $linenum; next; diff --git a/lib/NGCP/Panel/Utils/Subscriber.pm b/lib/NGCP/Panel/Utils/Subscriber.pm index b9648d41b6..365d881ab1 100644 --- a/lib/NGCP/Panel/Utils/Subscriber.pm +++ b/lib/NGCP/Panel/Utils/Subscriber.pm @@ -214,8 +214,6 @@ sub create_subscriber { # TODO: check if we find a reseller and contract and domains - use Data::Printer; p $params; - my $billing_subscriber = $contract->voip_subscribers->create({ uuid => $uuid_string, username => $params->{username},