comparison s4-funcs.sh @ 961:3444e0a72bb7 draft

User list should be delimited by white spaces
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 31 Jan 2022 19:27:41 +0900
parents a0b1e62df613
children 10d8e4c3ec6a
comparison
equal deleted inserted replaced
960:0d9caeab3d81 961:3444e0a72bb7
1647 esac 1647 esac
1648 } 1648 }
1649 email4group() { 1649 email4group() {
1650 # Get for-$1=group email address(es) for $2...=users 1650 # Get for-$1=group email address(es) for $2...=users
1651 qgrp=`sqlquote "$1"`; shift 1651 qgrp=`sqlquote "$1"`; shift
1652 users=`for i; do sqlquote "$i"; done` 1652 users=`for i; do sqlquote "$i"; echo; done`
1653 users=`echo $users|tr ' ' ','` 1653 users=`echo $users|tr ' ' ','`
1654 sql="WITH 1654 sql="WITH
1655 grpemails AS ( 1655 grpemails AS (
1656 SELECT gname, user, val email 1656 SELECT gname, user, val email
1657 FROM grp_mem NATURAL JOIN grp_mem_s 1657 FROM grp_mem NATURAL JOIN grp_mem_s
3080 あなた宛のメッセージです。 3080 あなた宛のメッセージです。
3081 ---------------------------------------------------------- 3081 ----------------------------------------------------------
3082 EOF 3082 EOF
3083 ) 3083 )
3084 fi 3084 fi
3085 err "usel=============$usel"
3085 rcpts="`email4groupbyuid "$grp" $usel` $fromad$supprcpt" 3086 rcpts="`email4groupbyuid "$grp" $usel` $fromad$supprcpt"
3086 rcpts=`echo $rcpts|tr ' ' '\n'|sort|uniq|tr '\n' ' '` 3087 rcpts=`echo $rcpts|tr ' ' '\n'|sort|uniq|tr '\n' ' '`
3087 subj="${subj:-$gecos さんからのメッセージ}" 3088 subj="${subj:-$gecos さんからのメッセージ}"
3088 REPLYTO=$replyto 3089 REPLYTO=$replyto
3089 MAIL_FROM=$mail_from 3090 MAIL_FROM=$mail_from

yatex.org