From 750b4e57a5a9726d69faf3a04dbbef72bceabefc Mon Sep 17 00:00:00 2001
From: Ramana Kumar <ramana@member.fsf.org>
Date: Mon, 13 Nov 2017 13:31:54 +1100
Subject: [PATCH] Change from address for build emails

---
 serverLib.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/serverLib.sml b/serverLib.sml
index f9774ca..9a3a527 100644
--- a/serverLib.sml
+++ b/serverLib.sml
@@ -269,7 +269,7 @@ in
     let
       val () = output_to_file (email_file,body)
       val mail_cmd = ("/usr/bin/mail",
-        ["-s",subject,"-m",email_file,"-.",to_address])
+        ["-s",subject,"-r",to_address,"-m",email_file,"-.",to_address])
     in
       system_output cgi_die mail_cmd
     end