--- a/ClassDescription.st	Mon Apr 19 18:45:36 2010 +0200
+++ b/ClassDescription.st	Mon Apr 19 18:46:03 2010 +0200
@@ -1189,7 +1189,9 @@
         "/ changes (no need for observing all classes)
         "/ - this allows for watchers to find out if its a new method or a method-change
         "/
-        Smalltalk changed:#methodInClassRemoved with:(MethodRemoveChangeNotificationParameter changeClass:self changeSelector:aSelector).
+        MethodRemoveChangeNotificationParameter notNil ifTrue:[
+            Smalltalk changed:#methodInClassRemoved with:(MethodRemoveChangeNotificationParameter changeClass:self changeSelector:aSelector).
+        ]
     ]
 
     "Modified: 8.1.1997 / 23:03:49 / cg"
@@ -4102,11 +4104,11 @@
 !ClassDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.213 2010-04-19 16:45:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.214 2010-04-19 16:46:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.213 2010-04-19 16:45:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.214 2010-04-19 16:46:03 cg Exp $'
 ! !
 
 ClassDescription initialize!