repoPath fix.
This commit is contained in:
parent
a28e3652de
commit
4393c48b96
@ -28,9 +28,10 @@ MCGiteabRepository >> branches [
|
||||
| response |
|
||||
response := OrderedDictionary new.
|
||||
OSSUnixSubprocess new
|
||||
shellCommand: 'restify --class="gt-ellipsis" ', 'https://', self projectPath, '/branches';
|
||||
shellCommand: 'restify --class="gt-ellipsis" ', 'https://', self projectPath, '/', self repoPath, '/branches';
|
||||
redirectStdout;
|
||||
runAndWaitOnExitDo: [ :command :outString |
|
||||
outString ifEmpty: [^ command ].
|
||||
(STON fromString: outString) do: [:each |
|
||||
response at: (each at: 'text') put: (each at: 'href')
|
||||
]
|
||||
|
Loading…
Reference in New Issue
Block a user