;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310DD\311\312\303\313\314&\210\304\315\306\307\316DD\317\312\303\313\320&\210\304\321\306\307\322DD\323\312\303\313\320&\210\304\324\306\307\325DD\326\312\303\313\320&\207" [require map ivy prescient custom-declare-variable ivy-prescient-sort-commands funcall function #[0 "\300\207" [(:not swiper swiper-isearch ivy-switch-buffer)] 1] "Control which commands have their candidates sorted by `ivy-prescient'.\nIf nil, then sorting is disabled for all commands. If t, then\nsorting is enabled for all commands. If a list of commands, then\nonly those commands have their candidates sorted. If a list\nstarting with the symbol `:not', then all commands *except* the\nones listed have their candidates sorted.\n\nNote that this variable overrides the sorting options of Ivy,\nunless `ivy-prescient-enable-sorting' is nil in which case it has\nno effect." :group :type (choice (boolean :tag "Unconditional") (repeat :tag "Whitelist" function) (cons (const :not) (repeat :tag "Blacklist" function))) ivy-prescient-retain-classic-highlighting #[0 "\300\207" [nil] 1] "Whether to emulate the way Ivy highlights candidates as closely as possible.\nWith the default value, nil, the entire match is highlighted with\n`ivy-minibuffer-match-face-1' while initials in an initialism are\nhighlighted with `ivy-minibuffer-match-face-2' through\n`ivy-minibuffer-match-face-4'. With a non-nil value, substring\nmatches are also highlighted using `ivy-minibuffer-match-face-2'\nthrough `ivy-minibuffer-match-face-4', meaning that the only use\nof `ivy-minibuffer-match-face-1' is in between the initials of an\ninitialism.\n\nNote that a non-nil value for this variable emulates the\nhighlighting behavior of `ivy--regex-ignore-order', not the\ndefault `ivy--regex-plus', since `ivy-prescient' allows\nout-of-order matching." boolean ivy-prescient-enable-filtering #[0 "\300\207" [t] 1] "Whether to enable filtering by `ivy-prescient'.\nIf nil, then `ivy-prescient-mode' does not change the filtering\nbehavior of Ivy from the default. See Ivy documentation for how to\nconfigure filtering yourself. Changing this variable will not\ntake effect until `ivy-prescient-mode' has been reloaded." ivy-prescient-enable-sorting #[0 "\300\207" [t] 1] "Whether to enable sorting by `ivy-prescient'.\nIf nil, then `ivy-prescient-mode' does not change the sorting\nbehavior of Ivy from the default. See Ivy documentation for how\nto configure sorting yourself. Changing this variable will not\ntake effect until `ivy-prescient-mode' has been reloaded."] 8) #@123 Generate an Ivy-formatted regexp list for the given QUERY string. This is for use in `ivy-re-builders-alist'. (fn QUERY) (defalias 'ivy-prescient-re-builder #[257 "\302\303 \304\305\"\216\306\307\310 \203\311\202\312\"\"\206\313)\207" [ivy--subexps ivy-prescient-retain-classic-highlighting 0 match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] mapcar #[257 "\301!]\211\302B\207" [ivy--subexps regexp-opt-depth t] 4 "\n\n(fn REGEXP)"] prescient-filter-regexps all with-group ""] 7 (#$ . 2688)]) #@52 Previous default value in `ivy-re-builders-alist'. (defvar ivy-prescient--old-re-builder nil (#$ . 3232)) #@232 Comparison function that uses prescient.el to sort candidates. This is for use in `ivy-sort-functions-alist'. C1 and C2 are arbitrary candidates to be compared; they may be strings or cons cells whose cars are strings. (fn C1 C2) (defalias 'ivy-prescient-sort-function #[514 "<\203 @\262\211<\203\211@\262\300\"\207" [prescient-sort-compare] 5 (#$ . 3345)]) #@170 Previous values from `ivy-sort-functions-alist'. When `ivy-prescient-mode' is disabled, all of the elements of this alist are used to update `ivy-sort-functions-alist'. (defvar ivy-prescient--old-ivy-sort-functions-alist nil (#$ . 3720)) #@167 Previous value for sorting `completion-in-region' results. This is the value that was associated to `ivy-completion-in-region' in `ivy-sort-matches-functions-alist'. (defvar ivy-prescient--old-ivy-sort-matches-completion-in-region-function nil (#$ . 3965)) #@47 Previous value of `ivy-initial-inputs-alist'. (defvar ivy-prescient--old-initial-inputs-alist nil (#$ . 4228)) #@157 Wrap an action for use in `ivy-read'. ACTION is the original action, a function. Return a new function that also invokes `prescient-remember'. (fn ACTION) (defalias 'ivy-prescient--wrap-action #[257 "\303\300!\203\n\2040 \304H \305H\306!\203\266\202\202+\204&\211\307=\205)\310!\266\202\311=\2041\207\n\312\313#\207" [ivy-marked-candidates ivy-last ivy--directory boundp 10 2 functionp read-file-name-internal ivy--sort-function ivy-prescient-sort-function make-closure #[257 "\211\211<\203\n@\262\301\203\302\301\"\262\303!\266\300!\207" [V0 V1 file-relative-name prescient-remember] 5 "\n\n(fn X)"]] 6 (#$ . 4346)]) #@68 Remember the directory we just entered when SUCCESS. (fn SUCCESS) (defalias 'ivy-prescient--remember-directory #[257 "\211\203\301\302\303\304!!!!\210\207" [ivy--directory prescient-remember file-name-as-directory file-name-nondirectory directory-file-name] 6 (#$ . 4996)]) #@213 Enable sorting of `ivy-prescient-sort-commands'. If the `:caller' in ARGS should be sorted according to `ivy-prescient-sort-commands', then `:sort' is enabled even if wasn't in the call to `ivy-read'. (fn ARGS) (defalias 'ivy-prescient--enable-sort-commands #[257 "9\203 \204)<\203/@\301=\203 \302\303\"A>?\202&\302\303\">\203/\304\305\"\262\207" [ivy-prescient-sort-commands :not plist-get :caller append (:sort t)] 4 (#$ . 5281)]) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315& \207" [custom-declare-variable ivy-prescient-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Ivy-Prescient mode is enabled.\nSee the `ivy-prescient-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `ivy-prescient-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group prescient] 12) #@623 Minor mode to use prescient.el in Ivy menus. This is a minor mode. If called interactively, toggle the `Ivy-Prescient mode' mode. If the prefix argument is positive, enable the mode, and if it is zero or negative, disable the mode. If called from Lisp, toggle the mode if ARG is `toggle'. Enable the mode if ARG is nil, omitted, or is a positive number. Disable the mode if ARG is a negative number. To check whether the minor mode is enabled in the current buffer, evaluate `(default-value 'ivy-prescient-mode)'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'ivy-prescient-mode #[256 "\306 \307\301\310=\203\311\301!?\202!\247\203 \312W\203 \313\202!\314\"\210\315\300!\2038\316\301\"\311\301!\2038\301B \203\301\317!\210\314\n\203l \210\314\f\236\211A\203X\320\241\210\202a\314\320B\211\262\fB\262 \2100\31301\203\240\3212!\211\203\312\211@\3222\"\323>\203\303\2113\236\211A\2102\236\211A\203\235\324\241\210\202\250\324B\211\2622B2\262\203\266\241\266\202\303B\211\2623B3\266A\266\202\202u\2104\210\3255\236\211A\203\337\313\241\210\202\351\325C\211\2625B5\2624\326\327\330\331#\210\326\332\333\334#\210\326\335\333\336#\210\202\240\322\314\f\"\320=\203&\314\f\236 \203\241\266\202&\314B\211\262\fB\266\337\3403\"\210\3133\322\3255\"\204V\3255\2364\203I\241\266\202V\325B\211\2625B5\266\341 !\211\203\220\211@\322@0\"\204\211\211@\2110\236A\203|\241\266\202\211B\211\2620B0\266A\266\202\202Y\210\342\327\331\"\210\342\332\334\"\210\342\335\336\"\210\343\344\311\301!\203\254\345\202\255\346\"\210\347\350!\203\325\351\301!\210\306 \203\305\211\306 \232\203\325\352\353\311\301!\203\321\354\202\322\355\356#\210\210\357 \210\311\301!\207" [global-minor-modes ivy-prescient-mode ivy-prescient-enable-filtering ivy-prescient--old-re-builder ivy-re-builders-alist ivy-prescient--old-initial-inputs-alist current-message set-default toggle default-value 1 nil t boundp delq -1 ivy-prescient-re-builder map-keys alist-get (ivy-string< ivy-sort-file-function-default) ivy-prescient-sort-function ivy-completion-in-region advice-add ivy-read :filter-args ivy-prescient--enable-sort-commands ivy--directory-enter :filter-return ivy-prescient--remember-directory ivy--get-action ivy-prescient--wrap-action map-apply #[514 "\301\"\302=\205#\236\203\241\210\202!B\211\262B\262\207" [ivy-sort-functions-alist alist-get ivy-prescient-sort-function] 6 "\n\n(fn CALLER FUNCTION)"] reverse advice-remove run-hooks ivy-prescient-mode-hook ivy-prescient-mode-on-hook ivy-prescient-mode-off-hook called-interactively-p any customize-mark-as-set message "Ivy-Prescient mode %sabled%s" "en" "dis" "" force-mode-line-update ivy-initial-inputs-alist ivy-prescient-enable-sorting ivy-sort-functions-alist ivy-prescient--old-ivy-sort-functions-alist ivy-prescient--old-ivy-sort-matches-completion-in-region-function ivy-sort-matches-functions-alist] 9 (#$ . 6283) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar ivy-prescient-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\210\314\315!\207" [ivy-prescient-mode-map ivy-prescient-mode-hook variable-documentation put "Hook run after entering or leaving `ivy-prescient-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode ivy-prescient-mode boundp provide ivy-prescient] 6)