Added debug logging to certbot scripts

[clearscm.git] / bin / announceEmail.pl

diff --git a/bin/announceEmail.pl b/bin/announceEmail.pl
index 073e039..3b9d52a 100755 (executable)
--- a/bin/announceEmail.pl
+++ b/bin/announceEmail.pl
@@ -262,9 +262,9 @@ sub MonitorMail() {
     if ($hour >= 7) {
       $log->msg($logmsg);
       $log->dbug("Calling speak");
-      speak $msg;
+      speak $msg, $log;
     } else {
-      $log->msg("$logmsg [silent]");
+      $log->msg("$logmsg [silent nighttime]");
     } # if
 
     $unseen{$_} = 1;
@@ -274,7 +274,7 @@ sub MonitorMail() {
   my $startTime = time;
 
   # Re-establish callback
-  $log->msg("Calling IMAP->idle");
+  $log->dbug("Calling IMAP->idle");
   eval {
     $IMAP->idle(\&MonitorMail, $opts{timeout})
   };