diff options
| -rw-r--r-- | src/Text/Pandoc/Class/IO.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Class/IO.hs b/src/Text/Pandoc/Class/IO.hs index 4c0d7b1ab..612ab7f51 100644 --- a/src/Text/Pandoc/Class/IO.hs +++ b/src/Text/Pandoc/Class/IO.hs @@ -188,7 +188,8 @@ openURL u Left (e :: HttpException) -> throwError $ PandocHttpError u (T.pack (show e)) #else - | otherwise = error "Text.Pandoc.Class.IO.openURL" + | otherwise = + throwError $ PandocHttpError u "pandoc was compiled without HTTP support" #endif -- | Read the lazy ByteString contents from a file path, raising an error on |