Use new icon names: fullBreakPointedIcon and lineBreakPointedIcon
instead of old #breakPointedIcon and #stopIcon (which are obsoleted now)
--- a/Tools__MethodList.st Wed Mar 05 11:39:09 2014 +0100
+++ b/Tools__MethodList.st Wed Mar 05 11:40:08 2014 +0100
@@ -1666,7 +1666,7 @@
s := s copyButLast:2
].
aMethod isBreakpointed ifTrue:[
- icn := self stopIcon
+ icn := self fullBreakPointedIcon.
] ifFalse:[
aMethod isTimed ifTrue:[
icn := self timeIcon
@@ -1681,7 +1681,7 @@
"/
icn isNil ifTrue:[
(aMethod notNil and:[aMethod isMethodWithBreakpoints]) ifTrue:[
- icn := self breakPointedIcon
+ icn := self lineBreakPointedIcon
].
].
@@ -1843,7 +1843,7 @@
"Created: / 22-10-1996 / 19:51:00 / cg"
"Modified: / 15-08-2009 / 13:13:32 / Jan Vrany <vranyj1@fel.cvut.cz>"
"Modified: / 07-03-2012 / 19:06:09 / cg"
- "Modified: / 05-03-2014 / 10:07:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 05-03-2014 / 10:31:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!MethodList methodsFor:'private-watching'!
@@ -1893,10 +1893,10 @@
!MethodList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.99 2014-03-05 10:12:25 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.100 2014-03-05 10:40:08 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.99 2014-03-05 10:12:25 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.100 2014-03-05 10:40:08 vrany Exp $'
! !