diff -r 6eb4414e6a31 -r 019bb9c842c5 ExternalAddress.st --- a/ExternalAddress.st Thu Apr 29 16:55:35 2010 +0100 +++ b/ExternalAddress.st Tue May 04 12:50:05 2010 +0100 @@ -151,9 +151,7 @@ instVarAt:index "redefined to suppress direct access to my address, which is a non-object" - index == 1 ifTrue:[ - ^ self address - ]. + index == 1 ifTrue:[^ self address]. ^ super instVarAt:index "Created: / 3.9.1999 / 13:47:03 / ps" @@ -306,13 +304,14 @@ !ExternalAddress class methodsFor:'documentation'! version - ^ '$Id: ExternalAddress.st 10517 2010-04-26 18:26:38Z vranyj1 $' + ^ '$Id: ExternalAddress.st 10520 2010-05-04 11:50:05Z vranyj1 $' ! version_CVS - ^ '§Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.24 2009/12/07 15:58:16 cg Exp §' + ^ 'Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.25 2010/04/08 11:57:19 cg Exp §' ! version_SVN - ^ '$Id: ExternalAddress.st 10517 2010-04-26 18:26:38Z vranyj1 $' + ^ '$Id: ExternalAddress.st 10520 2010-05-04 11:50:05Z vranyj1 $' ! ! +