X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/c4cfb77e99c090562179c8f8afb9ee93392312dc..6517ec8921438deae6547ab5eb38e004935d5618:/packages/company/company-ispell.el diff --git a/packages/company/company-ispell.el b/packages/company/company-ispell.el index 3e599f03e..1561beef1 100644 --- a/packages/company/company-ispell.el +++ b/packages/company/company-ispell.el @@ -26,8 +26,8 @@ ;;; Code: (require 'company) +(require 'cl-lib) (require 'ispell) -(eval-when-compile (require 'cl)) (defgroup company-ispell nil "Completion back-end using Ispell." @@ -56,7 +56,7 @@ If nil, use `ispell-complete-word-dict'." (defun company-ispell (command &optional arg &rest ignored) "`company-mode' completion back-end using Ispell." (interactive (list 'interactive)) - (case command + (cl-case command (interactive (company-begin-backend 'company-ispell)) (prefix (when (company-ispell-available) (company-grab-word)))