Merge branch 'master' of github.com:digitallyinduced/ihp

digitallyinduced · Mar 13, 2024 · a9c1857 · a9c1857
2 parents da05bbe + d4e8d1f
commit a9c1857
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/IHP/ErrorController.hs b/IHP/ErrorController.hs
@@ -78,11 +78,12 @@ displayException exception action additionalInfo = do
     -- to the error tracking service (e.g. sentry). Usually this service also writes
     -- the error message to the stderr output
     --
-    let exceptionTracker = ?applicationContext.frameworkConfig.exceptionTracker.onException
-    let request = ?requestContext.request
+    when (?context.frameworkConfig.environment == Environment.Production) do
+        let exceptionTracker = ?applicationContext.frameworkConfig.exceptionTracker.onException
+        let request = ?requestContext.request
 
 
-    exceptionTracker (Just request) exception
+        exceptionTracker (Just request) exception
 
     supportingHandlers
         |> head