# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1503403483 -32373
# Node ID f095f639e5bfd2fe938fc6b27d92997bdbb41704
# Parent  c00857f0e9d2ea60c20e3c0b849a6dc613c23e3a
Show lastlog in other user's home

diff -r c00857f0e9d2 -r f095f639e5bf s4-funcs.sh
--- a/s4-funcs.sh	Tue Aug 22 15:23:39 2017 +0859
+++ b/s4-funcs.sh	Tue Aug 22 21:04:16 2017 +0859
@@ -1725,7 +1725,7 @@
   cond="gname in (select gname from grp_mem where user='$uname')"
   search_form_args=""
   if [ x"$user" = x"$uname" ]; then
-    conflink="<a href=\"?userconf\" accesskey=\"e\"
+    usermenu="<a href=\"?userconf\" accesskey=\"e\"
 	 title=\"E\">プロフィールの編集</a> /
 	<a href=\"?blog\" accesskey=\"n\" title=\"N\">新規話題の作成</a>"
     # Display folders
@@ -1736,10 +1736,13 @@
     nfile=`query "$sql"`
     # err nfile=$nfile
     if [ $nfile -gt 0 ]; then
-      conflink="$conflink / <a href=\"?lsmyfile\" accesskey=\"l\"
+      usermenu="$usermenu / <a href=\"?lsmyfile\" accesskey=\"l\"
        title=\"L\">過去の提出ファイル</a>"
     fi
   else
+    latestlog=`query "SELECT max(time) FROM acclog WHERE user='$uname' \
+    		     GROUP BY user;"`
+    usermenu="<p>Last seen on $latestlog</p>"
     search_form_args="author=$uname"
   fi
   . ./s4-blog.sh
@@ -1856,7 +1859,7 @@
   #
   listgroupbytable $formdir/grp.def $cond |
       _m4 -D_BODYCLASS_=home -D_TITLE_="spaste(\`$tf')" \
-	  -D_PROFILE_="spaste(\`$pf')$conflink" \
+	  -D_PROFILE_="spaste(\`$pf')$usermenu" \
 	  -D_PROFIMG_="spaste(\`$imf')" \
 	  -D_BLOGS_="spaste(\`$bf')" \
 	  -D_SEARCH_="spaste(\`$sf')" \