Tools__ProfilerInfoItem.st
changeset 10427 01d47e9f3201
parent 10059 6fe87cce6a78
child 10833 166d8d3ab12e
--- a/Tools__ProfilerInfoItem.st	Tue Aug 02 09:08:36 2011 +0200
+++ b/Tools__ProfilerInfoItem.st	Tue Aug 02 09:36:00 2011 +0200
@@ -103,12 +103,13 @@
 
     | mthd |
     mthd := self method.
-    ^mthd
-        ifNotNil:[method mclass]
-        ifNil:[UndefinedObject]
+    ^mthd notNil 
+        ifTrue:[method mclass]
+        ifFalse:[UndefinedObject]
 
     "Created: / 01-12-2007 / 20:49:57 / janfrog"
     "Modified: / 28-08-2010 / 21:02:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 02-08-2011 / 09:35:53 / cg"
 !
 
 methodLabel
@@ -132,12 +133,13 @@
 
     | mthd |
     mthd := self method.
-    ^mthd 
-        ifNotNil:[method selector]
-        ifNil:['<no method>']
+    ^mthd notNil 
+        ifTrue:[method selector]
+        ifFalse:['<no method>']
 
     "Created: / 01-12-2007 / 20:49:13 / janfrog"
     "Modified: / 28-08-2010 / 21:00:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 02-08-2011 / 09:35:32 / cg"
 !
 
 tally
@@ -198,7 +200,7 @@
 !ProfilerInfoItem class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProfilerInfoItem.st,v 1.2 2011-07-03 17:46:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProfilerInfoItem.st,v 1.3 2011-08-02 07:36:00 cg Exp $'
 !
 
 version_SVN