X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/025de12a634e0430d0ff21a6c33a42ba58abaef0..a8ce5598c5067f19f2cba9cac77d5d6390c7f1fe:/company-ispell.el

diff --git a/company-ispell.el b/company-ispell.el
index 236c5198d..c4acebc87 100644
--- a/company-ispell.el
+++ b/company-ispell.el
@@ -46,13 +46,13 @@ If nil, use `ispell-complete-word-dict'."
   "A `company-mode' completion back-end using ispell."
   (interactive (list 'interactive))
   (case command
-    ('interactive (company-begin-backend 'company-ispell))
-    ('prefix (when (company-ispell-available)
-               (company-grab-word)))
-    ('candidates (lookup-words arg (or company-ispell-dictionary
-                                       ispell-complete-word-dict)))
-    ('sorted t)
-    ('ignore-case t)))
+    (interactive (company-begin-backend 'company-ispell))
+    (prefix (when (company-ispell-available)
+              (company-grab-word)))
+    (candidates (lookup-words arg (or company-ispell-dictionary
+                                      ispell-complete-word-dict)))
+    (sorted t)
+    (ignore-case t)))
 
 (provide 'company-ispell)
 ;;; company-ispell.el ends here