Mercurial > hgrepos > hgweb.cgi > s4

changeset 474:4f9036d35b57

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Sort user by last login. Sort group by the latest article time.
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 07 Sep 2017 12:11:45 +0859
parents 677597199031
children c01081811298
files examples/sns/form/user.def s4-blog.sh s4-funcs.sh
diffstat 3 files changed, 9 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/examples/sns/form/user.def	Thu Sep 07 08:27:37 2017 +0859
+++ b/examples/sns/form/user.def	Thu Sep 07 12:11:45 2017 +0859
@@ -7,3 +7,5 @@
 プロフィール画像:profimg:m:image:maxlength="400K"
 ひとこと:desc:s:textarea:maxlength="1024"
 履歴書(4MBまで):profpdf:m:document:maxlength="4M"
+書込:wtime:s:stamp:
+訪問:login:s:stamp:
--- a/s4-blog.sh	Thu Sep 07 08:27:37 2017 +0859
+++ b/s4-blog.sh	Thu Sep 07 12:11:45 2017 +0859
@@ -1017,6 +1017,8 @@
 	if [ -n "$grprowid" ]; then
 	  qgrp=$(sqlquote "$owner")
 	  dbsetbyid grp $owner wtime "`date '+%F %T'`"
+	else
+	  dbsetbyid user "$user" wtime "`date '+%F %T'`"
 	fi
 	;;
       esac
--- a/s4-funcs.sh	Thu Sep 07 08:27:37 2017 +0859
+++ b/s4-funcs.sh	Thu Sep 07 12:11:45 2017 +0859
@@ -1109,6 +1109,7 @@
   if pwcheck "$pswd"; then
     newsession=`genrandom 50`
     dbsetbyid user $user skey "$newsession"
+    dbsetbyid user $user login "`date '+%F %T'`"
     gencookie "user=$user" "skey=$newsession"
     return 0
   fi
@@ -2005,9 +2006,11 @@
 			max(case key when 'tag' then val end) as tag,
 			max(case key when 'mtime' then val end) as mtime,
 			max(case key when 'wtime' then val end) as wtime
+			max(case key when 'login' then val end) as login
 			from ${tbl}_s group by $nm)
 		b on a.$nm=b.name $cond $3
-	order by b.tag desc, b.wtime desc, b.mtime desc, a.rowid asc"
+	order by b.wtime desc, b.login desc,
+	         b.mtime desc, b.tag 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"
@@ -2074,7 +2077,7 @@
 	iconhref "$dir/$deficon" "$hrb+$lnk" "$gecos"
       fi
     elif [ -n "$icon" -a -s "$icon" ]; then
-      iconhref2 "$icon" "$hrb+$lnk" "$gecos"
+      iconhref2 "$icon" "$hrb+$lnk" "$gecos<br>$mt"
     else
       cond="$nm=$qname"
       # err imgsrc_cache "$dir/list" ${tbl}_m "$cond" S

yatex.org