--- a/CharacterArray.st	Sat Mar 01 16:02:15 2014 +0100
+++ b/CharacterArray.st	Sat Mar 01 16:02:59 2014 +0100
@@ -723,6 +723,8 @@
     ^ self == CharacterArray
 ! !
 
+
+
 !CharacterArray methodsFor:'Compatibility-ANSI'!
 
 addLineDelimiters
@@ -1630,6 +1632,7 @@
 ! !
 
 
+
 !CharacterArray methodsFor:'character searching'!
 
 includesMatchCharacters
@@ -2076,21 +2079,24 @@
 !
 
 endsWith:aStringOrCharacter
-    "return true, if the receiver ends with something, aStringOrCharacter."
+    "return true, if the receiver ends with something, aStringOrCharacter.
+     If aStringOrCharacter is empty, true is returned"
 
     |s|
 
     (s := self string) ~~ self ifTrue:[
-	^ s endsWith:aStringOrCharacter
+        ^ s endsWith:aStringOrCharacter
     ].
     (self notEmpty and:[aStringOrCharacter isCharacter]) ifTrue:[
-	^ self last = aStringOrCharacter
+        ^ self last = aStringOrCharacter
     ].
     ^ super endsWith:aStringOrCharacter
 
     "
      'hello world' endsWith:'world'
      'hello world' asText allBold endsWith:'world'
+     'hello world' endsWith:''               
+     'hello world' asText allBold endsWith:''
     "
 
     "Modified: 12.5.1996 / 15:49:18 / cg"
@@ -5389,6 +5395,7 @@
     "Modified: 17.4.1997 / 12:50:23 / cg"
 ! !
 
+
 !CharacterArray methodsFor:'special string converting'!
 
 expandPlaceholders:escapeCharacter with:argArrayOrDictionary
@@ -6918,11 +6925,11 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.523 2014-02-17 14:12:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.524 2014-03-01 15:02:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.523 2014-02-17 14:12:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.524 2014-03-01 15:02:59 cg Exp $'
 ! !