class: CharacterArray>>#includesSubstring: (for Squeak compatibility)
authorJan Vrany <jan.vrany@fit.cvut.cz>
Fri, 03 Oct 2014 03:48:38 +0200
changeset 16875 32e61bb3a742
parent 16874 0fbfe9ca3f3c
child 16876 7e3ad01ca413
class: CharacterArray>>#includesSubstring: (for Squeak compatibility)
CharacterArray.st
--- a/CharacterArray.st	Thu Oct 02 20:19:36 2014 +0200
+++ b/CharacterArray.st	Fri Oct 03 03:48:38 2014 +0200
@@ -1055,6 +1055,12 @@
     ^ self includesSubstring:aString caseSensitive:caseSensitive
 !
 
+includesSubstring: aString
+    ^ self includesSubString: aString
+
+    "Created: / 03-10-2014 / 02:47:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 includesSubstring:aString caseSensitive:caseSensitive
     "return true, if a substring is contained in the receiver.
      The argument, caseSensitive controls if case is ignored in the compare."
@@ -1619,7 +1625,6 @@
     ^ true
 ! !
 
-
 !CharacterArray methodsFor:'JavaScript support'!
 
 unquote
@@ -5438,7 +5443,6 @@
     "Modified: 17.4.1997 / 12:50:23 / cg"
 ! !
 
-
 !CharacterArray methodsFor:'special string converting'!
 
 asUnixFilenameString
@@ -6417,7 +6421,6 @@
     "
 ! !
 
-
 !CharacterArray methodsFor:'substring searching'!
 
 findRangeOfString:subString
@@ -7001,14 +7004,15 @@
     ^ aVisitor visitString:self with:aParameter
 ! !
 
+
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.542 2014-09-26 16:17:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.543 2014-10-03 01:48:38 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.542 2014-09-26 16:17:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.543 2014-10-03 01:48:38 vrany Exp $'
 ! !