git.iko.soy/typeable/pandoc
on master help sign in
Markdown reader: don't create implicit reference for empty header.
f82d91eJohn MacFarlane
src/Text/Pandoc/Readers/Markdown.hs+7−4
@@ -589,10 +589,13 @@ setextHeader = try $ do
589 return $ B.headerWith attr' level <$> text
589 return $ B.headerWith attr' level <$> text
590
590
591registerImplicitHeader :: PandocMonad m => String -> Attr -> MarkdownParser m ()
591registerImplicitHeader :: PandocMonad m => String -> Attr -> MarkdownParser m ()
592−registerImplicitHeader raw attr@(ident, _, _) = do
592+registerImplicitHeader raw attr@(ident, _, _)
593+ | null raw = return ()
594+ | otherwise = do
593− let key = toKey $ "[" ++ raw ++ "]"
595+ let key = toKey $ "[" ++ raw ++ "]"
594− updateState (\s -> s { stateHeaderKeys =
596+ updateState $ \s ->
597+ s { stateHeaderKeys = M.insert key (('#':ident,""), attr)
595− M.insert key (('#':ident,""), attr) (stateHeaderKeys s) })
598+ (stateHeaderKeys s) }
596
599
597--
600--
598-- hrule block
601-- hrule block
test/command/5549.mdnew file+9
@@ -0,0 +1,9 @@
1+```
2+% pandoc -t native
3+##
4+
5+[]
6+^D
7+[Header 2 ("section",[],[]) []
8+,Para [Str "[]"]]
9+```