git.iko.soy/typeable/pandoc
on 1.15.0.3 help sign in
typeable/pandoc/man/removeLinks.hs
9 lines 154 B history raw
1import Text.Pandoc.JSON
3main :: IO ()
4main = toJSONFilter removeLinks
6removeLinks :: Inline -> [Inline]
7removeLinks (Link l _) = l
8removeLinks x = [x]