summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-05-09 11:46:09 -0400
committerJoey Hess <joeyh@joeyh.name>2017-05-09 11:46:09 -0400
commit06c9a1fa4fd3d200e5f0b45d6e4f319789cd5582 (patch)
treeb15789ceb889c3c27ed11a9cdbfcc8b8233746e7
parent947961f05250b20e7ff299427fb6cbc3b4341f71 (diff)
downloaddebug-me-06c9a1fa4fd3d200e5f0b45d6e4f319789cd5582.tar.gz
Server: Use "postmaster" as default --from-email address rather than "unknown@server".
-rw-r--r--CHANGELOG7
-rw-r--r--Server.hs2
2 files changed, 8 insertions, 1 deletions
diff --git a/CHANGELOG b/CHANGELOG
index 4a5f90f..d67d173 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,10 @@
+debug-me (1.20170506) UNRELEASED; urgency=medium
+
+ * Server: Use "postmaster" as default --from-email address
+ rather than "unknown@server".
+
+ -- Joey Hess <id@joeyh.name> Tue, 09 May 2017 11:45:41 -0400
+
debug-me (1.20170505) unstable; urgency=medium
* First release of debug-me.
diff --git a/Server.hs b/Server.hs
index d7a43a0..ce4242c 100644
--- a/Server.hs
+++ b/Server.hs
@@ -262,7 +262,7 @@ emailSessionLog email o logfile
| otherwise = return ()
where
to = Address Nothing email
- from = Address Nothing $ fromMaybe "unknown@server" (serverEmail o)
+ from = Address Nothing $ fromMaybe "postmaster" (serverEmail o)
subject = "Your recent debug-me session"
body = "Attached is the log from your recent debug-me session."
isemail = "@" `T.isInfixOf` email