diff options
| -rwxr-xr-x | bin/generate-mirror-mail.pl | 3 | ||||
| -rw-r--r-- | settings.conf | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/bin/generate-mirror-mail.pl b/bin/generate-mirror-mail.pl index 64e3a5d..bdd4234 100755 --- a/bin/generate-mirror-mail.pl +++ b/bin/generate-mirror-mail.pl @@ -35,7 +35,6 @@ Missing from the mail are: =cut # TODO: put this in a config file -my $sender = 'bluewind@xinu.at'; #$ENV{HTTPS_CA_FILE} = '/etc/ssl/certs/ca-certificates.crt'; @@ -92,7 +91,7 @@ sub send_mail { open my $fh, "|compose-mail-from-stdin" or die "Failed to run mailer: $!"; print $fh "To: $to\n"; - print $fh "From: $sender\n"; + printf $fh "From: %s\n", $Config->{misc}->{email_from}; print $fh "Subject: $subject\n"; print $fh "\n"; print $fh "$body"; diff --git a/settings.conf b/settings.conf index 6367e1f..e1f4ab3 100644 --- a/settings.conf +++ b/settings.conf @@ -1,3 +1,6 @@ [account] username=foo password=bar + +[misc] +email_from = "foo@bar.com" |