]> code.delx.au - gnu-emacs-elpa/commitdiff
company-elisp-var-binding-regexp: The three def macros also have cl versions
authorDmitry Gutov <dgutov@yandex.ru>
Sat, 30 Mar 2013 03:12:31 +0000 (07:12 +0400)
committerDmitry Gutov <dgutov@yandex.ru>
Sat, 30 Mar 2013 03:12:31 +0000 (07:12 +0400)
company-elisp.el

index e4baca1706ef7791b2e2497d30ec84d9596ff30a..d878db005225d5c8b59dc5198dbb86b4324d09f9 100644 (file)
@@ -59,8 +59,8 @@ first in the candidates list.")
 (defvar company-elisp-parse-depth 100)
 
 (defvar company-elisp-var-binding-regexp
-  (concat "\\_<" (regexp-opt '("let" "defun" "defmacro" "defsubst"
-                               "lambda" "lexical-let"))
+  (concat "\\_<\\(?:cl-\\)?" (regexp-opt '("let" "defun" "defmacro" "defsubst"
+                                           "lambda" "lexical-let"))
           "\\*?\\_>")
   "Regular expression matching head of a multiple variable bindings form.")