comment/format in: #,
authorClaus Gittinger <cg@exept.de>
Sun, 01 Apr 2012 13:20:41 +0200
changeset 2733 987dba8e00b6
parent 2732 ce767436e959
child 2734 38fd2b4e49ec
comment/format in: #,
Text.st
--- a/Text.st	Wed Mar 14 17:31:21 2012 +0100
+++ b/Text.st	Sun Apr 01 13:20:41 2012 +0200
@@ -642,11 +642,11 @@
 !Text methodsFor:'copying'!
 
 , aStringOrText
-    "concatenate the receivers characters with the arguments characters, 
+    "concatenate the receiver's characters with the argument's characters, 
      and return string or text object containing those characters.
      If either the receiver or the argument contains emphasis information,
-     a text object will be returned. Otherwise, a string (i.e. without emphasis)
-     is returned."
+     a text object will be returned. 
+     Otherwise, a string (i.e. without emphasis) is returned."
 
     |newRuns|
 
@@ -674,7 +674,8 @@
      ('hello' asText allBold) , (' world' asText allBold)
     "
 
-    "Modified: / 31.3.1998 / 16:34:04 / cg"
+    "Modified: / 31-03-1998 / 16:34:04 / cg"
+    "Modified (comment): / 01-04-2012 / 13:20:02 / cg"
 !
 
 concatenateFromString:aString
@@ -1791,11 +1792,11 @@
 !Text class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.112 2012-03-06 17:23:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.113 2012-04-01 11:20:41 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.112 2012-03-06 17:23:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.113 2012-04-01 11:20:41 cg Exp $'
 ! !
 
 Text initialize!