--- a/HandleRegistry.st	Mon Mar 04 15:29:14 2002 +0100
+++ b/HandleRegistry.st	Mon Mar 04 20:15:09 2002 +0100
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libbasic' }"
+
 Registry subclass:#HandleRegistry
 	instanceVariableNames:''
 	classVariableNames:''
@@ -51,9 +53,7 @@
 informDispose:someHandle
     "an element was disposed; let my dependents know about this"
 
-    self changed:#finalize with:someHandle from:self
-
-    "Modified: 11.11.1996 / 12:35:27 / cg"
+    self changed:#finalize with:someHandle
 ! !
 
 !HandleRegistry methodsFor:'redefined to block'!
@@ -73,5 +73,5 @@
 !HandleRegistry class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/HandleRegistry.st,v 1.8 1996-11-11 11:36:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HandleRegistry.st,v 1.9 2002-03-04 19:15:09 stefan Exp $'
 ! !