Show More
@@ -67,11 +67,10 b'' | |||
|
67 | 67 | :group 'tools) |
|
68 | 68 | |
|
69 | 69 | (defcustom hg-binary |
|
70 | (dolist (path '("~/bin/hg" | |
|
71 | "/usr/bin/hg" | |
|
72 | "/usr/local/bin/hg")) | |
|
73 | (when (file-executable-p path) | |
|
74 | (return path))) | |
|
70 | (or (executable-find "hg") | |
|
71 | (dolist (path '("~/bin/hg" "/usr/bin/hg" "/usr/local/bin/hg")) | |
|
72 | (when (file-executable-p path) | |
|
73 | (return path)))) | |
|
75 | 74 | "The path to Mercurial's hg executable." |
|
76 | 75 | :type '(file :must-match t) |
|
77 | 76 | :group 'mercurial) |
General Comments 0
You need to be logged in to leave comments.
Login now