--- a/Method.st Thu Aug 12 10:58:36 1999 +0200
+++ b/Method.st Thu Aug 12 10:59:29 1999 +0200
@@ -1613,7 +1613,7 @@
s := selector.
self package ~= self containingClass package ifTrue:[
- s := s , ' { ' , self package , ' }'
+ s := s , ' [' , (self package asText emphasizeAllWith:#italic), ']'
].
moreInfo size == 0 ifTrue:[^ s].
@@ -2416,6 +2416,6 @@
!Method class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.173 1999-08-10 17:30:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.174 1999-08-12 08:59:29 cg Exp $'
! !
Method initialize!