From be602ba6e3d48bc4e2dd59036d9c90c83008a1e5 Mon Sep 17 00:00:00 2001
From: Marc Scholten <marc@digitallyinduced.com>
Date: Sat, 5 Sep 2020 14:02:39 +0200
Subject: [PATCH] Added throw, throwIO, catch to default IHP prelude

---
 IHP/Prelude.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/IHP/Prelude.hs b/IHP/Prelude.hs
index 558a8fed2..921f67fdb 100644
--- a/IHP/Prelude.hs
+++ b/IHP/Prelude.hs
@@ -31,6 +31,7 @@ module IHP.Prelude
 , module Data.IORef
 , module Data.Time.Format
 , null
+, module Control.Exception
 )
 where
 
@@ -61,6 +62,7 @@ import Data.TMap (TMap)
 import Database.PostgreSQL.Simple (FromRow)
 import Data.IORef
 import Data.Time.Format
+import Control.Exception (throw, throwIO, catch)
 
 -- Alias for haskell newcomers :)
 a ++ b = a <> b