From e5bde183a5a44693a7d3cde72e8b40986ea03fad Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sun, 3 Mar 2024 17:12:29 +0100 Subject: Support extracting gzip on the fly --- lib/SlackBuilder/Trans.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lib/SlackBuilder/Trans.hs') diff --git a/lib/SlackBuilder/Trans.hs b/lib/SlackBuilder/Trans.hs index 4ee3668..8d1d5b6 100644 --- a/lib/SlackBuilder/Trans.hs +++ b/lib/SlackBuilder/Trans.hs @@ -16,8 +16,11 @@ import Control.Monad.IO.Class (MonadIO(..)) import Control.Monad.Catch (MonadCatch(..), MonadThrow(..)) import Control.Exception (Exception(..)) import System.FilePath (()) +import Text.URI (URI) -newtype SlackBuilderException = UpdaterNotFound Text +data SlackBuilderException + = UpdaterNotFound Text + | HttpsUrlExpected URI deriving Show instance Exception SlackBuilderException -- cgit v1.2.3