1. Frank Fischer
  2. evil
Issue #377 resolved

Latest version can't init

Anonymous created an issue

When I launch emacs after updating (last time about a month or two ago), I get this:

File error: Searching for program, no such file or directory, hg

Backtrace:

Debugger entered--Lisp error: (file-error "Searching for program" "no such file or directory" "hg")
  call-process("hg" nil (t nil) nil "parents" "--template" "evil-hg-{node|short}")
  (zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}"))
  (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))
  (progn (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev")))
  (unwind-protect (progn (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (cond ((zerop (call-process "git" nil (quote ...) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote ...) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  (with-current-buffer temp-buffer (unwind-protect (progn (cond ((zerop (call-process "git" nil (quote ...) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote ...) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-buffer temp-buffer (unwind-protect (progn (cond ((zerop (call-process "git" nil ... nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring ... ...))) ((zerop (call-process "hg" nil ... nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
  (with-temp-buffer (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev")))
  (progn (with-temp-buffer (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))))
  eval((progn (with-temp-buffer (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev")))) nil)
  #[128 "\301\302\303B\"D\207" [lexical-binding quote eval progn] 5 1624468]((with-temp-buffer (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))))
  (eval-when-compile (with-temp-buffer (cond ((zerop (call-process "git" nil (quote (t nil)) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote (t nil)) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev"))))
  (defconst evil-version (eval-when-compile (with-temp-buffer (cond ((zerop (call-process "git" nil (quote ...) nil "rev-parse" "--short" "HEAD")) (goto-char (point-min)) (concat "evil-git-" (buffer-substring (point-min) (line-end-position)))) ((zerop (call-process "hg" nil (quote ...) nil "parents" "--template" "evil-hg-{node|short}")) (goto-char (point-min)) (buffer-substring (point-min) (line-end-position))) (t "1.0-dev")))) "The current version of Evil")
  eval-buffer(#<buffer  *load*-698017> nil "/home/user/.emacs.d/elpa/evil-20140331.2342/evil-vars.el" nil t)  ; Reading at buffer position 50044
  load-with-code-conversion("/home/user/.emacs.d/elpa/evil-20140331.2342/evil-vars.el" "/home/user/.emacs.d/elpa/evil-20140331.2342/evil-vars.el" nil t)
  require(evil-vars)
  eval-buffer(#<buffer  *load*-449688> nil "/home/user/.emacs.d/elpa/evil-20140331.2342/evil.el" nil t)  ; Reading at buffer position 4105
  load-with-code-conversion("/home/user/.emacs.d/elpa/evil-20140331.2342/evil.el" "/home/user/.emacs.d/elpa/evil-20140331.2342/evil.el" nil t)
  require(evil)
  eval-buffer(#<buffer  *load*> nil "/home/user/.emacs" nil t)  ; Reading at buffer position 931
  load-with-code-conversion("/home/user/.emacs" "/home/user/.emacs" t t)
  load("~/.emacs" t t)
  #[0 "\205\262

Comments (2)

  1. Log in to comment