MCStXSnapshotPreWriteTransformation.st
branchjv
changeset 1145 ee708f06f612
parent 1131 79318af3b3c4
child 1147 d9ff96becc42
--- a/MCStXSnapshotPreWriteTransformation.st	Mon May 03 22:43:54 2021 +0100
+++ b/MCStXSnapshotPreWriteTransformation.st	Tue May 04 11:31:43 2021 +0100
@@ -1,5 +1,5 @@
 "
-COPYRIGHT (c) 2020 LabWare
+COPYRIGHT (c) 2020-2021 LabWare
 "
 "{ Package: 'stx:goodies/monticello' }"
 
@@ -16,7 +16,7 @@
 
 copyright
 "
-COPYRIGHT (c) 2020 LabWare
+COPYRIGHT (c) 2020-2021 LabWare
 
 
 "
@@ -211,7 +211,7 @@
     definition accept: original options porter.
 
     source := definition source asStringWithNativeLineEndings.  "/ Make sure source has native line endings
-    source := self class reindentUsingTabsOnly: source.         "/ Make sure there are only tabs (norm on Squeak / Pharo)
+    source := source spacesToTabs.                              "/ Make sure there are only tabs (norm on Squeak / Pharo)
     source := source asStringWithSqueakLineEndings.             "/ Make sure source has Squeak line endings
     source := source asSingleByteStringIfPossible.              "/ Convert to single byte string
     definition source: source.
@@ -232,7 +232,7 @@
 
     "Created: / 30-05-2013 / 22:48:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 10-05-2015 / 15:08:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 03-07-2020 / 00:52:42 / Jan Vrany <jan.vrany@labware.com>"
+    "Modified: / 04-05-2021 / 11:25:30 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 visitOrganizationDefinition: defintion