s4

changeset 467:598f00f1b995

find changesets by author, revision, files, or words in the commit message
Offer links to board and group home in read-time table
author HIROSE Yuuji <yuuji@gentei.org>
date Tue, 22 Aug 2017 08:55:48 +0859
parents 929a925f10d8
children c00857f0e9d2
files s4-blog.sh
diffstat 1 files changed, 10 insertions(+), 6 deletions(-) [+]
line diff
     1.1 --- a/s4-blog.sh	Tue Aug 22 08:51:06 2017 +0859
     1.2 +++ b/s4-blog.sh	Tue Aug 22 08:55:48 2017 +0859
     1.3 @@ -650,12 +650,16 @@
     1.4      echo "メンバー以外は利用できません。" | html p; return
     1.5    fi
     1.6    owner=`getvalbyid blog owner $rowid`
     1.7 -  #qowner=`sqlquotestr "$owner"`
     1.8 -  ge=`gecos "$owner"`
     1.9 -  title=`getvalbyid blog title $rowid`
    1.10 -  _m4 -D_TITLE_="アクセス時刻" $layout/html.m4.html
    1.11 -  tmpf=$tmpd/header
    1.12 -  echo "[title]@${ge:-$owner}" > $tmpf
    1.13 +  qowner=`sqlquotestr "$owner"`
    1.14 +  grprowid=`query "SELECT rowid FROM grp WHERE gname=$qowner;"`
    1.15 +  ge=`gecos "$owner" | htmlescape`
    1.16 +  title=`getvalbyid blog title $rowid | htmlescape`
    1.17 +  h1="アクセス時刻"
    1.18 +  link2board="<a href=\"?replyblog+$rowid\">$title</a>"
    1.19 +  link2group="<a href=\"?grp+$grprowid\">$ge</a>"
    1.20 +  _m4 -D_TITLE_="$h1" $layout/html.m4.html
    1.21 +  echo "$h1" | html h1
    1.22 +  echo "[$link2board]@$link2group" | html h2
    1.23    warn=' class="warn"'
    1.24    cat <<-EOF
    1.25  	<table class="b">