From 5afb14d1cbcea672470569ffbb6493c965a694b7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jan=20Hamal=20Dvo=C5=99=C3=A1k?= <mordae@anilinux.org>
Date: Sun, 4 Oct 2020 14:31:10 +0200
Subject: [PATCH] Minor doc touchups
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Jan Hamal Dvořák <mordae@anilinux.org>
---
 lib/Hikaru/Action.hs | 2 +-
 lib/Hikaru/Config.hs | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lib/Hikaru/Action.hs b/lib/Hikaru/Action.hs
index 464625e..188dc3c 100644
--- a/lib/Hikaru/Action.hs
+++ b/lib/Hikaru/Action.hs
@@ -354,7 +354,7 @@ where
 
   -- |
   -- Obtain the Content-Type header value or the default value of
-  -- @\"application/octet-stream\"@ (true, but meaningless).
+  -- @\"application/octet-stream\"@ (always true, but meaningless).
   --
   getContentType :: (MonadAction m) => m Media
   getContentType = do
diff --git a/lib/Hikaru/Config.hs b/lib/Hikaru/Config.hs
index 78c655d..e7c5777 100644
--- a/lib/Hikaru/Config.hs
+++ b/lib/Hikaru/Config.hs
@@ -12,11 +12,11 @@ This module provides means to read configuration from environment and files.
 Example:
 
 @
-  base <- 'configDefault'
-  file <- 'configFromFile' \"site.env\"
-  env  <- 'configFromEnv'
+base <- 'configDefault'
+file <- 'configFromFile' \"site.env\"
+env  <- 'configFromEnv'
 
-  let cfg = env <> file <> base
+let cfg = env <> file <> base
 @
 -}
 
-- 
GitLab