From 05e0d837fafddb93511721ab54008c11c86a00fe Mon Sep 17 00:00:00 2001 From: fr33domlover Date: Mon, 6 Jun 2016 14:13:33 +0000 Subject: [PATCH] In group page, link to group members page --- src/Vervis/Handler/Group.hs | 2 +- templates/group/one.hamlet | 16 ++++++++++++++++ 2 files changed, 17 insertions(+), 1 deletion(-) create mode 100644 templates/group/one.hamlet diff --git a/src/Vervis/Handler/Group.hs b/src/Vervis/Handler/Group.hs index c8b4986..58da5ad 100644 --- a/src/Vervis/Handler/Group.hs +++ b/src/Vervis/Handler/Group.hs @@ -105,7 +105,7 @@ getGroupR shar = do Entity sid _s <- getBy404 $ UniqueSharer shar Entity _gid g <- getBy404 $ UniqueGroup sid return g - defaultLayout $ return () + defaultLayout $(widgetFile "group/one") getGroupMembersR :: ShrIdent -> Handler Html getGroupMembersR shar = do diff --git a/templates/group/one.hamlet b/templates/group/one.hamlet new file mode 100644 index 0000000..f953a22 --- /dev/null +++ b/templates/group/one.hamlet @@ -0,0 +1,16 @@ +$# This file is part of Vervis. +$# +$# Written in 2016 by fr33domlover . +$# +$# ♡ Copying is an act of love. Please copy, reuse and share. +$# +$# The author(s) have dedicated all copyright and related and neighboring +$# rights to this software to the public domain worldwide. This software is +$# distributed without any warranty. +$# +$# You should have received a copy of the CC0 Public Domain Dedication along +$# with this software. If not, see +$# . + +

+ Members