From 2377a9b1c3de67278d0956683bb0dffc47117092 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Thu, 12 Apr 2012 22:21:34 -0400 Subject: [PATCH] Add the Configuration module containing the Cfg type. --- src/Configuration.hs | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/Configuration.hs diff --git a/src/Configuration.hs b/src/Configuration.hs new file mode 100644 index 0000000..248c91f --- /dev/null +++ b/src/Configuration.hs @@ -0,0 +1,14 @@ +-- | This module defines the 'Cfg' type, which is just a wrapper +-- around all of the configuration options we accept on the command +-- line. We thread this throughout the rest of the program. +module Configuration ( + Cfg(..) +) +where + +data Cfg = Cfg { heartbeat :: Int, + ignore_replies :: Bool, + ignore_retweets :: Bool, + from_address :: Maybe String, + to_address :: Maybe String, + verbose :: Bool } -- 2.43.2