Mercurial > hgrepos > hgweb.cgi > s4

comparison s4-funcs.sh @ 1032:ae88ca565d08 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add wrapper for GNU m4 and md5sum
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 28 Dec 2023 11:27:06 +0900
parents 9d62cba7344f
children b8b1b8356b94
comparison
equal deleted inserted replaced
1031:9d62cba7344f 1032:ae88ca565d08
474 logend 474 logend
475 return $rc 475 return $rc
476 } 476 }
477 _m4() { 477 _m4() {
478 #S4NAME=f,f,f 478 #S4NAME=f,f,f
479 if m4 --version | grep -q GNU; then
480 if type om4; then # https://github.com/ibara/m4
481 m4() {
482 om4 "$@"
483 }
484 fi
485 fi >/dev/null 2>&1
479 m4 ${S4NAME:+"-D_S4NAME_=${S4NAME}"} ${S4CSS:+-D_S4CSS_="$S4CSS"} \ 486 m4 ${S4NAME:+"-D_S4NAME_=${S4NAME}"} ${S4CSS:+-D_S4CSS_="$S4CSS"} \
480 ${S4WORLD:+-D_S4WORLD_="$S4WORLD"} \ 487 ${S4WORLD:+-D_S4WORLD_="$S4WORLD"} \
481 ${S4WORLDNAME:+-D_S4WORLDNAME_="$S4WORLDNAME"} \ 488 ${S4WORLDNAME:+-D_S4WORLDNAME_="$S4WORLDNAME"} \
482 ${S4WORLDGRPS:+-D_S4WORLDGRPS_="$S4WORLDGRPS"} \ 489 ${S4WORLDGRPS:+-D_S4WORLDGRPS_="$S4WORLDGRPS"} \
483 ${S4WORLDS:+-D_S4WORLDS_="$S4WORLDS"} "$@" 490 ${S4WORLDS:+-D_S4WORLDS_="$S4WORLDS"} "$@"
484 } 491 }
485 if ! type gdate && date --version | grep -q GNU; then 492 if ! type gdate && date --version | grep -q GNU; then
486 gdate() date "$@" 493 gdate() date "$@"
494 fi >/dev/null 2>&1
495 if ! type md5 && type md5sum && md5sum --version | grep -q GNU; then
496 md5() {
497 if [ -z "$1" ]; then
498 md5sum | cut -d' ' -f 1
499 else
500 for f; do
501 printf "MD5 (%s) = %s\n" "$f" "$(md5 < $f)"
502 done
503 fi
504 }
487 fi >/dev/null 2>&1 505 fi >/dev/null 2>&1
488 ismember() { 506 ismember() {
489 # $1=user, $2=group 507 # $1=user, $2=group
490 #err ismem: "select user from grp_mem where gname=$(sqlquote $2) and user='$1';" 508 #err ismem: "select user from grp_mem where gname=$(sqlquote $2) and user='$1';"
491 test -n "`query \"select user from grp_mem where gname=$(sqlquote \"$2\") and user='$1';\"`" 509 test -n "`query \"select user from grp_mem where gname=$(sqlquote \"$2\") and user='$1';\"`"

yatex.org