From 0986cc87d2c93dbf611e2b6fbe9219e3d8dbc710 Mon Sep 17 00:00:00 2001
From: Lieven Hollevoet <hollie@lika.be>
Date: Sun, 5 Mar 2017 21:36:43 +0100
Subject: [PATCH 1/2] Removes the deugging prints as requested by @hplato

---
 lib/Generic_Item.pm | 38 +++++++++++++++++++-------------------
 1 file changed, 19 insertions(+), 19 deletions(-)

diff --git a/lib/Generic_Item.pm b/lib/Generic_Item.pm
index 5cda0668c..1dab04fa8 100644
--- a/lib/Generic_Item.pm
+++ b/lib/Generic_Item.pm
@@ -1386,27 +1386,27 @@ 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"
+        #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 . "/"

From 07fdb887dfb834884b685be772fcc697912df5bc Mon Sep 17 00:00:00 2001
From: Lieven Hollevoet <hollie@lika.be>
Date: Sun, 5 Mar 2017 21:42:57 +0100
Subject: [PATCH 2/2] Comments the last debug line completely

---
 lib/Generic_Item.pm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lib/Generic_Item.pm b/lib/Generic_Item.pm
index 1dab04fa8..a8b82362f 100644
--- a/lib/Generic_Item.pm
+++ b/lib/Generic_Item.pm
@@ -1407,13 +1407,13 @@ sub get_logger_data {
         #  . ( $year + 1900 ) . "/"
         #  . ( $mon + 1 ) . "/"
         #  . $mday . "\n"
-          if (-e $::config_parms{data_dir}
-            . "/object_logs/"
-            . $object_name . "/"
-            . ( $year + 1900 ) . "/"
-            . ( $mon + 1 ) . "/"
-            . $mday
-            . ".log" );
+        #  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/"