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: ensure prot/crm-p does not error out when crm has not been loaded yet

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

3
emacs/.emacs.d/prot-emacs-modules/prot-emacs-completion.el
View file

@ -194,7 +194,8 @@ Also see `prot/choose-completion-no-exit' and `prot/choose-completion-dwim'."
(defun prot/crm-p ()
"Return non-nil if `completing-read-multiple' is in use."
(when-let* ((window (active-minibuffer-window))
(when-let* ((_ (bound-and-true-p crm-completion-table))
(window (active-minibuffer-window))
(buffer (window-buffer window)))
(buffer-local-value 'crm-completion-table buffer)))

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

@ -4501,7 +4501,8 @@ Also see `prot/choose-completion-no-exit' and `prot/choose-completion-dwim'."
(defun prot/crm-p ()
"Return non-nil if `completing-read-multiple' is in use."
(when-let* ((window (active-minibuffer-window))
(when-let* ((_ (bound-and-true-p crm-completion-table))
(window (active-minibuffer-window))
(buffer (window-buffer window)))
(buffer-local-value 'crm-completion-table buffer)))