From 3eae057004597db4d41cdcc3770d5c7e22c50d15 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 24 Feb 2026 14:25:57 -0500 Subject: Update --- fig-web/src/Fig/Web/Module/Shader.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'fig-web/src/Fig/Web/Module/Shader.hs') diff --git a/fig-web/src/Fig/Web/Module/Shader.hs b/fig-web/src/Fig/Web/Module/Shader.hs index cb21d30..e5dfc95 100644 --- a/fig-web/src/Fig/Web/Module/Shader.hs +++ b/fig-web/src/Fig/Web/Module/Shader.hs @@ -11,7 +11,7 @@ import qualified Fig.Web.DB as DB public :: PublicModule public a = do onGet "/api/shader" do - DB.get a.db "shader" >>= \case + DB.run a.db (DB.get "shader") >>= \case Nothing -> do status status404 respondText "no shader present" -- cgit v1.2.3