From ce7b7c5810e616a0626ea77cdde5def59b158d3d Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Mon, 27 Jul 2020 20:52:44 -0500 Subject: [PATCH] Minor improves on documentation and markup utilities. --- .../Grafoscopio-Utils/GrafoscopioDocumentation.class.st | 2 +- repository/Grafoscopio-Utils/MarkupFile.class.st | 4 +++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/repository/Grafoscopio-Utils/GrafoscopioDocumentation.class.st b/repository/Grafoscopio-Utils/GrafoscopioDocumentation.class.st index 3c3bd92..4af7809 100644 --- a/repository/Grafoscopio-Utils/GrafoscopioDocumentation.class.st +++ b/repository/Grafoscopio-Utils/GrafoscopioDocumentation.class.st @@ -47,7 +47,7 @@ GrafoscopioDocumentation class >> update [ { #category : #updating } GrafoscopioDocumentation class >> updateAll [ - {GrafoscopioDocs . DatavizDocs . OffshoreLeaksDocs} do: [ :docs | docs update ] + GfUIHelpers docsCollection do: [ :docs | docs update ] ] { #category : #updating } diff --git a/repository/Grafoscopio-Utils/MarkupFile.class.st b/repository/Grafoscopio-Utils/MarkupFile.class.st index 53b3393..05a4832 100644 --- a/repository/Grafoscopio-Utils/MarkupFile.class.st +++ b/repository/Grafoscopio-Utils/MarkupFile.class.st @@ -14,8 +14,10 @@ Class { MarkupFile class >> exportAsFileOn: aFileReferenceOrFileName containing: text [ | file | file := aFileReferenceOrFileName asFileReference. + file ensureDelete. file exists ifFalse: [ file ensureCreateFile ]. file writeStreamDo: [ :stream | stream nextPutAll: text withInternetLineEndings]. - self inform: 'Exported as: ', String cr, file fullName + self inform: 'Exported as: ', String cr, file fullName. + ^ file ]