| Current Path : /usr/share/emacs/24.3/lisp/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/mb-depth.elc |
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:25 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/mb-depth.el ;;; in Emacs version 24.3.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@144 If non-nil, function to set up the minibuffer depth indicator. It is called with one argument, the minibuffer depth, and must return a string. (defvar minibuffer-depth-indicator-function nil (#$ . 552)) (make-variable-buffer-local 'minibuffer-depth-overlay) #@105 Set up a minibuffer for `minibuffer-depth-indicate-mode'. The prompt should already have been inserted. (defalias 'minibuffer-depth-setup #[nil "\302 \303V\205+ \304eeT\"\305\306 \203 \302 !\202$ \307\310\311\302 \"\312\313##\210\305\314\315#\207" [minibuffer-depth-overlay minibuffer-depth-indicator-function minibuffer-depth 1 make-overlay overlay-put before-string propertize format "[%d]" face highlight evaporate t] 7 (#$ . 817)]) #@311 Non-nil if Minibuffer-Depth-Indicate mode is enabled. See the command `minibuffer-depth-indicate-mode' for a description of this minor mode. Setting this variable directly does not take effect; either customize it (see the info node `Easy Customization') or call the function `minibuffer-depth-indicate-mode'. (custom-declare-variable 'minibuffer-depth-indicate-mode nil '(#$ . 1265) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'minibuffer :type 'boolean) #@452 Toggle Minibuffer Depth Indication mode. With a prefix argument ARG, enable Minibuffer Depth Indication mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil. Minibuffer Depth Indication mode is a global minor mode. When enabled, any recursive use of the minibuffer will show the recursion depth in the minibuffer prompt. This is only useful if `enable-recursive-minibuffers' is non-nil. (defalias 'minibuffer-depth-indicate-mode #[(&optional arg) "\303 \304=\203 \n?\202 \305 !\306V\211\203 \307\310\311\"\210\202% \312\310\311\"\210\313\314\n\203/ \315\2020 \316\"\210\317\320!\203U \321\302!\210\303 \203H \303 \232\203U \322\323\n\203R \324\202S \325\"\210)\326 \210\n\207" [#1=#:last-message arg minibuffer-depth-indicate-mode current-message toggle prefix-numeric-value 0 add-hook minibuffer-setup-hook minibuffer-depth-setup remove-hook run-hooks minibuffer-depth-indicate-mode-hook minibuffer-depth-indicate-mode-on-hook minibuffer-depth-indicate-mode-off-hook called-interactively-p any customize-mark-as-set message "Minibuffer-Depth-Indicate mode %sabled" "en" "dis" force-mode-line-update] 4 (#$ . 1758) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \303\211%\210\305\306!\207" [minibuffer-depth-indicate-mode-map add-minor-mode minibuffer-depth-indicate-mode nil boundp provide mb-depth] 6)