* lisp/htmlfontify.el (hfy-which-etags): Fix it.

This commit is contained in:
Glenn Morris 2017-12-13 13:55:29 -05:00
parent 52d2a690f6
commit 7e2f4d3d41

View file

@ -370,8 +370,8 @@ commands in `hfy-etags-cmd-alist'."
(when (eq (call-process hfy-etags-bin nil t nil "--version") 0) (when (eq (call-process hfy-etags-bin nil t nil "--version") 0)
(goto-char (point-min)) (goto-char (point-min))
(cond (cond
((looking-at-p "exube") "exuberant ctags") ((search-forward "exube" nil t) "exuberant ctags")
((looking-at-p "GNU E") "emacs etags"))) ((search-forward "GNU E" nil t) "emacs etags")))
;; Return nil if the etags binary isn't executable (Bug#25468). ;; Return nil if the etags binary isn't executable (Bug#25468).
(file-error nil)))) (file-error nil))))