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