summaryrefslogtreecommitdiff
path: root/lisp/htmlfontify.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2017-12-13 13:55:29 -0500
committerGlenn Morris <rgm@gnu.org>2017-12-13 13:55:29 -0500
commit7e2f4d3d416fc06a4462c8c4c38ec1b54b02611a (patch)
treeaf89c9bc638078f88a6d8f4d8880b83f70edebda /lisp/htmlfontify.el
parent52d2a690f66de135fbfbcf5a195014e24be64170 (diff)
downloademacs-7e2f4d3d416fc06a4462c8c4c38ec1b54b02611a.tar.gz
* lisp/htmlfontify.el (hfy-which-etags): Fix it.
Diffstat (limited to 'lisp/htmlfontify.el')
-rw-r--r--lisp/htmlfontify.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el
index 0c5a2477e5d..aa7cf430a4d 100644
--- a/lisp/htmlfontify.el
+++ b/lisp/htmlfontify.el
@@ -370,8 +370,8 @@ commands in `hfy-etags-cmd-alist'."
(when (eq (call-process hfy-etags-bin nil t nil "--version") 0)
(goto-char (point-min))
(cond
- ((looking-at-p "exube") "exuberant ctags")
- ((looking-at-p "GNU E") "emacs etags")))
+ ((search-forward "exube" nil t) "exuberant ctags")
+ ((search-forward "GNU E" nil t) "emacs etags")))
;; Return nil if the etags binary isn't executable (Bug#25468).
(file-error nil))))