Replacing with GToolkit's OS process manager.
This commit is contained in:
parent
4fab465883
commit
b5f4602796
@ -302,10 +302,11 @@ TiddlyWiki >> exportJSONFileOptimized [
|
|||||||
exporter := wikiFolder / 'scripts' / 'exportJsonFile'.
|
exporter := wikiFolder / 'scripts' / 'exportJsonFile'.
|
||||||
exporter exists ifFalse: [ self installJsonExporter ].
|
exporter exists ifFalse: [ self installJsonExporter ].
|
||||||
|
|
||||||
OSSUnixSubprocess new
|
GtSubprocessWithInMemoryOutput new
|
||||||
command: exporter fullName;
|
command: exporter fullName;
|
||||||
workingDirectory: exporter parent fullName;
|
workingDirectory: exporter parent fullName;
|
||||||
runAndWaitOnExitDo: [ :process :outString | ^ self jsonFile ]
|
runAndWait.
|
||||||
|
^ self jsonFile
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
@ -540,22 +541,20 @@ TiddlyWiki >> importSTONFilesFrom: aFolder [
|
|||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
TiddlyWiki >> installJsonExporter [
|
TiddlyWiki >> installJsonExporter [
|
||||||
|
|
||||||
| folder |
|
| subfolder |
|
||||||
folder := (self file parent / 'scripts') ensureCreateDirectory.
|
subfolder := (self folder / 'scripts') ensureCreateDirectory.
|
||||||
ZnClient new
|
ZnClient new
|
||||||
url: 'https://mutabit.com/repos.fossil/mutabit/uv/wiki/scripts/exportJsonFile';
|
url: 'https://mutabit.com/repos.fossil/mutabit/uv/wiki/scripts/exportJsonFile';
|
||||||
downloadTo: folder / 'exportJsonFile'.
|
downloadTo: subfolder / 'exportJsonFile'.
|
||||||
ZnClient new
|
ZnClient new
|
||||||
url: 'https://mutabit.com/repos.fossil/mutabit/doc/trunk/wiki/scripts/exportJsonFile.nim';
|
url: 'https://mutabit.com/repos.fossil/mutabit/doc/trunk/wiki/scripts/exportJsonFile.nim';
|
||||||
downloadTo: folder / 'exportJsonFile.nim'.
|
downloadTo: subfolder / 'exportJsonFile.nim'.
|
||||||
|
|
||||||
OSSUnixSubprocess new
|
^ GtSubprocessWithInMemoryOutput new
|
||||||
command: 'chmod';
|
command: 'chmod +x ' , ((subfolder / 'exportJsonFile') fullName);
|
||||||
arguments: { '+x' . (folder / 'exportJsonFile') fullName };
|
workingDirectory: subfolder fullName;
|
||||||
workingDirectory: folder fullName;
|
runAndWait;
|
||||||
redirectStdout;
|
stdout
|
||||||
redirectStderr;
|
|
||||||
runAndWaitOnExitDo: [ :process :outString | ^ outString ]
|
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
|
Loading…
Reference in New Issue
Block a user