--- a/Tools__MethodList.st Wed Mar 21 14:05:42 2012 +0000
+++ b/Tools__MethodList.st Wed Mar 21 17:50:14 2012 +0000
@@ -13,7 +13,7 @@
"{ NameSpace: Tools }"
-BrowserList subclass:#MethodList
+Tools::BrowserList subclass:#MethodList
instanceVariableNames:'classes selectedMethodNameIndices methodList lastSelectedMethods
browserNameList variableFilter filterClassVars updateProcess
lastShowClass lastShowCategory lastShowClassFirst
@@ -1696,16 +1696,16 @@
"/JV:
l := LabelAndIcon icon:icn string:s.
l image:redefIcon.
- icn ifNil:[l offset: 13].
+ icn isNil ifTrue:[l offset: 13].
l gap:1.
^ l
].
^ s
"Created: / 22-10-1996 / 19:51:00 / cg"
- "Modified: / 30-04-2010 / 11:54:32 / cg"
"Modified: / 15-08-2009 / 13:13:32 / Jan Vrany <vranyj1@fel.cvut.cz>"
"Modified: / 17-11-2011 / 20:51:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 07-03-2012 / 19:06:09 / cg"
! !
!MethodList methodsFor:'private-watching'!
@@ -1755,14 +1755,13 @@
!MethodList class methodsFor:'documentation'!
version
- ^ '$Id: Tools__MethodList.st 7911 2012-02-22 09:55:48Z vranyj1 $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.62 2012/03/07 18:06:39 cg Exp $'
!
version_CVS
- ^ '§Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.61 2011/11/17 20:06:05 vrany Exp §'
+ ^ '§Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.62 2012/03/07 18:06:39 cg Exp §'
!
version_SVN
- ^ '$Id: Tools__MethodList.st 7911 2012-02-22 09:55:48Z vranyj1 $'
+ ^ '$Id: Tools__MethodList.st 7952 2012-03-21 17:50:14Z vranyj1 $'
! !
-