From 47699b8fff2e41463af41ad4aaece58038550955 Mon Sep 17 00:00:00 2001
From: sebres <sebres@users.sourceforge.net>
Date: Fri, 22 Jul 2022 18:38:30 +0000
Subject: EOF seemed to reset INPUT_SAW_CR previously, so do it now explicitely
 (satisfying the test ?chan?io-6.46)

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

diff --git a/generic/tclIO.c b/generic/tclIO.c
index e102675..e03b9c5 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -4825,7 +4825,7 @@ Tcl_GetsObj(
 		Tcl_SetObjLength(objPtr, oldLength);
 		CommonGetsCleanup(chanPtr);
 		copiedTotal = -1;
-		ResetFlag(statePtr, CHANNEL_BLOCKED);
+		ResetFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR);
 		goto done;
 	    }
 	    goto gotEOL;
-- 
cgit v0.12