--- a/MethodWithBreakpoints.st	Fri Nov 21 15:51:11 2014 +0100
+++ b/MethodWithBreakpoints.st	Fri Nov 21 20:42:04 2014 +0100
@@ -89,7 +89,7 @@
 
     BreakpointedMethods isNil ifTrue:[^ #() ].
     invalidBreakpoints := BreakpointedMethods select:[:m | m mclass isNil].
-    invalidBreakpoints do:[:each | BreakpointedMethods remove:each].
+    invalidBreakpoints do:[:each | BreakpointedMethods remove:each ifAbsent:nil].
     ^ BreakpointedMethods asOrderedCollection
 ! !
 
@@ -167,11 +167,11 @@
 !MethodWithBreakpoints class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MethodWithBreakpoints.st,v 1.8 2014-07-23 14:13:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MethodWithBreakpoints.st,v 1.9 2014-11-21 19:42:04 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/MethodWithBreakpoints.st,v 1.8 2014-07-23 14:13:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MethodWithBreakpoints.st,v 1.9 2014-11-21 19:42:04 cg Exp $'
 ! !