s4

changeset 816:ed2c8aab742d feature-world

find changesets by author, revision, files, or words in the commit message
Archiving world provides no new-group link
author HIROSE Yuuji <yuuji@gentei.org>
date Wed, 17 Jun 2020 08:16:59 +0900
parents 04034092338d
children d2c4c473e08e
files s4-funcs.sh
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line diff
     1.1 --- a/s4-funcs.sh	Mon Jun 15 20:23:30 2020 +0900
     1.2 +++ b/s4-funcs.sh	Wed Jun 17 08:16:59 2020 +0900
     1.3 @@ -73,6 +73,7 @@
     1.4  [編集]リンクから修正してください。"
     1.5  blogreadflagrowid=0
     1.6  blogcutoffflagrowid=-1
     1.7 +nonewgroupworld=${NONEWGROUPWORLD:-*archive*}
     1.8  whatsnewdays=${WHATS_NEW_DAYS:-14}
     1.9  main_session=`date +%F-$$`
    1.10  session=$main_session
    1.11 @@ -1966,12 +1967,16 @@
    1.12    listmember $kwd
    1.13  }
    1.14  grps() {
    1.15 +  case "$S4WORLD" in
    1.16 +    $nonewgroupworld) ;;
    1.17 +    *)	LINK_NEWGRP="<a href=\"?groupman\">新規グループ作成</a>" ;;
    1.18 +  esac
    1.19    _m4 -D_TITLE_="グループ一覧" -D_BODYCLASS_=listgroup $layout/html.m4.html
    1.20    kwd=`getpar kwd`
    1.21    listgroup $kwd \
    1.22        | _m4 -D_DUMPTABLE_="syscmd(cat)" \
    1.23  	    -D_TITLE_="グループ関連操作" \
    1.24 -	    -D_FORM_="<a href=\"?groupman\">新規グループ作成</a>" \
    1.25 +	    -D_FORM_="${LINK_NEWGRP}${NEWGRP_GUIDE}" \
    1.26  	    $layout/form+dump.m4.html
    1.27  }
    1.28  grp() {	# $1=group-rowid