--- a/MethodFinderWindow.st	Tue Dec 22 12:04:53 2009 +0100
+++ b/MethodFinderWindow.st	Tue Dec 22 18:20:48 2009 +0100
@@ -476,6 +476,7 @@
     messageAnswerEditor contents:nil.
     self resultHolder value:nil.
     self classOfResultHolder value: nil.
+    codeHolder value:nil.
 !
 
 extractClassAndSelectorFrom:anArgument 
@@ -992,4 +993,8 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !