--- a/Tools_MethodCategoryList.st	Wed Sep 23 20:15:57 2009 +0200
+++ b/Tools_MethodCategoryList.st	Wed Sep 23 21:21:54 2009 +0200
@@ -972,6 +972,7 @@
 
     ^ cachedMethodInfo 
         removeKey:(className,'>>',selector)
+        ifAbsent:[]
 !
 
 listOfMethodCategories
@@ -1446,5 +1447,5 @@
 !MethodCategoryList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.30 2009-09-23 17:27:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.31 2009-09-23 19:21:54 cg Exp $'
 ! !