aboutsummaryrefslogtreecommitdiff
path: root/Data
diff options
context:
space:
mode:
Diffstat (limited to 'Data')
-rw-r--r--Data/ConfigManager.hs6
-rw-r--r--Data/ConfigManager/Types.hs2
-rw-r--r--Data/ConfigManager/Types/Internal.hs10
3 files changed, 9 insertions, 9 deletions
diff --git a/Data/ConfigManager.hs b/Data/ConfigManager.hs
index bd62f40..00968f5 100644
--- a/Data/ConfigManager.hs
+++ b/Data/ConfigManager.hs
@@ -65,7 +65,7 @@ lookupDefault defaultValue name config = M.lookupDefault defaultValue name (hash
-- $bindings
--
--- A binding associates a name to a value.
+-- A binding associates a name to a value:
--
-- > number = 1
-- > my-string = "Hello"
@@ -82,9 +82,9 @@ lookupDefault defaultValue name config = M.lookupDefault defaultValue name (hash
-- > import "database.conf"
-- > importMaybe "local.conf"
--- $comment
+-- $comments
--
--- A comment begins with '#' and continues to the end of the line.
+-- A comment begins with '#' and continues to the end of the line:
--
-- > # Comment
-- > x = 8 # Another comment
diff --git a/Data/ConfigManager/Types.hs b/Data/ConfigManager/Types.hs
index ddc578f..ea2691f 100644
--- a/Data/ConfigManager/Types.hs
+++ b/Data/ConfigManager/Types.hs
@@ -4,7 +4,7 @@
-- Maintainer: Joris Guyonvarch <joris@guyonvarch.me>
-- Stability: experimental
--
--- Types for working with configuration files.
+-- Configuration management types.
module Data.ConfigManager.Types
( Config(..)
diff --git a/Data/ConfigManager/Types/Internal.hs b/Data/ConfigManager/Types/Internal.hs
index 5b91802..c4d5d0e 100644
--- a/Data/ConfigManager/Types/Internal.hs
+++ b/Data/ConfigManager/Types/Internal.hs
@@ -10,28 +10,28 @@ import Data.Text (Text)
import Data.HashMap.Strict
--- | Configuration data
+-- | Configuration data.
data Config = Config
{ hashMap :: HashMap Name Value
} deriving (Eq, Read, Show)
--- | An expression is either a binding or an import
+-- | An expression is either a binding or an import.
data Expr =
Binding Name Value
| Import Requirement FilePath
deriving (Eq, Read, Show)
--- | A name is a text
+-- | A name is a text.
type Name = Text
--- | A value is a text
+-- | A value is a text.
type Value = Text
--- | A requirement is either required or optional
+-- | A requirement is either required or optional.
data Requirement =
Required