Adding platform specific commands for exportation before testing on Windows.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2020-10-09 13:22:59 -05:00
parent b679e231ec
commit f3458babb6

View File

@ -72,6 +72,7 @@ Markdown >> exportMetadataAsJson [
in '.local/share/Grafoscopio/Scripts' should be developed in the near future."
| output luaScript |
luaScript := FileLocator home / '.local/share/Brea/scripts/meta-to-json.lua'.
Smalltalk platformName = 'unix' ifTrue: [
OSSUnixSubprocess new
workingDirectory: self file parent fullName;
command: 'pandoc';
@ -82,7 +83,7 @@ Markdown >> exportMetadataAsJson [
output := process isSuccess
ifTrue: [ outString ]
ifFalse: [ errString ]
].
]].
^ output correctAccentedCharacters
]