extensions.st
changeset 1 8a5b7afa28ff
child 2 a26b35650f67
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/extensions.st	Thu Aug 30 11:46:39 2012 +0000
@@ -0,0 +1,34 @@
+"{ Package: 'stx:goodies/cypress' }"!
+
+!CharacterArray methodsFor:'Compatibility-Cuis'!
+
+withLineEndings: lineEndString
+    | stringColl |
+
+    self assert: lineEndString size == 1.
+
+    stringColl := self asStringCollection.
+
+    ^stringColl
+        asStringWith: lineEndString first 
+        from:1 to:(stringColl size) 
+        compressTabs:false 
+        final:nil
+
+    "Created: / 30-08-2012 / 11:27:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!CharacterArray class methodsFor:'Compatibility-Cuis'!
+
+lfString
+
+    ^String with: Character lf.
+
+    "Created: / 30-08-2012 / 11:27:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!stx_goodies_cypress class methodsFor:'documentation'!
+
+extensionsVersion_SVN
+    ^ '$Id::                                                                                                                        $'
+! !
\ No newline at end of file