28 lines
1.0 KiB
EmacsLisp
28 lines
1.0 KiB
EmacsLisp
;;; module-corfu.el --- Corfu module support
|
|
;;
|
|
;;; Commentary:
|
|
;; This module provides support for Corfu, a library that provides
|
|
;; inline completion.
|
|
;;
|
|
;;; Code:
|
|
|
|
(require 'module-pkg)
|
|
(pkg/require 'corfu)
|
|
|
|
(setq corfu-cycle t) ;; Enable cycling for `corfu-next/previous'
|
|
(setq corfu-auto t) ;; Enable auto completion
|
|
(setq corfu-separator ?\s) ;; Orderless field separator
|
|
(setq corfu-quit-at-boundary t) ;; Never quit at completion boundary
|
|
(setq corfu-quit-no-match t) ;; Never quit, even if there is no match
|
|
;; (setq corfu-preview-current nil) ;; Disable current candidate preview
|
|
;; (setqcorfu-preselect 'prompt) ;; Preselect the prompt
|
|
(setq corfu-on-exact-match t) ;; Configure handling of exact matches
|
|
;; (setq corfu-scroll-margin 5) ;; Use scroll margin
|
|
(setq tab-always-indent 'complete)
|
|
(setq text-mode-ispell-word-completion nil)
|
|
(setq read-extended-command-predicate #'command-completion-default-include-p)
|
|
(global-corfu-mode)
|
|
|
|
(provide 'module-corfu)
|
|
;;; module-corfu.el ends here
|