changed: #packageLabel
authorClaus Gittinger <cg@exept.de>
Sun, 04 Nov 2012 22:40:34 +0100
changeset 12025 6303fd576a49
parent 12024 d9abe8cde031
child 12026 8ab9fdf1d225
changed: #packageLabel for some reason, method happens to be nil sometimes?!
Tools__ProfilerInfoItem.st
--- a/Tools__ProfilerInfoItem.st	Sun Nov 04 22:21:17 2012 +0100
+++ b/Tools__ProfilerInfoItem.st	Sun Nov 04 22:40:34 2012 +0100
@@ -124,8 +124,10 @@
 !
 
 packageLabel
+    |pkg|
 
-    ^('[' , self method package , ']') asText allItalic
+    pkg := method isNil ifTrue:['???'] ifFalse:[method package].
+    ^('[' , pkg , ']') asText allItalic
 
     "Created: / 01-12-2007 / 20:58:18 / janfrog"
 !
@@ -201,7 +203,7 @@
 !ProfilerInfoItem class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProfilerInfoItem.st,v 1.4 2011-10-18 15:29:55 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProfilerInfoItem.st,v 1.5 2012-11-04 21:40:34 cg Exp $'
 !
 
 version_SVN