126 lines
7.3 KiB
EmacsLisp
126 lines
7.3 KiB
EmacsLisp
;;; selectrum-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
|
||
;;
|
||
;;; Code:
|
||
|
||
|
||
;;;### (autoloads nil "selectrum" "selectrum.el" (0 0 0 0))
|
||
;;; Generated autoloads from selectrum.el
|
||
|
||
(defvar selectrum-complete-in-buffer t "\
|
||
If non-nil, use Selectrum for `completion-in-region'.
|
||
This option needs to be set before activating `selectrum-mode'.")
|
||
|
||
(custom-autoload 'selectrum-complete-in-buffer "selectrum" t)
|
||
|
||
(autoload 'selectrum-select-from-history "selectrum" "\
|
||
Submit or insert candidate from minibuffer history.
|
||
To insert the history item into the previous session use the
|
||
binding for `selectrum-insert-current-candidate'. To submit the
|
||
history item and exit use `selectrum-select-current-candidate'." t nil)
|
||
|
||
(autoload 'selectrum-completing-read "selectrum" "\
|
||
Read choice using Selectrum. Can be used as `completing-read-function'.
|
||
For PROMPT, COLLECTION, PREDICATE, REQUIRE-MATCH, INITIAL-INPUT,
|
||
HIST, DEF, and INHERIT-INPUT-METHOD, see `completing-read'.
|
||
|
||
\(fn PROMPT COLLECTION &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF INHERIT-INPUT-METHOD)" nil nil)
|
||
|
||
(autoload 'selectrum-completing-read-multiple "selectrum" "\
|
||
Read one or more choices using Selectrum.
|
||
Replaces `completing-read-multiple'. For PROMPT, TABLE,
|
||
PREDICATE, REQUIRE-MATCH, INITIAL-INPUT, HIST, DEF, and
|
||
INHERIT-INPUT-METHOD, see `completing-read-multiple'.
|
||
|
||
The option `selectrum-completing-read-multiple-show-help' can be
|
||
used to control insertion of additional usage information into
|
||
the prompt.
|
||
|
||
\(fn PROMPT TABLE &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF INHERIT-INPUT-METHOD)" nil nil)
|
||
|
||
(autoload 'selectrum-completion-in-region "selectrum" "\
|
||
Complete in-buffer text using a list of candidates.
|
||
Can be used as `completion-in-region-function'. For START, END,
|
||
COLLECTION, and PREDICATE, see `completion-in-region'.
|
||
|
||
\(fn START END COLLECTION PREDICATE)" nil nil)
|
||
|
||
(autoload 'selectrum-read-buffer "selectrum" "\
|
||
Read buffer using Selectrum. Can be used as `read-buffer-function'.
|
||
Actually, as long as `selectrum-completing-read' is installed in
|
||
`completing-read-function', `read-buffer' already uses Selectrum.
|
||
Installing this function in `read-buffer-function' makes sure the
|
||
buffers are sorted in the default order (most to least recently
|
||
used) rather than in whatever order is defined by
|
||
`selectrum-preprocess-candidates-function', which is likely to be
|
||
less appropriate. It also allows you to view hidden buffers,
|
||
which is otherwise impossible due to tricky behavior of Emacs'
|
||
completion machinery. For PROMPT, DEF, REQUIRE-MATCH, and
|
||
PREDICATE, see `read-buffer'.
|
||
|
||
\(fn PROMPT &optional DEF REQUIRE-MATCH PREDICATE)" nil nil)
|
||
|
||
(autoload 'selectrum-read-file-name "selectrum" "\
|
||
Read file name using Selectrum. Can be used as `read-file-name-function'.
|
||
For PROMPT, DIR, DEFAULT-FILENAME, MUSTMATCH, INITIAL, and
|
||
PREDICATE, see `read-file-name'.
|
||
|
||
\(fn PROMPT &optional DIR DEFAULT-FILENAME MUSTMATCH INITIAL PREDICATE)" nil nil)
|
||
|
||
(autoload 'selectrum--fix-dired-read-dir-and-switches "selectrum" "\
|
||
Make \\[dired] do the \"right thing\" with its default candidate.
|
||
By default \\[dired] uses `read-file-name' internally, which
|
||
causes Selectrum to provide you with the first file inside the
|
||
working directory as the default candidate. However, it would
|
||
arguably be more semantically appropriate to use
|
||
`read-directory-name', and this is especially important for
|
||
Selectrum since this causes it to select the working directory
|
||
initially.
|
||
|
||
To test that this advice is working correctly, type \\[dired] and
|
||
accept the default candidate. You should have opened the working
|
||
directory in Dired, and not a filtered listing for the current
|
||
file.
|
||
|
||
This is an `:around' advice for `dired-read-dir-and-switches'.
|
||
FUNC and ARGS are standard as in any `:around' advice.
|
||
|
||
\(fn FUNC &rest ARGS)" nil nil)
|
||
|
||
(autoload 'selectrum-read-library-name "selectrum" "\
|
||
Read and return a library name.
|
||
Similar to `read-library-name' except it handles `load-path'
|
||
shadows correctly." nil nil)
|
||
|
||
(autoload 'selectrum--fix-minibuffer-message "selectrum" "\
|
||
Ensure the cursor stays at the front of the minibuffer message.
|
||
This advice adjusts where the cursor gets placed for the overlay
|
||
of `minibuffer-message' and ensures the overlay gets displayed at
|
||
the right place without blocking the display of candidates.
|
||
|
||
To test that this advice is working correctly, type \\[find-file]
|
||
twice in a row with `enable-recursive-minibuffers' set to nil.
|
||
The overlay indicating that recursive minibuffers are not allowed
|
||
should appear right after the user input area, not at the end of
|
||
the candidate list and the cursor should stay at the front.
|
||
|
||
This is an `:around' advice for `minibuffer-message'. FUNC and
|
||
ARGS are standard as in all `:around' advice.
|
||
|
||
\(fn FUNC &rest ARGS)" nil nil)
|
||
|
||
(define-minor-mode selectrum-mode "\
|
||
Minor mode to use Selectrum for `completing-read'." :global t (if selectrum-mode (progn (selectrum-mode -1) (setq selectrum-mode t) (setq selectrum--old-completing-read-function (default-value 'completing-read-function)) (setq-default completing-read-function #'selectrum-completing-read) (setq selectrum--old-read-buffer-function (default-value 'read-buffer-function)) (setq-default read-buffer-function #'selectrum-read-buffer) (setq selectrum--old-read-file-name-function (default-value 'read-file-name-function)) (setq-default read-file-name-function #'selectrum-read-file-name) (setq selectrum--old-completion-in-region-function (default-value 'completion-in-region-function)) (when selectrum-complete-in-buffer (setq-default completion-in-region-function #'selectrum-completion-in-region)) (advice-add #'completing-read-multiple :override #'selectrum-completing-read-multiple) (advice-add 'dired-read-dir-and-switches :around #'selectrum--fix-dired-read-dir-and-switches) (advice-add 'read-library-name :override #'selectrum-read-library-name) (advice-add #'minibuffer-message :around #'selectrum--fix-minibuffer-message) (define-key minibuffer-local-map [remap previous-matching-history-element] 'selectrum-select-from-history)) (when (equal (default-value 'completing-read-function) #'selectrum-completing-read) (setq-default completing-read-function selectrum--old-completing-read-function)) (when (equal (default-value 'read-buffer-function) #'selectrum-read-buffer) (setq-default read-buffer-function selectrum--old-read-buffer-function)) (when (equal (default-value 'read-file-name-function) #'selectrum-read-file-name) (setq-default read-file-name-function selectrum--old-read-file-name-function)) (when (equal (default-value 'completion-in-region-function) #'selectrum-completion-in-region) (setq-default completion-in-region-function selectrum--old-completion-in-region-function)) (advice-remove #'completing-read-multiple #'selectrum-completing-read-multiple) (advice-remove 'dired-read-dir-and-switches #'selectrum--fix-dired-read-dir-and-switches) (advice-remove 'read-library-name #'selectrum-read-library-name) (advice-remove #'minibuffer-message #'selectrum--fix-minibuffer-message) (when (eq (lookup-key minibuffer-local-map [remap previous-matching-history-element]) #'selectrum-select-from-history) (define-key minibuffer-local-map [remap previous-matching-history-element] nil))))
|
||
|
||
(register-definition-prefixes "selectrum" '("selectrum-"))
|
||
|
||
;;;***
|
||
|
||
(provide 'selectrum-autoloads)
|
||
;; Local Variables:
|
||
;; version-control: never
|
||
;; no-byte-compile: t
|
||
;; no-update-autoloads: t
|
||
;; coding: utf-8
|
||
;; End:
|
||
;;; selectrum-autoloads.el ends here
|