dotfiles-misc/protesilaos.dotfiles
1
0
Fork 0
mirror of https://github.com/protesilaos/dotfiles.git synced 2026-09-10 07:16:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

emacs: go back to including orderless in prot-emacs-completion-extras

Browse source
This commit is contained in:
Protesilaos Stavrou 2025-12-19 17:49:44 +02:00
parent 4a94b3a81d
commit abc737d84c
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
2 changed files with 17 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
emacs/.emacs.d/init.el
View file

@ -44,8 +44,8 @@ before all other modules of my setup."
(defcustom prot-emacs-completion-extras t
"When non-nil load extras for minibuffer completion.
These include the packages `marginalia', `consult', `corfu', and
`embark'."
These include the packages `marginalia', `consult', `corfu',
`orderless', and `embark'."
:group 'prot-emacs
:type 'boolean)

29
emacs/.emacs.d/prot-emacs.org
View file

@ -729,8 +729,8 @@ Remember to read how these options come into effect ([[#h:5a41861f-4c38-45ac-8da
#+begin_src emacs-lisp :tangle "init.el"
(defcustom prot-emacs-completion-extras t
"When non-nil load extras for minibuffer completion.
These include the packages `marginalia', `consult', `corfu', and
`embark'."
These include the packages `marginalia', `consult', `corfu',
`orderless', and `embark'."
:group 'prot-emacs
:type 'boolean)
#+end_src
@ -4192,19 +4192,20 @@ literal string, initialism, et cetera, which is not as useful to me.
#+begin_src emacs-lisp :tangle "prot-emacs-modules/prot-emacs-completion.el"
;;; Orderless completion style (and prot-orderless.el)
(prot-emacs-configure
(prot-emacs-install orderless)
(require 'orderless)
;; Remember to check my `completion-styles' and the
;; `completion-category-overrides'.
(setq orderless-matching-styles '(orderless-prefixes orderless-regexp))
(setq orderless-smart-case nil)
(when prot-emacs-completion-extras
(prot-emacs-configure
(prot-emacs-install orderless)
(require 'orderless)
;; Remember to check my `completion-styles' and the
;; `completion-category-overrides'.
(setq orderless-matching-styles '(orderless-prefixes orderless-regexp))
(setq orderless-smart-case nil)
;; SPC should never complete: use it for `orderless' groups.
;; The `?' is a regexp construct.
(prot-emacs-keybind minibuffer-local-completion-map
"SPC" nil
"?" nil))
;; SPC should never complete: use it for `orderless' groups.
;; The `?' is a regexp construct.
(prot-emacs-keybind minibuffer-local-completion-map
"SPC" nil
"?" nil)))
#+end_src
*** The =prot-emacs-completion.el= settings to ignore letter casing