X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/e16c154cb0c1d7496f08f11d6032cc7a06d09d6d..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)))