From a33580976785be74901daf5956dfe1def67d3f39 Mon Sep 17 00:00:00 2001
From: Targuinia <9700425+Targuinia@users.noreply.github.com>
Date: Tue, 26 Oct 2021 16:52:29 +0200
Subject: [PATCH 1/2] Fix Haddock comments in XMonad.Hooks.FadeWindows

Some Haddocks comments were for the wrong declaration (-- ^ instead of -- |)
---
 XMonad/Hooks/FadeWindows.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/XMonad/Hooks/FadeWindows.hs b/XMonad/Hooks/FadeWindows.hs
index f77bbfc3..cd4ac574 100644
--- a/XMonad/Hooks/FadeWindows.hs
+++ b/XMonad/Hooks/FadeWindows.hs
@@ -172,17 +172,17 @@ opacity :: Rational -- ^ The opacity of a window as a fraction.
 opacity =  doS . Opacity . clampRatio
 
 fadeTo, translucence, fadeBy :: Rational -> FadeHook
--- ^ An alias for 'transparency'.
+-- | An alias for 'transparency'.
 fadeTo       = transparency
--- ^ An alias for 'transparency'.
+-- | An alias for 'transparency'.
 translucence = transparency
--- ^ An alias for 'transparency'.
+-- | An alias for 'transparency'.
 fadeBy       = opacity
 
 invisible, solid :: FadeHook
--- ^ An alias for 'transparent'.
+-- | An alias for 'transparent'.
 invisible    = transparent
--- ^ An alias for 'opaque'.
+-- | An alias for 'opaque'.
 solid        = opaque
 
 -- | Like 'doF', but usable with 'ManageHook'-like hooks that

From 9824b57d126efc43e1c65db5b89b42e72f6c6f3d Mon Sep 17 00:00:00 2001
From: Targuinia <9700425+Targuinia@users.noreply.github.com>
Date: Tue, 26 Oct 2021 17:03:12 +0200
Subject: [PATCH 2/2] Corrected a comment in XMonad.Hooks.FadeWindows

---
 XMonad/Hooks/FadeWindows.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/XMonad/Hooks/FadeWindows.hs b/XMonad/Hooks/FadeWindows.hs
index cd4ac574..0ea41197 100644
--- a/XMonad/Hooks/FadeWindows.hs
+++ b/XMonad/Hooks/FadeWindows.hs
@@ -176,7 +176,7 @@ fadeTo, translucence, fadeBy :: Rational -> FadeHook
 fadeTo       = transparency
 -- | An alias for 'transparency'.
 translucence = transparency
--- | An alias for 'transparency'.
+-- | An alias for 'opacity'.
 fadeBy       = opacity
 
 invisible, solid :: FadeHook