--- a/Tools__BreakpointBrowser.st	Fri Sep 07 12:37:19 2012 +0100
+++ b/Tools__BreakpointBrowser.st	Fri Sep 07 18:28:09 2012 +0100
@@ -1010,7 +1010,7 @@
 !
 
 messageSelectors
-    ^ (self messagesAndTypes collect:[:each | each first]) asSet.
+    ^ self messagesAndTypes collect:[:each | each first] as:Set.
 !
 
 update:something with:aParameter from:changedObject
@@ -1766,15 +1766,15 @@
 !BreakpointBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Tools__BreakpointBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.28 2012/08/13 14:23:56 stefan Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.27 2012/01/27 10:52:11 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.28 2012/08/13 14:23:56 stefan Exp §'
 !
 
 version_SVN
-    ^ '$Id: Tools__BreakpointBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: Tools__BreakpointBrowser.st 8048 2012-09-07 17:28:09Z vranyj1 $'
 ! !
 
 BreakpointBrowser initialize!