care for removed method (no protocol)
authorpenk
Wed, 21 Aug 2002 16:52:37 +0200
changeset 6725 43cfc975da45
parent 6724 e5b2bac20f37
child 6726 3447154f8aa4
care for removed method (no protocol)
Method.st
--- a/Method.st	Tue Aug 20 16:35:15 2002 +0200
+++ b/Method.st	Wed Aug 21 16:52:37 2002 +0200
@@ -1849,7 +1849,7 @@
 
     (cls isNil or:[(mthdPackage := self package) ~= cls package]) ifTrue:[
         mthdPackage ~= Project defaultProject package ifTrue:[
-            p := ' [ ' , mthdPackage allItalic , ' ] '.
+            p := ' [ ' , (mthdPackage ? '???') allItalic , ' ] '.
             p := p asText emphasisAllAdd:(SystemBrowser emphasisForDifferentPackage).
             isInChangeSet ifFalse:[
                 s := s asText emphasisAllAdd:(SystemBrowser emphasisForDifferentPackage).
@@ -2876,6 +2876,6 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.243 2002-07-17 09:26:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.244 2002-08-21 14:52:37 penk Exp $'
 ! !
 Method initialize!