From 963c135da14cf1be5d09368ab6e19b4907779ac9 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Sat, 22 Aug 2020 14:50:36 +0200 Subject: Add link to repo --- server/lib/Uplcg/Views.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/server/lib/Uplcg/Views.hs b/server/lib/Uplcg/Views.hs index 9e453e8..c3ef1cc 100644 --- a/server/lib/Uplcg/Views.hs +++ b/server/lib/Uplcg/Views.hs @@ -28,7 +28,11 @@ template title body = H.docTypeHtml $ do H.meta H.! A.name "viewport" H.! A.content "width=device-width" H.body $ do body - H.footer $ "Untitled PL Card Game version " <> H.toHtml version + H.footer $ do + H.a H.! A.href "https://github.com/jaspervdj/uplcg" $ + "Untitled PL Card Game" + " version " + H.toHtml version rooms :: [RoomView] -> [Deck] -> H.Html rooms rids decks = template "Untitled PL Card Game" $ -- cgit v1.2.3