--- a/s4-funcs.sh	Mon Nov 28 12:07:18 2016 +0859
+++ b/s4-funcs.sh	Mon Nov 28 12:08:51 2016 +0859
@@ -1962,10 +1962,11 @@
 		(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 'mtime' then val end) as mtime
+			max(case key when 'mtime' then val end) as mtime,
+			max(case key when 'wtime' then val end) as wtime
 			from ${tbl}_s group by $nm)
 		b on a.$nm=b.name $cond $3
-	order by b.tag desc, b.mtime desc, a.rowid asc"
+	order by b.tag desc, b.wtime 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"