[packages/expect.git] / expect-fixcat.patch

--- expect5.31/fixcat.fixcat	Fri Jun  2 13:35:51 2000
+++ expect5.31/fixcat	Fri Jun  2 13:36:56 2000
@@ -8,11 +8,14 @@
 # If this file is sitting in an architecture-specific library directory,
 # then it serves as a marker that your /bin/cat buffers by default.
 
+# XXX Red Hat linux has unbuffered cat
+exit 0
+
 # test for when catting to/from files
-log_user 0
-spawn -open [open "|cat" "r+"]
-send "\r"
-expect "\r" {exit 1}
+#log_user 0
+#spawn -open [open "|cat" "r+"]
+#send "\r"
+#expect "\r" {exit 1}
 
 # test for when catting to real tty
 #log_user 0
Commit	Line	Data
d6284312	1	--- expect5.31/fixcat.fixcat Fri Jun 2 13:35:51 2000
	2	+++ expect5.31/fixcat Fri Jun 2 13:36:56 2000
	3	@@ -8,11 +8,14 @@
	4	# If this file is sitting in an architecture-specific library directory,
	5	# then it serves as a marker that your /bin/cat buffers by default.
	6
	7	+# XXX Red Hat linux has unbuffered cat
	8	+exit 0
	9	+
	10	# test for when catting to/from files
	11	-log_user 0
	12	-spawn -open [open "\|cat" "r+"]
	13	-send "\r"
	14	-expect "\r" {exit 1}
	15	+#log_user 0
	16	+#spawn -open [open "\|cat" "r+"]
	17	+#send "\r"
	18	+#expect "\r" {exit 1}
	19
	20	# test for when catting to real tty
	21	#log_user 0