- strictify

[infobot.git] / src / Modules / Uptime.pl

diff --git a/src/Modules/Uptime.pl b/src/Modules/Uptime.pl
index 8be74bf6a7eaacbd6ad4f34d0c29a729c7fa1c18..d433952f8be94f85dffbbe10e8e474af68ce1953 100644 (file)
--- a/src/Modules/Uptime.pl
+++ b/src/Modules/Uptime.pl
@@ -5,7 +5,7 @@
 #   Created: 19990925.
 #
 
-use strict;
+# use strict;  # TODO
 
 my $uptimerecords      = 3;
 
@@ -29,8 +29,6 @@ sub uptimeGetInfo {
   my @results;
   my $file = $file{utm};
 
-  &::DEBUG("uGI: reading $file...");
-
   if (!open(IN, $file)) {
     &status("Writing uptime file for first time usage (nothing special).");
     open(OUT,">$file");
@@ -85,9 +83,11 @@ sub uptimeWriteFile {
   }
 
   close OUT;
+  &status("--- Saved uptime records.");
+
+  return unless defined $conn;
 
   $conn->schedule(&getRandomInt("1800-3600"), \&uptimeWriteFile, "");
-  return;
 }
 
 1;