--- a/extensions.st	Mon Aug 22 10:36:12 2011 +0200
+++ b/extensions.st	Tue Aug 23 00:58:47 2011 +0200
@@ -65,6 +65,26 @@
     "Created: / 08-11-2010 / 17:56:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!CharacterArray methodsFor:'*monticello-squeakCompatibility'!
+
+asStringWithNativeLineEndings
+
+    ^self copyReplaceAll:Character return with: Character cr
+
+    "Created: / 12-09-2010 / 16:00:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 13-10-2010 / 17:27:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!CharacterArray methodsFor:'*monticello-squeakCompatibility'!
+
+asStringWithSqueakLineEndings
+
+    ^self copyReplaceAll:Character cr with: Character return
+
+    "Created: / 12-09-2010 / 16:00:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 13-10-2010 / 17:28:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !Class methodsFor:'*monticello'!
 
 asClassDefinition
@@ -271,26 +291,6 @@
 	^ false
 ! !
 
-!String methodsFor:'*monticello-squeakCompatibility'!
-
-asStringWithNativeLineEndings
-
-    ^self copyReplaceAll:Character return with: Character cr
-
-    "Created: / 12-09-2010 / 16:00:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 13-10-2010 / 17:27:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!String methodsFor:'*monticello-squeakCompatibility'!
-
-asStringWithSqueakLineEndings
-
-    ^self copyReplaceAll:Character cr with: Character return
-
-    "Created: / 12-09-2010 / 16:00:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 13-10-2010 / 17:28:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
 !String methodsFor:'*monticello'!
 
 extractNumber
@@ -473,5 +473,5 @@
 !stx_goodies_monticello class methodsFor:'documentation'!
 
 extensionsVersion_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/extensions.st,v 1.8 2011-08-20 16:15:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/extensions.st,v 1.9 2011-08-22 22:58:47 vrany Exp $'
 ! !
\ No newline at end of file