CharacterArray.st
changeset 24142 ec133d719bed
parent 24120 1857df80bf3c
child 24145 60971523ce2f
--- a/CharacterArray.st	Fri May 24 01:06:33 2019 +0200
+++ b/CharacterArray.st	Fri May 24 09:24:05 2019 +0200
@@ -8453,10 +8453,13 @@
     "
      'helloworld' withoutPrefix:'hello'
      'helloworld' withoutPrefix:'foo'
+     'helloworld' withoutPrefix:$h
+     'helloworld' withoutPrefix:#( $h )
     "
 
     "Modified: / 30-04-2016 / 10:01:00 / cg"
     "Modified: / 31-07-2018 / 17:05:36 / Claus Gittinger"
+    "Modified (comment): / 24-05-2019 / 09:22:54 / Claus Gittinger"
 !
 
 withoutPrefix:aStringOrCharacter caseSensitive:caseSensitive
@@ -8473,12 +8476,15 @@
     ^ self
 
     "
-     'helloworld' withoutPrefix:'hello'
-     'helloworld' withoutPrefix:'foo'
+     'Helloworld' withoutPrefix:'hello' caseSensitive:false
+     'Helloworld' withoutPrefix:'foo' caseSensitive:false
+     'Helloworld' withoutPrefix:$h caseSensitive:false
+     'Helloworld' withoutPrefix:#( $h ) caseSensitive:false
     "
 
     "Created: / 27-07-2018 / 08:30:03 / Claus Gittinger"
     "Modified: / 31-07-2018 / 17:05:53 / Claus Gittinger"
+    "Modified (comment): / 24-05-2019 / 09:23:30 / Claus Gittinger"
 !
 
 withoutQuotes