--- a/AutoDeletedFilename.st	Fri Jul 24 13:07:56 2015 +0200
+++ b/AutoDeletedFilename.st	Fri Jul 24 13:31:53 2015 +0200
@@ -119,7 +119,9 @@
         ] valueWithTimeout:1 minutes) isNil ifTrue:[
             'AutoDeletedFilename: timed out while removing: ' errorPrint. currentFilename errorPrintCR.
         ].
+        ^ self.
     ].
+    super update:anAspect with:aParameter from:changedObject
 ! !
 
 !AutoDeletedFilename methodsFor:'accessing'!
@@ -219,6 +221,10 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !