X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Freadch.t;fp=t%2Freadch.t;h=c10189a39bf2607505ecc0f9d0692654a6d5da5f;hb=4bac215042d68670cd0a8245825bae99f64af989;hp=288d3f3cce450aab8b956db86a99bda7c9726c39;hpb=3c6a0ce7ac46c66d6b7b48d63cbfc0470ae991e1;p=scpubgit%2FTenDotTcl.git

diff --git a/t/readch.t b/t/readch.t
index 288d3f3..c10189a 100644
--- a/t/readch.t
+++ b/t/readch.t
@@ -29,5 +29,10 @@ vwait got_line
 
 is $got_line bar "Got line from read channel (send after set cb)"
 
-done_testing
+#$rch configure -on_close_call {global got_line; set got_line bye}
+
+#vwait got_line
 
+#is $got_line bye "Close handler called"
+
+done_testing