]> rtime.felk.cvut.cz Git - sojka/company-mode.git/commitdiff
Made company-elisp work in lisp-interaction-mode.
authorNikolaj Schumacher <git@nschum.de>
Fri, 20 Mar 2009 11:45:54 +0000 (12:45 +0100)
committerNikolaj Schumacher <git@nschum.de>
Fri, 20 Mar 2009 12:01:36 +0000 (13:01 +0100)
company-elisp.el

index 4b0e15b0a07bba774f45d0b7ecb9dd1cdcba2bf2..7fcea0cf812fb826bf4109e2cd0e40a52d820387 100644 (file)
@@ -68,7 +68,7 @@
 (defun company-elisp (command &optional arg &rest ignored)
   "A `company-mode' completion back-end for `emacs-lisp-mode'."
   (case command
-    ('prefix (and (eq major-mode 'emacs-lisp-mode)
+    ('prefix (and (eq (derived-mode-p 'emacs-lisp-mode) 'emacs-lisp-mode)
                   (company-grab-lisp-symbol)))
     ('candidates (let ((completion-ignore-case nil))
                    (append (all-completions arg (company-elisp-parse-let))