From: Glenn Morris <rgm@gnu.org>
Date: Wed, 13 Dec 2017 18:55:29 +0000 (-0500)
Subject: * lisp/htmlfontify.el (hfy-which-etags): Fix it.
X-Git-Tag: emacs-26.0.91~158
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7e2f4d3;p=emacs.git

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

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))))