From 8488711b567420728c28d1dedd77daf28750bfa8 Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <sarah.vaupel@uniworx.de>
Date: Wed, 19 Apr 2023 14:01:46 +0000
Subject: [PATCH] debug: add missing Debug.Trace import

---
 yesod-core/src/Yesod/Core/Internal/Run.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/yesod-core/src/Yesod/Core/Internal/Run.hs b/yesod-core/src/Yesod/Core/Internal/Run.hs
index 759fa2bc..eca2c8b6 100644
--- a/yesod-core/src/Yesod/Core/Internal/Run.hs
+++ b/yesod-core/src/Yesod/Core/Internal/Run.hs
@@ -40,6 +40,8 @@ import           Yesod.Routes.Class           (Route, renderRoute)
 import           Control.DeepSeq              (($!!), NFData)
 import           UnliftIO.Exception
 
+import Debug.Trace (traceStack)
+
 -- | Convert a synchronous exception into an ErrorResponse
 toErrorHandler :: SomeException -> IO ErrorResponse
 toErrorHandler e0 = handleAny errFromShow $