summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp@users.sourceforge.net <dgp>2015-06-03 17:40:10 (GMT)
committerdgp@users.sourceforge.net <dgp>2015-06-03 17:40:10 (GMT)
commit2e9ae6ddf9aff89cbe26d7c5630e5710a73f85a6 (patch)
treed329373ca18628dcc2e19fc2fe004ca314188554
parent23a496d954de0ceaabbf92d01e4ab3cd32f4e8b9 (diff)
downloadtcl-2e9ae6ddf9aff89cbe26d7c5630e5710a73f85a6.zip
tcl-2e9ae6ddf9aff89cbe26d7c5630e5710a73f85a6.tar.gz
tcl-2e9ae6ddf9aff89cbe26d7c5630e5710a73f85a6.tar.bz2
Put the ellipsis inside, not outside, the close quote.
-rw-r--r--generic/tclDisassemble.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclDisassemble.c b/generic/tclDisassemble.c
index b3753c31..0a325b3 100644
--- a/generic/tclDisassemble.c
+++ b/generic/tclDisassemble.c
@@ -842,10 +842,10 @@ PrintSourceToObj(
continue;
}
}
- Tcl_AppendToObj(appendObj, "\"", -1);
if (*p != '\0') {
Tcl_AppendToObj(appendObj, "...", -1);
}
+ Tcl_AppendToObj(appendObj, "\"", -1);
}
/*