mirror of
https://github.com/jgm/pandoc.git
synced 2026-08-26 18:26:36 +00:00
10 lines
156 B
Haskell
10 lines
156 B
Haskell
import Text.Pandoc.JSON
|
|
|
|
main :: IO ()
|
|
main = toJSONFilter removeLinks
|
|
|
|
removeLinks :: Inline -> [Inline]
|
|
removeLinks (Link _ l _) = l
|
|
removeLinks x = [x]
|
|
|