# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1589248543 -32400
# Node ID 17ca38bf0a4bc996303266b8913ba5c88ef32564
# Parent  84b26e6e4d799fe3bbbf37deab70ac6e1597b8e0
Remove carriage-returns in message text forcibly

diff -r 84b26e6e4d79 -r 17ca38bf0a4b s4-funcs.sh
--- a/s4-funcs.sh	Tue May 12 10:42:50 2020 +0900
+++ b/s4-funcs.sh	Tue May 12 10:55:43 2020 +0900
@@ -2609,7 +2609,7 @@
   if [ -n "$usel" ]; then
     uids=$(echo `echo $usel`|tr ' ' ',')
     ## err grpaction-1: grp=$grp, `echo $sql`
-    text=`getpar text`
+    text=`getpar text|tr -d '\r'`
     
     rm=`getpar rm` cfm=`getpar confirm`
 ## err rm=$rm cfm=$cfm