Mercurial > hgrepos > hgweb.cgi > s4
changeset 655:a049d3cb0389
Send group-mail each member respectively
| author | HIROSE Yuuji <yuuji@gentei.org> |
|---|---|
| date | Mon, 11 May 2020 13:45:48 +0900 |
| parents | d6f464f0a212 |
| children | ad6b57bd6a20 |
| files | s4-funcs.sh |
| diffstat | 1 files changed, 18 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/s4-funcs.sh Mon May 11 11:18:05 2020 +0900 +++ b/s4-funcs.sh Mon May 11 13:45:48 2020 +0900 @@ -3052,18 +3052,25 @@ members=`collectemail $grp` myuid=`query "SELECT rowid FROM user WHERE name='$user';"` mailfrom=`email4groupbyuid "$grp" "$myuid" | sed -e 1q -e 's/[ ,].*//'` + mailfrom="`gecos "$user"` <$mailfrom>" + sj="グループ $grp 宛メッセージ(from `gecos $user`)" + msg=$(cat<<-EOF + $urlbase?grp+$rowid + グループ $grp に所属する + `gecos $user` さんよりメッセージ: + + $message + EOF + ) # smail rcpt subj (file) - MAIL_FROM=$mailfrom \ - SENDER=$noreply \ - REPLYTO=$mailfrom \ - SMAIL_TO="`echo "$grp" | nkf -jM | tr -d '\n'` readers <$noreply>" \ - smail "$members" "グループ $grp 宛メッセージ(from `gecos $user`)" <<EOF -$urlbase?grp+$rowid -グループ $grp に所属する -`gecos $user` さんよりメッセージ: - -$message -EOF + for m in $members; do + echo "$msg" | + MAIL_FROM=$mailfrom \ + SENDER=$noreply \ + REPLYTO=$mailfrom \ + SMAIL_TO="`echo "$grp" | nkf -jM | tr -d '\n'` readers <$m>" \ + smail "$members" "$sj" + done cat<<EOF <p>以下のユーザに送信しました。</p> <pre>
