equal
deleted
inserted
replaced
259 command := UserPreferences current hgCommand. |
259 command := UserPreferences current hgCommand. |
260 command notNil ifTrue:[ |
260 command notNil ifTrue:[ |
261 command := command asString. |
261 command := command asString. |
262 ] |
262 ] |
263 ]. |
263 ]. |
264 command := OperatingSystem pathOfCommand:'hg'. |
264 command isNil ifTrue:[ |
|
265 command := OperatingSystem pathOfCommand:'hg'. |
|
266 ]. |
265 command isNil ifTrue:[ |
267 command isNil ifTrue:[ |
266 | guesses | |
268 | guesses | |
267 guesses := #(). |
269 guesses := #(). |
268 OperatingSystem isMSWINDOWSlike ifTrue:[ |
270 OperatingSystem isMSWINDOWSlike ifTrue:[ |
269 guesses := #( |
271 guesses := #( |
281 HGExecutable := nil. |
283 HGExecutable := nil. |
282 self basicNew executable |
284 self basicNew executable |
283 " |
285 " |
284 |
286 |
285 "Created: / 19-11-2012 / 21:48:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
287 "Created: / 19-11-2012 / 21:48:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
286 "Modified (format): / 25-04-2016 / 21:30:56 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
288 "Modified: / 12-05-2016 / 00:00:22 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
287 ! |
289 ! |
288 |
290 |
289 hgCommand: command |
291 hgCommand: command |
290 HGCommandString := command notNil ifTrue:[ command asString ] ifFalse:[ nil ]. |
292 HGCommandString := command notNil ifTrue:[ command asString ] ifFalse:[ nil ]. |
291 HGExecutable := HGExecutableArguments := HGVersion := nil. |
293 HGExecutable := HGExecutableArguments := HGVersion := nil. |