--- a/WeakArray.st	Mon Mar 27 15:05:33 2000 +0200
+++ b/WeakArray.st	Tue Mar 28 19:39:48 2000 +0200
@@ -351,31 +351,35 @@
 
     wasBlocked := OperatingSystem blockInterrupts.
     [
-	|deps|
+        |deps|
 
-	deps := dependents.
-	"/
-	"/ store the very first dependent directly in
-	"/ the dependents instVar
-	"/
-	(deps isNil and:[anObject isCollection not]) ifTrue:[
-	    dependents := anObject
-	] ifFalse:[
-	    "/
-	    "/ store more dependents in the dependents collection
-	    "/
-	    deps isCollection ifTrue:[
-		deps add:anObject
-	    ] ifFalse:[
-		deps == anObject ifFalse:[
-		    dependents := (IdentitySet with:dependents with:anObject)
-		]
-	    ]
-	]
+        deps := dependents.
+        "/
+        "/ store the very first dependent directly in
+        "/ the dependents instVar
+        "/
+        (deps isNil and:[anObject isCollection not]) ifTrue:[
+            dependents := anObject
+        ] ifFalse:[
+            "/
+            "/ store more dependents in the dependents collection
+            "/
+            deps isCollection ifTrue:[
+                deps add:anObject
+            ] ifFalse:[
+                deps == anObject ifFalse:[
+                    deps isNil ifTrue:[
+                        dependents := (IdentitySet with:anObject)
+                    ] ifFalse:[
+                        dependents := (IdentitySet with:deps with:anObject)
+                    ]
+                ]
+            ]
+        ]
     ] valueNowOrOnUnwindDo:[
-	wasBlocked ifFalse:[
-	    OperatingSystem unblockInterrupts
-	]
+        wasBlocked ifFalse:[
+            OperatingSystem unblockInterrupts
+        ]
     ]
 
     "Modified: 8.1.1997 / 23:40:30 / cg"
@@ -920,6 +924,6 @@
 !WeakArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.56 1999-09-15 12:57:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.57 2000-03-28 17:39:48 cg Exp $'
 ! !
 WeakArray initialize!