projects
/
clearscm.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
68585f2
)
Changed polling to 1 minute
author
Andrew DeFaria
<Andrew@DeFaria.com>
Wed, 24 Apr 2019 16:36:09 +0000
(09:36 -0700)
committer
Andrew DeFaria
<Andrew@DeFaria.com>
Wed, 24 Apr 2019 16:36:09 +0000
(09:36 -0700)
bin/announceEmail.pl
patch
|
blob
|
history
diff --git
a/bin/announceEmail.pl
b/bin/announceEmail.pl
index
01c4226
..
3cbc12e
100755
(executable)
--- a/
bin/announceEmail.pl
+++ b/
bin/announceEmail.pl
@@
-44,7
+44,7
@@
$Date: 2019/04/04 13:40:10 $
-use|rname: User name to log in with (Default: $USER)
-p|assword: Password to use (Default: prompted)
-i|map: IMAP server to talk to (Default: defaria.com)
-use|rname: User name to log in with (Default: $USER)
-p|assword: Password to use (Default: prompted)
-i|map: IMAP server to talk to (Default: defaria.com)
- -s|leep: Number of minutes to sleep inbetween checking mail (Default:
5
)
+ -s|leep: Number of minutes to sleep inbetween checking mail (Default:
1
)
=head1 DESCRIPTION
=head1 DESCRIPTION
@@
-168,14
+168,15
@@
sub MonitorMail() {
} # if
# Now speak it!
} # if
# Now speak it!
+ my $logmsg = "From $from $subject";
my $msg = "Message from $from... " . quotemeta $subject;
$msg =~ s/\"/\\"/g;
if (get_verbose) {
my $msg = "Message from $from... " . quotemeta $subject;
$msg =~ s/\"/\\"/g;
if (get_verbose) {
- $log->msg(
"Announcing $msg"
);
+ $log->msg(
$logmsg
);
} else {
} else {
- $log->log(
"Announcing $msg")
- }
+ $log->log(
$logmsg);
+ }
# if
my $cmd = "/usr/local/bin/gt \"$msg\"";
my $cmd = "/usr/local/bin/gt \"$msg\"";