--- a/s4-funcs.sh	Sat Sep 24 10:59:51 2016 +0859
+++ b/s4-funcs.sh	Sat Sep 24 13:56:15 2016 +0859
@@ -1741,10 +1741,13 @@
 	from $tbl a left join
 		(select $nm as name,
 			max(case key when 'gecos' then val end) as gecos,
-			max(case key when 'tag' then val end) as tag
+			max(case key when 'tag' then val end) as tag,
+			max(case key when 'mtime' then val end) as mtime
 			from ${tbl}_s group by $nm)
 		b on a.$nm=b.name $cond $3
-	order by b.tag desc, a.rowid asc"
+	order by b.tag desc, b.mtime desc, a.rowid asc"
+  # Give precedence to newer maintained groups (2016-09-24)
+  # 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