# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1591862673 -32400
# Node ID 3e6d36fa579d0cb07d289331d0ae8ceb944dc3b6
# Parent  1aa864ab97392dbd36e99c7cd6d94b8047bd2153
Display information improved

diff -r 1aa864ab9739 -r 3e6d36fa579d s4-funcs.sh
--- a/s4-funcs.sh	Thu Jun 11 15:22:19 2020 +0900
+++ b/s4-funcs.sh	Thu Jun 11 17:04:33 2020 +0900
@@ -1893,17 +1893,21 @@
   GF_STAGE="groupupdate" edittable "$formdir/grp.def" "grp" "$rowid"
   if [ -z "$STOPCLONEMSG" ]; then
     ## Setup migration menu
+    height="10em"		## Ugly!!
     v=`fgrep -v "value=\"$worldconf\"" $worldoptionfile`
     err v=$v
     if [ -n "$v" ]; then
       migrate=$(cat<<-EOF
 	`cgi_radio grpaction migrate id="migrate"`<label
 	 for="migrate">別Worldへ移住</label>
-	<div>
+	<div style="height: $height;">
 	<form action="?migrategrp">
 	<p>移住先:<select name="migrateto">$nl$v$nl</select></p>
 	<p>グループや掲示板のURLが変わります。
-	外部からリンクしている場合は飛べなくなります。</p>
+	外部からリンクしている場合は飛べなくなります。
+	すでに記事内相互リンクなどを多数含むグループの場合は既存グループを
+	温存し、「グループのクローン」で
+	メンバーを引き継いだ上でそのクローンを移住するのがお勧めです。</p>
 	<p><label>`cgi_checkbox emichk yes`確認</label></p>
 	`cgi_hidden stage migrategrp`
 	`cgi_hidden rowid $rowid`
@@ -1916,8 +1920,8 @@
     fi
     html div 'class="foldtabs"' <<-EOF
 	`cgi_radio grpaction clone id="clone"`<label
-	 for="clone">同一メンバーで別グループを作成する</label>
-	<div>
+	 for="clone">グループのクローン作成</label>
+	<div style="height: $height;">
 	 <p>構成メンバーが同じ新規グループを作成します。</p>
 	 <table>
 	  <tr><td><a href="?groupclone+$rowid">
@@ -1932,7 +1936,7 @@
 	</div>
 	$migrate
 	 `cgi_radio grpaction close id="x"`<label for="x" accesskey="x">×</label>
-	<div style="height: 5em; background: transparent;"></div>
+	<div style="height: $height; background: transparent;"></div>
 	EOF
   fi
 }
@@ -2228,7 +2232,7 @@
 
   tf=$tmpd/title.$$ pf=$tmpd/profile.$$ bf=$tmpd/blogs.$$ sf=$tmpd/search.$$
   search_form "$search_form_args"	> $sf
-  printf "%s さん" "$gecos"|htmlescape	> $tf
+  printf "%s さん%s" "$gecos" "${S4WORLD:+@$S4WORLD}" |htmlescape	> $tf
   { echo "<div class=\"noprofimg\">"
     viewtable $formdir/user.def user $1
     echo "</div>"
@@ -2527,7 +2531,7 @@
   # Note that mtime is stored only in grp_s.
 ## err LE:sql.1="$sql"
   total=`query "with x as ($sql) select count(*) from x;"`
-  echo "${entity} 一覧" | html h2
+  echo "${entity} 一覧" "${S4WORLD:+@$S4WORLD}" | html h2
   echo '<div class="listentry">'		# List-entry div
   # Show owner/member filter button
   METHOD=GET