From a27b61390990c4773c93bf87f132987b980a1582 Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 22 Nov 2018 09:26:08 +0000
Subject: Make encodings work again  ;-(

---
 generic/tclEncoding.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c
index 869431c..cb28f5a 100644
--- a/generic/tclEncoding.c
+++ b/generic/tclEncoding.c
@@ -1739,7 +1739,7 @@ LoadTableEncoding(
     };
 
     Tcl_DStringInit(&lineString);
-    if (Tcl_Gets(chan, &lineString) != TCL_IO_FAILURE) {
+    if (Tcl_Gets(chan, &lineString) == TCL_IO_FAILURE) {
 	return NULL;
     }
     line = Tcl_DStringValue(&lineString);
-- 
cgit v0.12