aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/vc
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/vc')
-rw-r--r--lisp/vc/vc-hg.el17
1 files changed, 5 insertions, 12 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index dab2c7256ba..62d0bb5ba5f 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -211,18 +211,11 @@ highlighting the Log View buffer."
211 (append 211 (append
212 (list "TERM=dumb" "LANGUAGE=C" "HGPLAIN=1") 212 (list "TERM=dumb" "LANGUAGE=C" "HGPLAIN=1")
213 process-environment))) 213 process-environment)))
214 (if (file-remote-p file) 214 (process-file
215 (process-file 215 vc-hg-program nil t nil
216 "env" nil t nil 216 "--config" "alias.status=status"
217 "HGPLAIN=1" vc-hg-program 217 "--config" "defaults.status="
218 "--config" "alias.status=status" 218 "status" "-A" (file-relative-name file)))
219 "--config" "defaults.status="
220 "status" "-A" (file-relative-name file))
221 (process-file
222 vc-hg-program nil t nil
223 "--config" "alias.status=status"
224 "--config" "defaults.status="
225 "status" "-A" (file-relative-name file))))
226 ;; Some problem happened. E.g. We can't find an `hg' 219 ;; Some problem happened. E.g. We can't find an `hg'
227 ;; executable. 220 ;; executable.
228 (error nil))))))) 221 (error nil)))))))