Fix search argument in ‘lisp--el-match-keyword’ (Bug#21492) (Bug#21493)

* lisp/emacs-lisp/lisp-mode.el (lisp--el-match-keyword): Fix
search argument.  (Bug#21492) (Bug#21493)

Copyright-paperwork-exempt: yes

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 56c2966656c82a2f7c0264b447a4e11488997e3d..fed91b34a8858afaaa50071e52e25061eae348b3 100644 (file)
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -224,7 +224,8 @@
   ;; FIXME: Move to elisp-mode.el.
   (catch 'found
     (while (re-search-forward
-            (eval-when-compile "(\\(" lisp-mode-symbol-regexp "\\)\\_>")
+            (eval-when-compile
+              (concat "(\\(" lisp-mode-symbol-regexp "\\)\\_>"))
             limit t)
       (let ((sym (intern-soft (match-string 1))))
        (when (or (special-form-p sym)