# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1665823972 -32373
# Node ID f0a62a22e33cd31105e9d29ebeafdaf9ee88ca96
# Parent  83119d97a2f29412bd9c3531fc83d6b70a296e71
FIX: Too long SQL including binary data put via heredocs.

diff -r 83119d97a2f2 -r f0a62a22e33c s4-funcs.sh
--- a/s4-funcs.sh	Fri Oct 14 23:22:48 2022 +0859
+++ b/s4-funcs.sh	Sat Oct 15 17:52:25 2022 +0859
@@ -4258,9 +4258,13 @@
 	  # Binary update line is TOO LONG to pipelining
 	  sqlfile="$tmpd/sqlf.$$"
 	  if [ -n "$transaction" ]; then
-	    printf '%s' "$sql" >> $transaction
+	    cat<<-EOF >> $transaction
+		$sql
+		EOF
 	  else
-	    printf '%s' "$sql" > $sqlfile
+	    cat<<-EOF > $sqlfile
+		$sql
+		EOF
 	    query ".read $sqlfile"
 	  fi
 	fi
@@ -4339,9 +4343,13 @@
 	  sqlfile="$tmpd/query.$$"
 	  ## err sqlfile=`ls -lF $sqlfile`
 	  if [ -n "$transaction" ]; then
-	    printf '%s' "$sql" >> $transaction
+	    cat<<-EOF >> $transaction
+		$sql
+		EOF
 	  else
-	    printf '%s' "$sql" > $sqlfile
+	    cat<<-EOF >> $sqlfile
+		$sql
+		EOF
 	    query ".read $sqlfile"
 	  fi
 	fi