--- a/OSFileHandle.st	Sat Jun 07 17:02:24 2014 +0200
+++ b/OSFileHandle.st	Sat Jun 07 17:08:16 2014 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 OSHandle subclass:#OSFileHandle
@@ -91,7 +90,10 @@
 finalize
     "a filedescriptor was garbage collected - close the underlying file"
 
-    self closeFile
+    "/ with timeout to avoid blocking in a bad pty/socket
+    [
+        self closeFile
+    ] valueWithTimeout:30 seconds
 ! !
 
 !OSFileHandle methodsFor:'input/output'!
@@ -131,7 +133,8 @@
 !OSFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OSFileHandle.st,v 1.7 2006-02-08 18:27:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OSFileHandle.st,v 1.8 2014-06-07 15:08:16 cg Exp $'
 ! !
 
+
 OSFileHandle initialize!