[complete] Prioritize flex style if flex style is requested

clojure-emacs · Jun 2, 2024 · ae19fe2 · ae19fe2
1 parent 6646778
commit ae19fe2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cider-completion.el b/cider-completion.el
@@ -297,7 +297,7 @@ Only affects the `cider' completion category.`"
     (unless found-styles
       (setq found-styles '(styles basic)))
     (unless (member 'flex found-styles)
-      (setq found-styles (append found-styles '(flex))))
+      (setq found-styles (apply #'list 'styles 'flex (cdr found-styles))))
     (add-to-list 'completion-category-overrides (apply #'list 'cider found-styles (when found-cycle
                                                                                     (list found-cycle))))))