--- a/CharacterEncoderImplementations__ISO10646_to_SGML.st	Mon Oct 23 12:20:55 2006 +0200
+++ b/CharacterEncoderImplementations__ISO10646_to_SGML.st	Mon Oct 23 13:25:11 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 "{ NameSpace: CharacterEncoderImplementations }"
@@ -123,12 +122,9 @@
 !
 
 encodeString:aUnicodeString
-    "return the UTF-8 representation of a aUnicodeString.
+    "return the SGML representation of aUnicodeString.
      The resulting string is only useful to be stored on some external file,
-     not for being used inside ST/X.
-
-     If you work a lot with utf8 encoded textFiles, 
-     this is a first-class candidate for a primitive."
+     not for being used inside ST/X."
 
     |ch in out codePoint|
 
@@ -151,10 +147,12 @@
      CharacterEncoderImplementations::ISO10646_to_SGML
         encodeString:'hello äöü' 
     "
+
+    "Modified: / 23-10-2006 / 13:25:27 / cg"
 ! !
 
 !ISO10646_to_SGML class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_SGML.st,v 1.2 2004-03-12 12:52:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_SGML.st,v 1.3 2006-10-23 11:25:11 cg Exp $'
 ! !

--- a/Encoder_ISO10646_to_SGML.st	Mon Oct 23 12:20:55 2006 +0200
+++ b/Encoder_ISO10646_to_SGML.st	Mon Oct 23 13:25:11 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 "{ NameSpace: CharacterEncoderImplementations }"
@@ -123,12 +122,9 @@
 !
 
 encodeString:aUnicodeString
-    "return the UTF-8 representation of a aUnicodeString.
+    "return the SGML representation of aUnicodeString.
      The resulting string is only useful to be stored on some external file,
-     not for being used inside ST/X.
-
-     If you work a lot with utf8 encoded textFiles, 
-     this is a first-class candidate for a primitive."
+     not for being used inside ST/X."
 
     |ch in out codePoint|
 
@@ -151,10 +147,12 @@
      CharacterEncoderImplementations::ISO10646_to_SGML
         encodeString:'hello äöü' 
     "
+
+    "Modified: / 23-10-2006 / 13:25:27 / cg"
 ! !
 
 !ISO10646_to_SGML class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_ISO10646_to_SGML.st,v 1.2 2004-03-12 12:52:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_ISO10646_to_SGML.st,v 1.3 2006-10-23 11:25:11 cg Exp $'
 ! !