Don't crash if setLayout has not been called in the request lifecycle

digitallyinduced · Nov 18, 2020 · 3b678d1 · 3b678d1
1 parent 3147eca
commit 3b678d1
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/IHP/Controller/Render.hs b/IHP/Controller/Render.hs
@@ -44,7 +44,9 @@ renderHtml !view = do
     frozenContext <- Context.freeze ?context
 
     let ?context = frozenContext
-    let (ViewLayout layout) = Context.fromFrozenContext @ViewLayout
+    let layout = case Context.maybeFromFrozenContext @ViewLayout of
+            Just (ViewLayout layout) -> layout
+            Nothing -> id
 
     let boundHtml = let ?context = frozenContext in layout (ViewSupport.html ?view)
     pure boundHtml