From d154002e063c1c3af5aba13cf05a11df8b8f9897 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 27 Sep 2016 12:36:37 -0400
Subject: Server: --motd can be used to provide a Message Of The Day.

This commit was sponsored by Anthony DeRobertis on Patreon.
---
 CmdLine.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'CmdLine.hs')

diff --git a/CmdLine.hs b/CmdLine.hs
index bb68623..6c5bafd 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -38,6 +38,7 @@ data ServerConfig = ServerConfig
 	{ serverPort :: Port
 	, serverAddress :: String
 	, monthsToFillHalfDisk :: Integer
+	, serverMotd :: Maybe T.Text
 	}
 
 parse :: Parser CmdLine
@@ -185,6 +186,11 @@ parseServerConfig = ServerConfig
 		<> showDefault
 		<> help "Server rate-limits requests and requires proof of work, to avoid too many objects being stored. This is an lower bound on how long it could possibly take for half of the current disk space to be filled."
 		)
+	<*> optional (T.pack <$> strOption 
+		( long "motd"
+		<> metavar "MESSAGE"
+		<> help "The server's Message Of The Day."
+		))
 
 get :: IO CmdLine
 get = execParser opts
-- 
cgit v1.2.3