From e403ac097600cf85ce35e4ddd1f16c2f5baa4e36 Mon Sep 17 00:00:00 2001
From: Andreas Granig <agranig@sipwise.com>
Date: Fri, 17 Oct 2014 17:08:59 +0200
Subject: [PATCH] MT#9637 Remove debug output

---
 NGCP/CDR/Export.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/NGCP/CDR/Export.pm b/NGCP/CDR/Export.pm
index d1c8d07..eae3d18 100644
--- a/NGCP/CDR/Export.pm
+++ b/NGCP/CDR/Export.pm
@@ -12,7 +12,6 @@ sub get_mark {
         push @ids, "lastseq-$id";
     }
     for my $mk(@ids) {
-        print "getting mark $name-$mk\n"; 
         $s->execute("$name-$mk") or die($dbh->errstr);
         my $r = $s->fetch;
         $marks{$mk} = ($r && $r->[0]) ? $r->[0] : 0;