From 211086aa91b5ed7f9525bf82793fc8525a55f185 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Sat, 11 Mar 2017 21:42:41 +0100 Subject: Guess Approot --- bragi/bar.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'bragi') diff --git a/bragi/bar.hs b/bragi/bar.hs index 64650779..61d24119 100755 --- a/bragi/bar.hs +++ b/bragi/bar.hs @@ -123,7 +123,8 @@ mkYesod "BarInventory" [parseRoutes| /#ItemId/delete DeleteItemR POST |] -instance Yesod BarInventory +instance Yesod BarInventory where + approot = guessApproot instance RenderMessage BarInventory FormMessage where renderMessage _ _ = defaultFormMessage -- cgit v1.2.3