Mercurial > hgrepos > hgweb.cgi > s4
comparison s4-funcs.sh @ 987:e71a86651d72 draft
Table in GrpAction page contains userid(localpart) for summary
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Sun, 31 Jul 2022 15:26:18 +0900 |
parents | fb0ffa47e0f3 |
children | e77d6258ad54 |
comparison
equal
deleted
inserted
replaced
986:fb0ffa47e0f3 | 987:e71a86651d72 |
---|---|
3203 WHERE gname=(SELECT gname FROM grp WHERE rowid=$grid) | 3203 WHERE gname=(SELECT gname FROM grp WHERE rowid=$grid) |
3204 AND user=up.name) IS NOT NULL | 3204 AND user=up.name) IS NOT NULL |
3205 then 'k' | 3205 then 'k' |
3206 ELSE '' | 3206 ELSE '' |
3207 END || rowid || ',' | 3207 END || rowid || ',' |
3208 || rtrim(substr(name, 1, instr(name, '@')), '@') || ',' | 3208 || rtrim(substr(name, 1, instr(name, '@')), '@') UID, |
3209 || gecos NAME, | 3209 gecos NAME, |
3210 post POST, | 3210 post POST, |
3211 (coalesce((SELECT cnt FROM user_view WHERE vuser=name), 0)) ACCESS, | 3211 (coalesce((SELECT cnt FROM user_view WHERE vuser=name), 0)) ACCESS, |
3212 team _TEAM_ | 3212 team _TEAM_ |
3213 FROM user_post up LEFT JOIN teams t | 3213 FROM user_post up LEFT JOIN teams t |
3214 ON up.name=t.user | 3214 ON up.name=t.user |
3254 stf=$tmpd/selteam.$$ | 3254 stf=$tmpd/selteam.$$ |
3255 cgi_select_h selteam "5445414d" $allhexteams > $stf | 3255 cgi_select_h selteam "5445414d" $allhexteams > $stf |
3256 b1='<label> <input type="checkbox" name="usel" value="' | 3256 b1='<label> <input type="checkbox" name="usel" value="' |
3257 ba='<label class="admin"><input type="checkbox" name="usel" value="' | 3257 ba='<label class="admin"><input type="checkbox" name="usel" value="' |
3258 br='<span id="reverse" title="Reverse Selection"></span>' | 3258 br='<span id="reverse" title="Reverse Selection"></span>' |
3259 #b2='"> <span>' b3='</span></label>' | 3259 # lnk='"> <span></span></label> [<a href="?home+\3">HOME</a>]' |
3260 # | sed -e "s|^\(<TR><TD>\)k\([0-9]*\),\([^<]*\)|\1$ba\2$b2\3$b3|" \ | 3260 lnk='<a href="?home+\3">\5</a>' |
3261 # -e "s|^\(<TR><TD>\)\([0-9]*\),\([^<]*\)|\1$b1\2$b2\3$b3|" \ | 3261 # (1) Join <TR> line and the next |
3262 lnk='"> <span>\5</span></label> [<a href="?home+\3">HOME</a>]' | 3262 # (2) (<TR><TD)>(k?)(1234),(userid)</TD><TD>(GECOS)</TD> |
3263 # ↓ | |
3264 # <TR><TD>\2<label><input ...value="\3">\4</label></TD> \ | |
3265 # <TD><a href="?home+\3">\5</a></TD> | |
3263 cgi_form grpaction<<EOF \ | 3266 cgi_form grpaction<<EOF \ |
3267 | sed -e '/^<TR>/{; N; s/\n//; }' \ | |
3264 | sed -E \ | 3268 | sed -E \ |
3265 -e "s|^(<TR><TD)>(k?)([0-9]*),([^,]+),([^<]*)|\1 title=\"\4\">\2$b1\3$lnk|" \ | 3269 -e "s|^(<TR><TD>)(k?)([0-9]*),(.*)</TD><TD>(.*)</TD>|\1\2$b1\3\">\4</label></td><td>$lnk</TD>|" \ |
3266 -e 's/^(<TR><TD[^>]*>)k(<label)/\1\2 class="admin"/' \ | 3270 -e 's/^(<TR><TD[^>]*>)k(<label)/\1\2 class="admin"/' \ |
3267 -e "s|^(<TR><TH>)(NAME)|\1$br \2|" \ | 3271 -e "s|^(<TR><TH>)(UID)|\1$br \2|" \ |
3268 | _m4 -D_TITLE_="spaste(\`$tf')" \ | 3272 | _m4 -D_TITLE_="spaste(\`$tf')" \ |
3269 -D_SUBTITLE_="チェック後操作ボタン" \ | 3273 -D_SUBTITLE_="チェック後操作ボタン" \ |
3270 -D_FORM_="syscmd(cat)" -D_DUMPTABLE_="" \ | 3274 -D_FORM_="syscmd(cat)" -D_DUMPTABLE_="" \ |
3271 $layout/form+dump.m4.html \ | 3275 $layout/form+dump.m4.html \ |
3272 | _m4 -D_TEAM_="spaste(\`$stf')" | 3276 | _m4 -D_TEAM_="spaste(\`$stf')" |
3303 </div> | 3307 </div> |
3304 ${isowner:+$cmmsg$excmsg} | 3308 ${isowner:+$cmmsg$excmsg} |
3305 `cgi_radio rm close id="x"`<label for="x" accesskey="x">×</label> | 3309 `cgi_radio rm close id="x"`<label for="x" accesskey="x">×</label> |
3306 </div> | 3310 </div> |
3307 <h4>$htmlgrp 参加者一覧</h4>$gettingcsv$fromtonote | 3311 <h4>$htmlgrp 参加者一覧</h4>$gettingcsv$fromtonote |
3308 <table class="td2r td3r thl"> | 3312 <table class="td3r td4r thl"> |
3309 `sq $db -header -html "$sql"` | 3313 `sq $db -header -html "$sql"` |
3310 </table> | 3314 </table> |
3311 `cgi_hidden grp $grid` | 3315 `cgi_hidden grp $grid` |
3312 `cgi_hidden myuid $myuid id="myuid"` | 3316 `cgi_hidden myuid $myuid id="myuid"` |
3313 EOF | 3317 EOF |