Merge pull request #676 from hollie/remove_debug_from_generic_item

Removes the deugging prints as requested by @hplato
hollie · Mar 5, 2017 · 4d90eee · 4d90eee
2 parents b5a7485 + 07fdb88
commit 4d90eee
Showing 1 changed file with 26 additions and 26 deletions.
diff --git a/lib/Generic_Item.pm b/lib/Generic_Item.pm
@@ -1386,34 +1386,34 @@ sub get_logger_data {
     my $data = "";
     $epoch = $epoch - ( $days * 60 * 60 * 24 );
     for ( my $i = 0; $i <= $days; $i++ ) {
-        print "db i=$i, days=$days, epoch=$epoch\n";
+        #print "db i=$i, days=$days, epoch=$epoch\n";
         my ( $sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst ) =
           localtime( $epoch + ( $i * 60 * 60 * 24 ) );
-        print "Epoch: $epoch is "
-          . $mday . "/"
-          . ( $mon + 1 ) . "/"
-          . ( $year + 1900 ) . "\n";
-        print "Checking "
-          . $::config_parms{data_dir}
-          . "/object_logs/"
-          . $object_name . "/"
-          . ( $year + 1900 ) . "/"
-          . ( $mon + 1 ) . "/"
-          . $mday . "\n";
-        print "Reading "
-          . $::config_parms{data_dir}
-          . "/object_logs/"
-          . $object_name . "/"
-          . ( $year + 1900 ) . "/"
-          . ( $mon + 1 ) . "/"
-          . $mday . "\n"
-          if (-e $::config_parms{data_dir}
-            . "/object_logs/"
-            . $object_name . "/"
-            . ( $year + 1900 ) . "/"
-            . ( $mon + 1 ) . "/"
-            . $mday
-            . ".log" );
+        #print "Epoch: $epoch is "
+        #  . $mday . "/"
+        #  . ( $mon + 1 ) . "/"
+        #  . ( $year + 1900 ) . "\n";
+        #print "Checking "
+        #  . $::config_parms{data_dir}
+        #  . "/object_logs/"
+        #  . $object_name . "/"
+        #  . ( $year + 1900 ) . "/"
+        #  . ( $mon + 1 ) . "/"
+        #  . $mday . "\n";
+        #print "Reading "
+        #  . $::config_parms{data_dir}
+        #  . "/object_logs/"
+        #  . $object_name . "/"
+        #  . ( $year + 1900 ) . "/"
+        #  . ( $mon + 1 ) . "/"
+        #  . $mday . "\n"
+        #  if (-e $::config_parms{data_dir}
+        #    . "/object_logs/"
+        #    . $object_name . "/"
+        #    . ( $year + 1900 ) . "/"
+        #    . ( $mon + 1 ) . "/"
+        #    . $mday
+        #    . ".log" );
         $data .=
           ::file_read( $::config_parms{data_dir}
               . "/object_logs/"