@@ -4,6 +4,6 @@ main :: IO ()
4main = toJSONFilter removeLinks
4main = toJSONFilter removeLinks
6removeLinks :: Inline -> [Inline]
6removeLinks :: Inline -> [Inline]
7−removeLinks (Link l _) = l
7+removeLinks (Link _ l _) = l
8removeLinks x = [x]
8removeLinks x = [x]