changed: #listEntryForMethod:selector:class:showClass:showCategory:classFirst:
authorClaus Gittinger <cg@exept.de>
Wed, 07 Mar 2012 19:06:39 +0100
changeset 11385 099b8067afcb
parent 11384 4e791a36cfaf
child 11386 58298a5a7c1a
changed: #listEntryForMethod:selector:class:showClass:showCategory:classFirst:
Tools_MethodList.st
--- a/Tools_MethodList.st	Wed Mar 07 18:21:49 2012 +0100
+++ b/Tools_MethodList.st	Wed Mar 07 19:06:39 2012 +0100
@@ -1686,16 +1686,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'!
@@ -1745,9 +1745,9 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$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_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 $'
 ! !