summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorpatthoyts <patthoyts@users.sourceforge.net>2009-07-09 22:48:44 (GMT)
committerpatthoyts <patthoyts@users.sourceforge.net>2009-07-09 22:48:44 (GMT)
commitaa9d6e35ecc0a79757a530c4a4b95e90887e5635 (patch)
treeac9009aa90c4913d181a4e791ab11e5aa9ccb656 /generic
parent8d66bea70e3b60faed905bf41460eb10c2fdc20b (diff)
downloadtcl-aa9d6e35ecc0a79757a530c4a4b95e90887e5635.zip
tcl-aa9d6e35ecc0a79757a530c4a4b95e90887e5635.tar.gz
tcl-aa9d6e35ecc0a79757a530c4a4b95e90887e5635.tar.bz2
[Bug #2818131] Added tests and fixed a typo that broke zlib push for deflate format.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclZlib.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c
index 378c123..96d68c1 100644
--- a/generic/tclZlib.c
+++ b/generic/tclZlib.c
@@ -13,7 +13,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclZlib.c,v 1.28 2009/07/06 21:38:21 patthoyts Exp $
+ * RCS: @(#) $Id: tclZlib.c,v 1.29 2009/07/09 22:48:44 patthoyts Exp $
*/
#include "tclInt.h"
@@ -1940,7 +1940,7 @@ TclZlibCmd(
switch ((enum zlibFormats) format) {
case f_deflate:
mode = TCL_ZLIB_STREAM_DEFLATE;
- format = TCL_ZLIB_FORMAT_GZIP;
+ format = TCL_ZLIB_FORMAT_RAW;
break;
case f_inflate:
mode = TCL_ZLIB_STREAM_INFLATE;