From 6a5661da637ac51691aac2f5a3a50b38c6ba2674 Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Tue, 6 Nov 2018 00:04:15 +0300
Subject: hlint Muse writer

---
 src/Text/Pandoc/Writers/Muse.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs
index 46aae113b..72a674cdc 100644
--- a/src/Text/Pandoc/Writers/Muse.hs
+++ b/src/Text/Pandoc/Writers/Muse.hs
@@ -331,7 +331,7 @@ blockToMuseWithNotes :: PandocMonad m
 blockToMuseWithNotes blk = do
   topLevel <- asks envTopLevel
   opts <- asks envOptions
-  let hdrToMuse hdr@(Header{}) = do
+  let hdrToMuse hdr@Header{} = do
         b <- blockToMuse hdr
         if topLevel && writerReferenceLocation opts == EndOfSection
           then do
-- 
cgit v1.2.3