403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.76
Web Server : Apache
System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp//minibuf-eldef.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(defalias 'minibuffer-default--in-prompt-regexps #[0 "\302\303\304\"\203\305\306\211\224O!\307\305\306\225\310O!Q\202\305!\311Q\312	\205&\313E\314\312	\205.\313E\315BB\207" [minibuffer-default-prompt-format minibuffer-eldef-shorten-default "\\(" string-match "%s" regexp-quote 0 "\\(.*?\\)" nil "\\): " 1 " [\\2]" "\\( (default\\(?: is\\)? \\(.*\\))\\):? \\'" (("([^(]+?\\(, default\\(?: is\\)? \\(.*\\)\\)):? \\'" 1) ("\\( \\[.*\\]\\):? *\\'" 1))] 7])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable minibuffer-eldef-shorten-default funcall function #[0 "\300\207" [nil] 1 ""] "If non-nil, shorten \"(default ...)\" to \"[...]\" in minibuffer prompts." :set #[514 "\300\"\210\300\301\302 \"\207" [set-default minibuffer-default-in-prompt-regexps minibuffer-default--in-prompt-regexps] 5 "\n\n(fn SYMBOL VALUE)"] :type boolean :group minibuffer :version "24.3"] 12)
#@493 A list of regexps matching the parts of minibuffer prompts showing defaults.
When `minibuffer-electric-default-mode' is active, these regexps are
used to identify the portions of prompts to elide.

Each entry is of the form (REGEXP MATCH-NUM &optional REWRITE),
where REGEXP should match the default part of the prompt,
MATCH-NUM is the subgroup that matched the actual default indicator,
and REWRITE, if present, is a string to pass to `replace-match' that
should be displayed in its place.
(defvar minibuffer-default-in-prompt-regexps (minibuffer-default--in-prompt-regexps) (#$ . 1018))
(defvar minibuf-eldef-frobbed-minibufs nil)
(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [make-variable-buffer-local minibuf-eldef-initial-input minibuf-eldef-initial-buffer-length minibuf-eldef-showing-default-in-prompt minibuf-eldef-overlay] 2)
#@125 Set up a minibuffer for `minibuffer-electric-default-mode'.
The prompt and initial input should already have been inserted.
(defalias 'minibuf-eldef-setup-minibuffer #[0 "\306\307\212\214eb\210`\310 }\210\203o\211A\262\242\262\311;\203$\202&@\306\307#\2042\306\262\202\211\243:\203i\3128\203i\307\211\211A@\3128\313\224!\314\306\211\211%\210\315\224\225#\210\306\262eb\210*\266\202\306\262\202*\211\204|\316\317\320\307#\202\302\211:\203\206\211A\202\207\321\262\211:\203\223\211@\202\224\211\262\322\224\225\"\307\323 dp\211\235\203\265\266\202\274\211B\210\324\317\320\306\307$)\207" [minibuffer-default-in-prompt-regexps inhibit-point-motion-hooks inhibit-read-only buffer-undo-list minibuf-eldef-overlay minibuf-eldef-showing-default-in-prompt nil t minibuffer-prompt-end re-search-forward 2 text-properties-at replace-match set-text-properties remove-hook post-command-hook minibuf-eldef-update-minibuffer 0 make-overlay minibuffer-contents-no-properties add-hook minibuf-eldef-initial-input minibuf-eldef-initial-buffer-length minibuf-eldef-frobbed-minibufs] 12 (#$ . 1883)])
#@261 Update a minibuffer's prompt to include a default only when applicable.
This is intended to be used as a minibuffer `post-command-hook' for
`minibuffer-electric-default-mode'; the minibuffer should have already
been set up by `minibuf-eldef-setup-minibuffer'.
(defalias 'minibuf-eldef-update-minibuffer #[0 "d	U\205\304 \n\230=?\205?\305\306?#\207" [minibuf-eldef-showing-default-in-prompt minibuf-eldef-initial-buffer-length minibuf-eldef-initial-input minibuf-eldef-overlay minibuffer-contents-no-properties overlay-put invisible] 4 (#$ . 3035)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable minibuffer-electric-default-mode funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil if Minibuffer-Electric-Default mode is enabled.\nSee the `minibuffer-electric-default-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 `minibuffer-electric-default-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group minibuffer] 12)
#@1015 Toggle Minibuffer Electric Default mode.

This is a minor mode.  If called interactively, toggle the
`Minibuffer-Electric-Default 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 \='minibuffer-electric-default-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

Minibuffer Electric Default mode is a global minor mode.  When
enabled, minibuffer prompts that show a default value only show
the default when it's applicable -- that is, when hitting RET
would yield the default value.  If the user modifies the input
such that hitting RET would enter a non-default value, the prompt
is modified to remove the default indication.

(fn &optional ARG)
(defalias 'minibuffer-electric-default-mode #[256 "\303 \304\301\305=\203\306\301!?\202!\247\203 \307W\203 \310\202!\311\"\210\312\300!\2038\313\301\"\306\301!\2038\301B	\203D\314\315\316\"\210\202e\317\315\316\"\210\n\211\203b\211@r\211q\210\317\320\321\311#\210)A\266\202\202J\210\310\322\323\306\301!\203q\324\202r\325\"\210\326\327!\203\232\330\301!\210\303 \203\212\211\303 \232\203\232\331\332\306\301!\203\226\333\202\227\334\335#\210\210\336 \210\306\301!\207" [global-minor-modes minibuffer-electric-default-mode minibuf-eldef-frobbed-minibufs current-message set-default toggle default-value 1 nil t boundp delq add-hook minibuffer-setup-hook minibuf-eldef-setup-minibuffer remove-hook post-command-hook minibuf-eldef-update-minibuffer run-hooks minibuffer-electric-default-mode-hook minibuffer-electric-default-mode-on-hook minibuffer-electric-default-mode-off-hook called-interactively-p any customize-mark-as-set message "Minibuffer-Electric-Default mode %sabled%s" "en" "dis" "" force-mode-line-update] 8 (#$ . 4206) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar minibuffer-electric-default-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" [minibuffer-electric-default-mode-map minibuffer-electric-default-mode-hook variable-documentation put "Hook run after entering or leaving `minibuffer-electric-default-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 minibuffer-electric-default-mode boundp provide minibuf-eldef] 6)

Youez - 2016 - github.com/yon3zu
LinuXploit