src/MiniDocs/YQ.class.st

@@ -33,16 +33,12 @@ YQ class >> jsonToYaml: aDictionary [
 	| jsonFile |
 	self binaryFile exists ifFalse: [ YQ install].
 	jsonFile := MarkupFile exportAsFileOn: FileLocator temp / 'data.json' containing: aDictionary.
-	(Smalltalk os isUnix or: [ Smalltalk os isMacOS ]) 
+	OSSUnixSubprocess new
-		ifTrue: [
+	shellCommand: 'cat ', jsonFile fullName,' | yq -y';
-			OSSUnixSubprocess new
+	redirectStdout;
-				shellCommand: 'cat ', jsonFile fullName,' | yq -y';
+	runAndWaitOnExitDo: [ :command :outString |
-				redirectStdout;
+		^ outString 					
-				runAndWaitOnExitDo: [ :command :outString |
+	].
-					^ outString 					
-				]].
-	Smalltalk os isWindows 
-		ifTrue: [ ^ LibC resultOfCommand: 'yq -p=json ', jsonFile fullName  ].
 ]
 
 { #category : #accessing }