# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1427742226 -7200
# Node ID f180c4847ddc2c391c3178aca9b83303e35cf3c3
# Parent  177321c514a9f7fbe9b834413df190b28b109701
class: CharacterArray
comment/format in: #asSingleByteStringIfPossible

diff -r 177321c514a9 -r f180c4847ddc CharacterArray.st
--- a/CharacterArray.st	Sun Mar 29 03:07:59 2015 +0200
+++ b/CharacterArray.st	Mon Mar 30 21:03:46 2015 +0200
@@ -734,6 +734,7 @@
     ^ self == CharacterArray
 ! !
 
+
 !CharacterArray methodsFor:'Compatibility-ANSI'!
 
 addLineDelimiters
@@ -3228,7 +3229,8 @@
 
 asSingleByteStringIfPossible
     "if possible, return the receiver converted to a 'normal' string.
-     It is only possible, if there are no characters with codePoints above 255 in the receiver."
+     It is only possible, if there are no characters with codePoints above 255 in the receiver.
+     If not possible, the (wideString) receiver is returned."
 
     self isWideString ifFalse:[^ self].
     (self contains:[:char | char codePoint > 255]) ifFalse:[^ self asSingleByteString].
@@ -7380,11 +7382,11 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.580 2015-03-28 08:49:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.581 2015-03-30 19:03:46 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.580 2015-03-28 08:49:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.581 2015-03-30 19:03:46 cg Exp $'
 ! !