--- a/OSFileHandle.st	Tue Feb 04 21:09:59 2014 +0100
+++ b/OSFileHandle.st	Wed Apr 01 10:20:10 2015 +0100
@@ -90,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'!
@@ -130,14 +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 $'
-!
-
-version_SVN
-    ^ '$Id: OSFileHandle.st 10761 2012-01-19 11:46:00Z vranyj1 $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OSFileHandle.st,v 1.8 2014-06-07 15:08:16 cg Exp $'
 ! !
 
+
 OSFileHandle initialize!
-
-
-