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