ExternalAddress.st
changeset 3487 565a1a49fbf9
parent 2957 46015145c398
child 3552 686923fc2096
--- a/ExternalAddress.st	Mon May 25 19:49:17 1998 +0200
+++ b/ExternalAddress.st	Tue May 26 17:11:57 1998 +0200
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.1.10 on 20-sep-1997 at 12:04:29 am'                !
-
 Object subclass:#ExternalAddress
 	instanceVariableNames:'address*'
 	classVariableNames:''
@@ -187,13 +185,13 @@
 displayString
     "return a printed representation of the receiver for displaying"
 
-    ^ 'ExternalAddress at:' , (self address printStringRadix:16)
+    ^ self class name , ' at:' , (self address printStringRadix:16)
 
-    "Modified: 20.9.1997 / 11:39:18 / cg"
+    "Modified: / 26.5.1998 / 16:11:50 / cg"
 ! !
 
 !ExternalAddress class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.11 1997-09-20 21:06:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.12 1998-05-26 15:11:57 cg Exp $'
 ! !