diff --git a/src/ExoRepo/GitHubWrapper.class.st b/src/ExoRepo/GitHubWrapper.class.st new file mode 100644 index 0000000..2e6c314 --- /dev/null +++ b/src/ExoRepo/GitHubWrapper.class.st @@ -0,0 +1,35 @@ +Class { + #name : #GitHubWrapper, + #superclass : #Object, + #instVars : [ + 'repository' + ], + #category : #'ExoRepo-External' +} + +{ #category : #accessing } +GitHubWrapper class >> apiEndPoint [ + ^ 'https://api.github.com/' asUrl +] + +{ #category : #accessing } +GitHubWrapper >> lastReleaseData [ + | releasesLink | + releasesLink := self class apiEndPoint addPathSegment: 'repos'. + self repository asUrl segments do: [:segment | + releasesLink addPathSegment: segment + ]. + releasesLink addPathSegment: 'releases'. + ^ (STONJSON + fromString: releasesLink retrieveContents) first +] + +{ #category : #accessing } +GitHubWrapper >> repository [ + ^ repository +] + +{ #category : #accessing } +GitHubWrapper >> repository: anUrl [ + repository := anUrl +] diff --git a/src/ExoRepo/YQ.class.st b/src/ExoRepo/YQ.class.st index 2424ca3..7290b3c 100644 --- a/src/ExoRepo/YQ.class.st +++ b/src/ExoRepo/YQ.class.st @@ -26,7 +26,9 @@ YQ class >> binaryFile [ { #category : #accessing } YQ class >> install [ - ^ self lastReleaseData + ^ GitHubWrapper new + repository: 'https://github.com/mikefarah/yq'; + lastReleaseData ] { #category : #accessing } @@ -45,9 +47,3 @@ YQ class >> jsonToYaml: aDictionary [ Smalltalk os isWindows ifTrue: [ ^ LibC resultOfCommand: 'yq -p=json ', jsonFile fullName ]. ] - -{ #category : #accessing } -YQ class >> lastReleaseData [ - ^ (STONJSON - fromString: 'https://api.github.com/repos/mikefarah/yq/releases' asUrl retrieveContents) first -]