--- a/Tools_MethodList.st	Wed Dec 18 04:28:23 2013 +0000
+++ b/Tools_MethodList.st	Fri Dec 20 11:56:40 2013 +0100
@@ -1167,10 +1167,12 @@
     "/ first generate the new methodList, and see if it is different ...
     
     entries do:[:entry | 
-        |sel mthd|
+        |mthd|
 
         mthd := entry at:3.
-        methods add:mthd.
+        mthd notNil ifTrue:[
+            methods add:mthd.
+        ].
     ].
     false "methodList = methods" "does not care for changed icons" ifTrue:[
         "/ same list
@@ -1839,10 +1841,10 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.93 2013-09-06 18:39:43 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.94 2013-12-20 10:56:40 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.93 2013-09-06 18:39:43 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.94 2013-12-20 10:56:40 stefan Exp $'
 ! !