diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-16 14:46:12 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-16 15:33:06 -0700 |
| commit | 7f811ead29f993ab19fb6b9c48ef582e24977aee (patch) | |
| tree | 140afd9e9dd701ab58f6f5dda8b02f9e7c4f9366 /bin | |
| parent | ab682898b7bf9731b31aa2b13244297ca4a84985 (diff) | |
| download | dotfiles-7f811ead29f993ab19fb6b9c48ef582e24977aee.tar.gz | |
send-irssi-away-log: simplify From: header
Thanks to consfig commit bb70ec50fb012d69ebdee4d2d8f37614621af12f.
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/send-irssi-away-log | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/bin/send-irssi-away-log b/bin/send-irssi-away-log index 4f29a9cc..b7df1dcc 100755 --- a/bin/send-irssi-away-log +++ b/bin/send-irssi-away-log @@ -5,7 +5,6 @@ use strict; use warnings; use Text::Wrap; -use File::Basename; our $away_log = "$ENV{HOME}/local/irclogs/away.log"; exit unless -r $away_log; @@ -30,7 +29,7 @@ exit unless @lines; open my $mail, "|-", "/usr/sbin/sendmail -t"; say $mail "To: spwhitton"; -say $mail "From: " . basename $0 . " (Cron Daemon)"; +say $mail "From: spwhitton (Cron Daemon)"; say $mail "Subject: Irssi away.log new messages"; print $mail "\n"; print $mail "$_\n\n" for @lines; |