changeset 609:7eb71958a09e

Add display limitation buttons in listentry()
author HIROSE Yuuji <yuuji@gentei.org>
date Fri, 17 Apr 2020 07:18:07 +0900
parents 07ec77f4e224
children dfd83a6d09fb
files examples/common/default/default.css s4-funcs.sh
diffstat 2 files changed, 19 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/examples/common/default/default.css	Mon Apr 13 20:33:18 2020 +0900
+++ b/examples/common/default/default.css	Fri Apr 17 07:18:07 2020 +0900
@@ -280,6 +280,11 @@
 div.iconlist p._info	{background: #eff;} /* light cyan */
 div.iconlist p._support	{background: #ffe;} /* light yellow */
 div.iconlist p._test	{background: #ffb6c1;} /* light pink */
+input#ismembtn:checked ~ div.iconlist,
+input#isadmbtn:checked ~ div.iconlist {display: none;}
+input#ismembtn:checked ~ div.iconlist.Member,
+input#isadmbtn:checked ~ div.iconlist.ADMIN,
+input#ismembtn:checked ~ div.iconlist.ADMIN {display: block;}
 div.xy120x120 {min-width: 120px; min-height: 140px;}
 div.xy96x96 {min-width: 96px; min-height: 116px;}
 div.xy96x96 img {max-width: 96px;}
--- a/s4-funcs.sh	Mon Apr 13 20:33:18 2020 +0900
+++ b/s4-funcs.sh	Fri Apr 17 07:18:07 2020 +0900
@@ -2148,11 +2148,11 @@
  	  as name,
 	 b.tag,
 	case when a.$nm in (select user from grp_adm
-		where gname=$getgrp) then '(管理者)'
+		where gname=$getgrp) then '管理者'
 	     when '$user' in (select user from grp_adm where gname=a.$nm)
-		then '(ADMIN)'
+		then 'ADMIN'
 	     when '$user' in (select user from grp_mem where gname=a.$nm)
-		then '(Member)'
+		then 'Member'
 	     when '$iamowner' = '' then ''
 	     else ',not='||a.rowid end as ownerlink,
 	CASE '$entity'
@@ -2184,6 +2184,14 @@
 ## err LE:sql.1="$sql"
   total=`query "with x as ($sql) select count(*) from x;"`
   echo "${entity} 一覧" | html h2
+  echo '<div class="listentry">'		# List-entry div
+  # Show owner/member filter button
+  cat<<-EOF
+	`cgi_checkbox onlymem no 'id="ismembtn"'`<label
+	for="ismembtn">参加中のみ表示</label>
+	`cgi_checkbox onlyadm no 'id="isadmbtn"'`<label
+	for="isadmbtn">管理者参加のみ表示</label>
+	EOF
   METHOD=GET
   if [ $total -gt $limit ]; then
     echo '<div class="right">'
@@ -2234,7 +2242,7 @@
     # err newlnk=$lnk regmode=$regmode
     icondir=$dir/$id
     # Pick up only last icon
-    echo "<div class=\"iconlist xy$thumbxy $type\">
+    echo "<div class=\"iconlist xy$thumbxy $type $ownerp\">
 	<p class=\"tag _$tag\">$tag</p>" \
 	| _m4 $tagconv
     if [ -n "$NOSPEEDUP" ]; then
@@ -2261,9 +2269,10 @@
 	iconhref2 "$dir/$deficon" "$hrb+$lnk" "$gecos"
       fi
     fi
-    echo "<br>$name${ownerp:+<br>$ownerp}"
+    echo "<br>$name${ownerp:+<br>($ownerp)}"
     echo "</div>"
   done
+  echo "</div>"					# End of List-entry div
   echo ${pnbtn:+"<hr>$nextbtn$prevbtn"}
 )
 listmember() {

yatex.org