diff options
| -rw-r--r-- | completion.org | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/completion.org b/completion.org index eb58943..d8ba4b4 100644 --- a/completion.org +++ b/completion.org @@ -200,10 +200,11 @@ (defvar jao-consult-narrow nil) (defun jao-consult-initial-narrow () - (when (eq this-command #'consult-buffer) - (when-let (c (cdr (assoc (jao-afio-current-frame) jao-consult-narrow))) - (setq unread-command-events - (append unread-command-events `(,c 32)))))) + (when-let (c (cond ((eq this-command #'consult-buffer) + (cdr (assoc (jao-afio-current-frame) + jao-consult-narrow))) + ((eq this-command #'consult-mode-command) ?m))) + (setq unread-command-events (append unread-command-events `(,c 32))))) (add-hook 'minibuffer-setup-hook #'jao-consult-initial-narrow) |