Changes in update docs. Adding 'AsString' because without it ZnClient downloads it in a weird way.

This commit is contained in:
Ivan Pulido 2015-06-06 20:10:21 +00:00 committed by Offray Luna
parent 9e696aee30
commit e4ebade806

View File

@ -287,7 +287,7 @@ GrafoscopioBrowser class >> updateDocumentationNew [
client isSuccess client isSuccess
ifTrue: [ filePath asFileReference ifTrue: [ filePath asFileReference
writeStreamDo: [ :stream | writeStreamDo: [ :stream |
stream write: client contents ]. stream write: client contents asString].
self inform: 'La actualización de la documentación ha terminado'. ] self inform: 'La actualización de la documentación ha terminado'. ]
ifFalse: [ self inform: 'Algo salió mal. Verifique su conexión a Internet.' ] ifFalse: [ self inform: 'Algo salió mal. Verifique su conexión a Internet.' ]
] ]
@ -973,7 +973,7 @@ GrafoscopioBrowser >> openHelpInGrafoscopio [
| currentChildren | | currentChildren |
GrafoscopioBrowser configureSettings. GrafoscopioBrowser configureSettings.
workingFile := (FileSystem disk workingDirectory parent / 'Docs' / 'Es' / 'Manual' / 'manual-grafoscopio.ston') asFileReference. workingFile := (FileSystem disk workingDirectory / 'Docs' / 'Es' / 'Manual' / 'manual-grafoscopio.ston') asFileReference.
currentChildren := (STON fromString: workingFile contents). currentChildren := (STON fromString: workingFile contents).
self buildBrowserNamed: workingFile basenameWithIndicator. self buildBrowserNamed: workingFile basenameWithIndicator.
mainTree := GrafoscopioNode new mainTree := GrafoscopioNode new