--- a/extensions.st	Wed May 06 00:02:27 2015 +0200
+++ b/extensions.st	Mon May 11 06:44:29 2015 +0100
@@ -264,9 +264,9 @@
         removedMethods do: [ :removedMethod | 
             | method |
 
-            method := methodDictionary at: removedMethod selector asSymbol ifAbsent: [ nil ].  
+            method := methodDictionary at: removedMethod asSymbol ifAbsent: [ nil ].  
             method notNil ifTrue: [
-                methodDictionary := methodDictionary removeKeyAndCompress: removedMethod selector asSymbol.
+                methodDictionary := methodDictionary removeKeyAndCompress: removedMethod asSymbol.
             ]
         ]
     ].
@@ -281,6 +281,7 @@
 
     "Created: / 28-09-2014 / 22:57:28 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
     "Modified: / 25-01-2015 / 14:42:56 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 10-05-2015 / 16:07:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !RBAbstractClass methodsFor:'enumerating'!