diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs
index 97b133f1b..9f590f525 100644
--- a/src/Text/Pandoc/Writers/Man.hs
+++ b/src/Text/Pandoc/Writers/Man.hs
@@ -92,7 +92,7 @@ notesToMan opts notes =
   if null notes
      then return empty
      else mapM (\(num, note) -> noteToMan opts num note) (zip [1..] notes) >>= 
-          (return . (text ".SH NOTES\n" <>) . vcat)
+          (return . (text ".SH NOTES" $$) . vcat)
 
 -- | Return man representation of a note.
 noteToMan :: WriterOptions -> Int -> [Block] -> State WriterState Doc