--- a/s4-funcs.sh	Fri Jan 15 07:29:25 2021 +0900
+++ b/s4-funcs.sh	Fri Jan 15 10:31:54 2021 +0900
@@ -3176,6 +3176,7 @@
 <p>この操作による通知は本人に行きません。
 あらかじめ通知するか、登録解除してよい状況かしっかり確認してください。</p>
 </div>"
+  submitBTN=`cgi_submit 送信`
   # Get team list to which current user belongs into $hexteams
   allhexteams=$(hexteams "$grp")
   if [ -n "$isowner" ]; then
@@ -3191,7 +3192,7 @@
 title=\"Shortcut: s${nl}Strip a team tag from\"
 for=\"cmrmteam\">チーム属性除去</label>
 <div>チーム属性:`cgi_select_h rmteam \"2d2d2d\" $myhexteams`
-を除去します: `cgi_checkbox teamconfirm yes` 確認
+を除去します: `cgi_checkbox teamconfirm yes` 確認 $submitBTN
 <p>この操作による通知は本人に行きません。
 あらかじめ通知するか、登録解除してよい状況かしっかり確認してください。</p>
 </div><!-- end of $rmteammsg -->
@@ -3206,7 +3207,6 @@
   #    	| sed  -e "s|^\(<TR><TD>\)k\([0-9]*\),\([^<]*\)|\1$ba\2$b2\3$b3|" \
   #	       -e "s|^\(<TR><TD>\)\([0-9]*\),\([^<]*\)|\1$b1\2$b2\3$b3|" \
   lnk='"> <span>\5</span></label> [<a href="?home+\3">HOME</a>]'
-#-e "s|^\(<TR><TD>\)k\([0-9]*\),\([^<]*\)|\1$ba\2$lnk|" \
   cgi_form grpaction<<EOF \
       	| sed  -E \
 	       -e "s|^(<TR><TD)>(k?)([0-9]*),([^,]+),([^<]*)|\1 title=\"\4\">\2$b1\3$lnk|" \
@@ -3223,7 +3223,7 @@
 title="Shortcut: a${nl}Add a team tag to"
 for="cmteam">同じチーム属性を付与</label>
 <div>チーム名:`cgi_text team "" 'id="inteam" list="teams"'`
-`cgi_datalist_h teams $allhexteams`
+`cgi_datalist_h teams $allhexteams`$submitBTN
 </div>
 ${rmteammsg}
 `cgi_radio rm send id="sendmsg"`<label accesskey="d"
@@ -3243,7 +3243,7 @@
 <tr><td>ファイル添付: </td>
     <td>`cgi_file image "" "multiple $file_accept title=\"$file_accept_help\""`<br><small>文書ファイルはPDFに変換してから</small></td></tr>
 </table>
-<p>(下記一覧から1人以上選択していない場合は送れません`cgi_submit 送信`)</p>
+<p>(下記一覧から1人以上選択していない場合は送れません$submitBTN)</p>
 </div>
 <div>本文:`cgi_textarea text "" cols=72`
 </div>