From f2deb9d86d864c79c5ca18205b4ca565b7199413 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 5 Apr 2014 15:50:46 -0700 Subject: Org reader: Added type signature. --- src/Text/Pandoc/Readers/Org.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Text/Pandoc/Readers/Org.hs b/src/Text/Pandoc/Readers/Org.hs index 8b1b4fa23..5ad2531ac 100644 --- a/src/Text/Pandoc/Readers/Org.hs +++ b/src/Text/Pandoc/Readers/Org.hs @@ -613,6 +613,7 @@ endsOnThisLine input c doOnOtherLines = do else endsOnThisLine rest c doOnOtherLines _ -> mzero +isImage :: String -> Bool isImage filename = any (\x -> ('.':x) `isSuffixOf` filename) imageExtensions && any (\x -> (x++":") `isPrefixOf` filename) protocols || -- cgit v1.2.3