enable all debugging when you turn on the checkbox, RT#76756
authorIvan Kohler <ivan@freeside.biz>
Thu, 3 Aug 2017 00:09:00 +0000 (17:09 -0700)
committerIvan Kohler <ivan@freeside.biz>
Thu, 3 Aug 2017 00:09:00 +0000 (17:09 -0700)
FS/FS/part_export/pbxware.pm

index 53cb12b..44a606d 100644 (file)
@@ -137,7 +137,7 @@ sub import_cdrs {
       # page's IDs or something.
       my $uniqueid = md5_hex(join(',',@$row));
       if ( FS::cdr->row_exists('uniqueid = ?', $uniqueid) ) {
-        warn "skipped duplicate row in page $page\n" if $DEBUG > 1;
+        warn "skipped duplicate row in page $page\n" if $DEBUG;
         next CDR;
       }
 
@@ -186,7 +186,7 @@ local $ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0;
     ]
   );
   warn "$me $method\n" if $DEBUG;
-  warn $request->as_string."\n" if $DEBUG > 1;
+  warn $request->as_string."\n" if $DEBUG;
 
   my $ua = LWP::UserAgent->new;
   my $response = $ua->request($request);