git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: get rid of non-exhaustive pattern match warning
commit0fc7d38544346779051c2e25fb1d6f9c98a83a00 authormb21 <mb21@users.noreply.github.com> dateFri 1 Jun 2018, 15:35 (8 years ago) parent5fbc981
1 file changed+1−1
src/Text/Pandoc/Readers/Muse.hs+1−1
src/Text/Pandoc/Readers/Muse.hs+1−1
@@ -974,7 +974,7 @@ image = try $ do
974974 Just 'r' -> ["align-right"]
975975 Just 'l' -> ["align-left"]
976976 Just 'f' -> []
977− Nothing -> []
977+ _ -> []
978978 return $ B.imageWith ("", alignClass, widthAttr) (url ++ ext) mempty <$> fromMaybe (return mempty) content
979979 where -- Taken from muse-image-regexp defined in Emacs Muse file lisp/muse-regexps.el
980980 imageExtensions = [".eps", ".gif", ".jpg", ".jpeg", ".pbm", ".png", ".tiff", ".xbm", ".xpm"]