summaryrefslogtreecommitdiff
path: root/Pancake/Configuration.hs
diff options
context:
space:
mode:
authordefanor <defanor@uberspace.net>2017-11-24 06:20:12 +0300
committerdefanor <defanor@uberspace.net>2017-11-24 06:20:12 +0300
commit3a1c8854d0d08cdeaf089c750c8843be2d8df247 (patch)
treeadd776f6e2228e46d52fdd02f1a4464c69d392df /Pancake/Configuration.hs
parent6f335b9bb792a8d1133676b60518efdd84cf3886 (diff)
Make div indentation optional
Diffstat (limited to 'Pancake/Configuration.hs')
-rw-r--r--Pancake/Configuration.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/Pancake/Configuration.hs b/Pancake/Configuration.hs
index 2d20985..9253750 100644
--- a/Pancake/Configuration.hs
+++ b/Pancake/Configuration.hs
@@ -47,7 +47,10 @@ data Config = Config { commands :: M.Map String String
, referenceDigits :: String
-- ^ Digits to use for reference numbering, must
-- be unique.
- } deriving (Generic, Show)
+ , indentDivs :: Bool
+ -- ^ Whether to add indentation for elements
+ -- inside divs.
+ } deriving (Generic, Show, Eq)
-- | For configuration parsing.
instance FromJSON Config
@@ -82,6 +85,7 @@ instance Default Config where
, paginate = True
, historyDepth = 100
, referenceDigits = "0123456789"
+ , indentDivs = False
}
-- | Loads configuration from an XDG config directory.