summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-03-10 19:30:22 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-03-10 19:30:22 (GMT)
commitd539d0925f6d60f1334d053247c8f3112e8de938 (patch)
tree868955cec624f78b796df76836ae784c0085df75 /generic/tclIO.c
parentea4c5e97e3d2d2751578fa19df54d98988aa46f4 (diff)
downloadtcl-d539d0925f6d60f1334d053247c8f3112e8de938.zip
tcl-d539d0925f6d60f1334d053247c8f3112e8de938.tar.gz
tcl-d539d0925f6d60f1334d053247c8f3112e8de938.tar.bz2
.... and then the bug fix.
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 1070f0a..6194637 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -5671,7 +5671,7 @@ TranslateInputEOL(
srcLen--;
src++;
}
- dstLen++;
+ dstLen--;
lesser = (dstLen < srcLen) ? dstLen : srcLen;
}
memmove(dst, src, lesser);