From 74b8d4cc9e3ea8017e850eb9b1a3ac67c5c42471 Mon Sep 17 00:00:00 2001 From: Dale Henrichs Date: Thu, 24 Oct 2024 16:29:00 -0700 Subject: [PATCH] bugfixes for exportRowanPackagesAsTopaz.solo and exportRowanProjectAsTopaz.solo --- bin/exportRowanPackagesAsTopaz.solo | 4 ++-- bin/exportRowanProjectAsTopaz.solo | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/bin/exportRowanPackagesAsTopaz.solo b/bin/exportRowanPackagesAsTopaz.solo index 7340fba..4d1530e 100755 --- a/bin/exportRowanPackagesAsTopaz.solo +++ b/bin/exportRowanPackagesAsTopaz.solo @@ -65,8 +65,8 @@ doit self positionalArgs size < 1 ifTrue: [ self error: 'Expected at least one package name.' ]. packageNamesMap := Dictionary new. - packageNamesMap at: topazFilename put: self positionalArgs asSet. - topazFilename asFileReference writeStreamDo: [:stream | stream truncate ]. "make sure the file is truncated -- Rowan issue fixed in masterV3.3" + packageNamesMap at: topazFilename asFileReference base put: self positionalArgs asSet. + (topazFilename asFileReference) writeStreamDo: [:stream | stream truncate ]. "make sure the file is truncated -- Rowan issue fixed in masterV3.2" (projectSet projectNamed: projectName) exportTopazFormatTo: topazFilename logClassCreation: false diff --git a/bin/exportRowanProjectAsTopaz.solo b/bin/exportRowanProjectAsTopaz.solo index e8285d1..12c0880 100755 --- a/bin/exportRowanProjectAsTopaz.solo +++ b/bin/exportRowanProjectAsTopaz.solo @@ -59,7 +59,7 @@ doit projectsHome: self projectsHome; yourself. projectSet := (loadSpec resolve: loadSpec customConditionalAttributes, Rowan platformConditionalAttributes) read. - topazFilename asFileReference writeStreamDo: [:stream | stream truncate ]. "make sure the file is truncated -- Rowan issue fixed in masterV3.3" + topazFilename asFileReference writeStreamDo: [:stream | stream truncate ]. "make sure the file is truncated -- Rowan issue fixed in masterV3.2" (projectSet projectNamed: projectName) exportTopazFormatTo: topazFilename logClassCreation: false