checkin from browser
authorClaus Gittinger <cg@exept.de>
Thu, 12 Aug 1999 10:59:29 +0200
changeset 4595 24446fd5d3e1
parent 4594 eb09f567a3bc
child 4596 66a082fbc5b3
checkin from browser
Method.st
--- 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!