replace pcase by cl-case [GH-420]

Sarcasm · Aug 28, 2017 · 9950212 · 9950212
1 parent 9d7df3a
commit 9950212
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/irony-completion.el b/irony-completion.el
@@ -188,10 +188,10 @@ that can be validly accessed are deemed not-accessible."
   :start (lambda (prefix style)
            (irony--server-send-command
             "candidates" prefix
-            (pcase style
-              ('case-insensitive "case-insensitive")
-              ('smart-case "smart-case")
-              (other "exact"))))
+            (cl-case style
+              (case-insensitive "case-insensitive")
+              (smart-case "smart-case")
+              (t "exact"))))
   :update irony--server-query-update)
 
 (defun irony--candidates-task (&optional buffer pos prefix style)