# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1455177980 -32399
# Node ID cdade692e17d6b7854d4c2b03ca6b363b5a777a6
# Parent  45d6954af516b061d9a1af390d7e3cdc66a29d63
Add "is-member" flag to group list

diff -r 45d6954af516 -r cdade692e17d s4-funcs.sh
--- a/s4-funcs.sh	Fri Jan 29 15:20:12 2016 +0859
+++ b/s4-funcs.sh	Thu Feb 11 17:06:19 2016 +0859
@@ -1533,6 +1533,8 @@
 		where gname=$getgrp) then '(管理者)'
 	     when '$user' in (select user from grp_adm where gname=a.$nm)
 		then '(ADMIN)'
+	     when '$user' in (select user from grp_mem where gname=a.$nm)
+		then '(Member)'
 	     when '$iamowner' = '' then ''
 	     else ',not='||a.rowid end as ownerlink
 	from $tbl a left join