diff options
| -rw-r--r-- | README.org | 5 | ||||
| -rw-r--r-- | corfu.el | 6 |
2 files changed, 11 insertions, 0 deletions
@@ -104,6 +104,11 @@ ;; TAB cycle if there are only few candidates (setq completion-cycle-threshold 3) + ;; Emacs 28: Hide commands in M-x which do not work in the current mode. + ;; Corfu commands are hidden, since they are not supposed to be used via M-x. + ;; (setq read-extended-command-predicate + ;; #'command-completion-default-include-p) + ;; Enable indentation+completion using the TAB key. ;; `completion-at-point' is often bound to M-TAB. (setq tab-always-indent 'complete)) @@ -833,5 +833,11 @@ filter string with spaces is allowed." (memq major-mode corfu-excluded-modes)) (corfu-mode 1))) +;; Emacs 28: Do not show Corfu commands with M-X +(dolist (sym '(corfu-next corfu-previous corfu-first corfu-last corfu-quit + corfu-complete corfu-insert corfu-scroll-up corfu-scroll-down + corfu-show-location corfu-show-documentation)) + (put sym 'completion-predicate #'ignore)) + (provide 'corfu) ;;; corfu.el ends here |