@@ -215,7 +215,7 @@ transformInlines (MathML _) _ _ (x@(Math _ _) : xs) = do
215 return $ HtmlInline result : xs
215 return $ HtmlInline result : xs
216transformInlines _ _ _ (HtmlInline _ : xs) = return $ Str "" : xs
216transformInlines _ _ _ (HtmlInline _ : xs) = return $ Str "" : xs
217transformInlines _ _ _ (Link lab (_,_) : xs) = return $ lab ++ xs
217transformInlines _ _ _ (Link lab (_,_) : xs) = return $ lab ++ xs
218−transformInlines mathmethod sourceDir picsRef xs = return xs
218+transformInlines _ _ _ xs = return xs
220transformBlock :: Block -> Block
220transformBlock :: Block -> Block
221transformBlock (RawHtml _) = Null
221transformBlock (RawHtml _) = Null