summary refs log tree commit diff
path: root/Src/text.c
diff options
context:
space:
mode:
authorPeter Stephenson <pws@users.sourceforge.net>2006-01-10 16:57:02 +0000
committerPeter Stephenson <pws@users.sourceforge.net>2006-01-10 16:57:02 +0000
commitfa633171fd280096280628887947eb6a0dac3de7 (patch)
treec8225a6d66f3530c7f97198c9a3aeddffff85858 /Src/text.c
parentd09c2868715f63281387743b34b446c9ffc60671 (diff)
downloadzsh-fa633171fd280096280628887947eb6a0dac3de7.tar.gz
zsh-fa633171fd280096280628887947eb6a0dac3de7.tar.xz
zsh-fa633171fd280096280628887947eb6a0dac3de7.zip
22151: bug outputting here-strings from which etc. when already quoted
Diffstat (limited to 'Src/text.c')
-rw-r--r--Src/text.c21
1 files changed, 11 insertions, 10 deletions
diff --git a/Src/text.c b/Src/text.c
index ceb4bfdf4..db24d8c9e 100644
--- a/Src/text.c
+++ b/Src/text.c
@@ -798,16 +798,17 @@ getredirs(LinkList redirs)
 	    taddstr(fstr[f->type]);
 	    if (f->type != REDIR_MERGEIN && f->type != REDIR_MERGEOUT)
 		taddchr(' ');
-	    if (f->type == REDIR_HERESTR) {
-                if (has_token(f->name)) {
-                    taddchr('\"');
-                    taddstr(bslashquote(f->name, NULL, 2));
-                    taddchr('\"');
-                } else {
-                    taddchr('\'');
-                    taddstr(bslashquote(f->name, NULL, 1));
-                    taddchr('\'');
-                }
+	    if (f->type == REDIR_HERESTR && !has_token(f->name)) {
+		/*
+		 * Strings that came from here-documents are converted
+		 * to here strings without quotation, so add that
+		 * now.  If tokens are already present taddstr()
+		 * will do the right thing (anyway, adding more
+		 * quotes certainly isn't right in that case).
+		 */
+		taddchr('\'');
+		taddstr(bslashquote(f->name, NULL, 1));
+		taddchr('\'');
 	    } else
 		taddstr(f->name);
 	    taddchr(' ');