(etags-verify-tags-table): Use eq instead of = in case char-after returns

nil.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 04932d29c4ed8cfad3e9c13ed0b780a24ba537e4..acd9c3a995a3375b02334d94cdcc8d7f8a7bebb6 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -816,7 +816,8 @@ See documentation of variable `tags-file-name'."
 
 ;; Return non-nil iff the current buffer is a valid etags TAGS file.
 (defun etags-verify-tags-table ()
-  (= (char-after 1) ?\f))
+  ;; Use eq instead of = in case char-after returns nil.
+  (eq (char-after 1) ?\f))
 
 (defun etags-file-of-tag ()
   (save-excursion