diff -r 895e545534f0 -r 8f25029eb991 Tools__BreakpointBrowser.st --- a/Tools__BreakpointBrowser.st Wed May 06 08:03:12 2015 +0200 +++ b/Tools__BreakpointBrowser.st Fri May 08 06:59:19 2015 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 2008 by eXept Software AG All Rights Reserved @@ -93,8 +95,13 @@ ). ! -initialize - MessagesAndTypes := self defaultListOfMessagesAndTypes +messagesAndTypes + "the spec of selectors to search for coded breakpoints" + + MessagesAndTypes isNil ifTrue:[ + MessagesAndTypes := self defaultListOfMessagesAndTypes + ]. + ^ MessagesAndTypes ! ! !BreakpointBrowser class methodsFor:'defaults'! @@ -849,7 +856,7 @@ messagesAndTypes "the spec of selectors to search for coded breakpoints" - ^ MessagesAndTypes + ^ self class messagesAndTypes ! selectedBreakpointListEntry @@ -2057,12 +2064,10 @@ !BreakpointBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.54 2015-02-24 11:48:49 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.55 2015-05-07 22:32:03 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.54 2015-02-24 11:48:49 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.55 2015-05-07 22:32:03 cg Exp $' ! ! - -BreakpointBrowser initialize!