repoPath fix.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-04-13 21:05:35 -05:00
parent a28e3652de
commit 4393c48b96

View File

@ -28,9 +28,10 @@ MCGiteabRepository >> branches [
| response | | response |
response := OrderedDictionary new. response := OrderedDictionary new.
OSSUnixSubprocess new OSSUnixSubprocess new
shellCommand: 'restify --class="gt-ellipsis" ', 'https://', self projectPath, '/branches'; shellCommand: 'restify --class="gt-ellipsis" ', 'https://', self projectPath, '/', self repoPath, '/branches';
redirectStdout; redirectStdout;
runAndWaitOnExitDo: [ :command :outString | runAndWaitOnExitDo: [ :command :outString |
outString ifEmpty: [^ command ].
(STON fromString: outString) do: [:each | (STON fromString: outString) do: [:each |
response at: (each at: 'text') put: (each at: 'href') response at: (each at: 'text') put: (each at: 'href')
] ]