--- a/MCMethodDefinition.st	Thu Dec 11 16:51:20 2014 +0100
+++ b/MCMethodDefinition.st	Thu Dec 11 16:53:47 2014 +0100
@@ -329,13 +329,12 @@
 unload
         | previousVersion class |
 
-        (class := self actualClass) ifNotNil: [class removeSelector: selector].
-        ^self.
+        #todo. "/ cg please check if the code below was not good after all
 
-        "Original stuff"
         self todo:'cg: why was the code below removed? see browsers previous versions code'.
-
-        self isOverrideMethod ifTrue: [previousVersion := self scanForPreviousVersion].
+        false ifTrue:[
+            self isOverrideMethod ifTrue: [previousVersion := self scanForPreviousVersion].
+        ].
         previousVersion
                 ifNil: [(class := self actualClass) ifNotNil: [class removeSelector: selector]]
                 ifNotNil: [previousVersion fileIn]
@@ -427,15 +426,15 @@
 !MCMethodDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMethodDefinition.st,v 1.15 2014-11-06 03:14:18 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMethodDefinition.st,v 1.16 2014-12-11 15:53:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMethodDefinition.st,v 1.15 2014-11-06 03:14:18 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMethodDefinition.st,v 1.16 2014-12-11 15:53:47 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: MCMethodDefinition.st,v 1.15 2014-11-06 03:14:18 vrany Exp $'
+    ^ '$Id: MCMethodDefinition.st,v 1.16 2014-12-11 15:53:47 cg Exp $'
 ! !