--- a/UnixFileHandle.st	Fri Jun 23 20:48:24 2000 +0200
+++ b/UnixFileHandle.st	Fri Jun 23 20:54:30 2000 +0200
@@ -1,3 +1,5 @@
+"{ Package: 'stx:libbasic' }"
+
 OSFileHandle subclass:#UnixFileHandle
 	instanceVariableNames:''
 	classVariableNames:''
@@ -14,8 +16,8 @@
 
 !UnixFileHandle methodsFor:'finalization'!
 
-disposed
-    "a file handle was garbage collected - close the underlying file"
+closeFile
+    "close the underlying file"
 
 %{
     FILE *f = (FILE *)(__externalAddressVal(self));
@@ -28,25 +30,8 @@
 
 ! !
 
-!UnixFileHandle methodsFor:'release'!
-
-close
-    "close the file"
-
-%{
-    FILE *f = (FILE *)(__externalAddressVal(self));
-
-    if (f) {
-        __externalAddressVal(self) = NULL;
-        fclose(f);
-    }
-%}.
-    Lobby unregister:self
-
-! !
-
 !UnixFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixFileHandle.st,v 1.1 1999-09-18 11:10:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixFileHandle.st,v 1.2 2000-06-23 18:54:30 cg Exp $'
 ! !