ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/help-fns.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; with all optimizations.
;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(string-lessp emacs-version "23")
(error "`%s' was compiled for Emacs 23 or later" #$))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302!\207" [require cl-lib help-mode] 2)
#@252 List of functions to run in help buffer in `describe-function'.
Those functions will be run after the header line and argument
list was inserted, and before the documentation will be inserted.
The functions will receive the function name as argument.
(defvar help-fns-describe-function-functions nil (#$ . 481))
#@156 Buffer that was current when `describe-function' was invoked.
Functions on `help-fns-describe-function-functions' can use this
to get buffer-local values.
(defvar describe-function-orig-buffer nil (#$ . 800))
#@134 Display the full documentation of FUNCTION (a symbol).
When called from lisp, FUNCTION may also be a function object.
(fn FUNCTION)
(defalias 'describe-function #[257 "\206 p\306\307E\310\311!\"\210\212 \312\211\223\210\313\nB\314 B\315 \316 \317!\211 \312\211\320!\210\321\322!\210\323!\210r
q\210\324 )\262rq\210\325\312\"\262)\326\327!\203W \327\"\202X \211)\266\204,\207" [describe-function-orig-buffer help-window-point-marker temp-buffer-window-setup-hook temp-buffer-window-show-hook help-window-old-frame standard-output help-setup-xref #[514 "\301!\205 \211\302!)\207" [describe-function-orig-buffer buffer-live-p describe-function] 4 "\n\n(fn FUNCTION BUFFER)"] called-interactively-p interactive nil help-mode-setup help-mode-finish selected-frame help-buffer temp-buffer-window-setup prin1 princ " is " describe-function-1 buffer-string temp-buffer-window-show functionp help-window-setup] 8 (#$ . 1016) (byte-code "\302 \303\304\203 \305\306\"\202 \307 \310\303\311\211\205 \312!&\211\313\232\204, \314!\262\2035 9\2049 \315\316!\210\310!\204D \315\317\"\210)C\207" [enable-recursive-minibuffers obarray function-called-at-point t completing-read format "Describe function (default %s): " "Describe function: " fboundp nil symbol-name "" intern user-error "You didn't specify a function symbol" "Symbol's function definition is void: %s"] 10)])
#@148 Return the name of the C file where SUBR-OR-VAR is defined.
KIND should be `var' for a variable or `subr' for a subroutine.
(fn SUBR-OR-VAR KIND)
(defalias 'help-C-file-name #[514 "\303\304!\305=\203 \306\307!P\202 \310\311\312!!Prq\210eb\210m\203* \313\314 \"!\210\3152Q \316\317\320Q!\321\322!\210\323\324!\211\n\235\203I \325\315\"\210\202L b\210\266\202. \326\327\"\203d \330\331\332\211\324%\262\202s \326\333\"\203s \330\334\332\211$\262\326\335\"\203\200 \336P\202\201 \211\262)\207" [internal-doc-file-name doc-directory build-files get-buffer-create " *DOC*" var "V" symbol-name "F" subr-name advice--cd*r insert-file-contents-literally expand-file-name loop search-forward " " "\n" re-search-backward " S\\(.*\\)" match-string 1 throw string-match "^ns.*\\(\\.o\\|obj\\)\\'" replace-match ".m" t "\\.\\(o\\|obj\\)\\'" ".c" "\\.\\(c\\|m\\)\\'" "src/"] 11 (#$ . 2421)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable help-downcase-arguments funcall function #[0 "\300\207" [nil] 1] "If non-nil, argument names in *Help* buffers are downcased." :type boolean :group help :version "23.2"] 10)
#@183 Highlight ARG as an argument name for a *Help* buffer.
Return ARG in face `help-argument-name'; ARG is also downcased
if the variable `help-downcase-arguments' is non-nil.
(fn ARG)
(defalias 'help-highlight-arg #[257 "\301\203\n \227\202 \302\303#\207" [help-downcase-arguments propertize face help-argument-name] 5 (#$ . 3596)])
(defalias 'help-do-arg-highlight #[514 "\301 p\302\303\304\305\306\"\307\"\310$\216\311\312!!\210\313\314\315\"\210\211\203E \211@\316\317\320\321\322!\323\324\325\326\327\260 \330!\331\211\332&\262A\266\202\202 \210)\207" [emacs-lisp-mode-syntax-table syntax-table make-byte-code 0 "r\301q\210\302\300!)\207" vconcat vector [set-syntax-table] 2 set-syntax-table make-syntax-table modify-syntax-entry 45 "w" replace-regexp-in-string "\\<" "\\(?:[a-z-]*-\\)?" "\\(" regexp-quote "\\)" "\\(?:es\\|s\\|th\\)?" "\\(?:-[a-z0-9-]+\\)?" "\\(?:-[{([<`\"‘].*?\\)?" "\\>" help-highlight-arg t 1] 16 "\n\n(fn DOC ARGS)"])
(defalias 'help-highlight-arguments #[642 "\203\214 \301\302\"\203\214 \303\304!r\211q\210\305\306\307\310\311!\312\"\313$\216c\210eb\210\314\206, \315\316!?\314\317\314w\210\203s \211\204E \315\320!\203E \321\262\322\323\314\321#\204S \314\262\2024 \324\313!B\262\211\2034 \324\325!\326\230\2034 \327\326!\210\330`\325\"b\210\2024 \331\332 \"\262\205\205 \331\"\262)\266*\210B\207" [case-fold-search string-match "^(" generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 nil looking-at "\\[" "^ " " &" t re-search-forward " \\([\\[(]*\\)\\([^] &).]+\\)" match-string 1 "(" search-backward scan-sexps help-do-arg-highlight buffer-string] 11 "\n\n(fn USAGE DOC &rest ARGS)"])
#@689 Guess the file that defined the Lisp object OBJECT, of type TYPE.
OBJECT should be a symbol associated with a function, variable, or face;
alternatively, it can be a function definition.
If TYPE is `defvar', search for a variable definition.
If TYPE is `defface', search for a face definition.
If TYPE is not a symbol, search for a function definition.
The return value is the absolute name of a readable file where OBJECT is
defined. If several such files exist, preference is given to a file
found via `load-path'. The return value can also be `C-source', which
means that OBJECT is a function or variable defined in C. If no
suitable file is found, return nil.
(fn OBJECT TYPE)
(defalias 'find-lisp-object-file-name #[514 "\211\211\242\301=\262\211\203 A@\206 \3029\203 \206 \303\"\203- \304\305\306$\262\202l \211;\203l \307\310\"\203l \3111F \312\313#0\202H \210\313\211A\203k r\211@q\210\211Ab\210\314\315\313\316#\203j \304\317\320\321!!\322\306$\262)\210\211\204\207 \323!\203\207 \324\325!\203\203 \326\327\"\2024\330\2024\211\204\250 9\203\250 \331N\250\203\250 \324\325!\203\244 \326\332\"\2024\330\2024\211;\204\261 \313\2024\313\307\333\334!\"\205\323 \335!\336\337\340!!\230\205\323 \341\317!\211\262!\205\323 \211\262\2064\307\342\"\203\347 \343\344\345#\202\350 \211\341!\203\362 \211\206\373 \341\346P!\205\373 \211\262\2064\334!\304\347#\232\203 \307\342\"\203 \343\344\345#\202!\211\202!\350\316\313\306$\211\2052\341!\2052\211\266\203\207" [load-path autoload symbol-file defun locate-file (".el" ".elc") readable string-match "[.]*loaddefs.el\\'" (error) find-function-search-for-symbol nil re-search-backward "^;;; Generated autoloads from \\(.*\\)" t file-name-sans-extension match-string-no-properties 1 (".el" ".elc") subrp get-buffer " *DOC*" help-C-file-name subr C-source variable-documentation var "\\`\\..*\\.elc\\'" file-name-nondirectory file-name-directory file-name-as-directory expand-file-name "~" file-readable-p "[.]elc\\'" substring-no-properties 0 -1 ".gz" ("") locate-library] 11 (#$ . 5333)])
(defalias 'help-fns--key-bindings #[257 "\302!\205\361 rq\210`)\303!\211\304>\204\331 \305\206 \306\211$\306\307=\203< \310\242!\203< @\311H:\203< \312\313!\210\202\327 \211\203Y \211@\314\311H!\315\235\203R \211B\262A\266\202\202= \210\203v \312\316!\210\3129\203o \317\320\"\202p \321!\210\312\322!\210\203\304 \312\203\203 \323\202\204 \324!\210\211G\325W\203\230 \312\326\327\330#!\210\202\304 \211\211\203\254 \211@\331\"\262A\266\202\202\231 \210\203\300 \312\326\327\330#!\210\312\332!\210\202\304 \312\333!\210\204\320 \204\320 \211\203\327 \312\334!\210\335 \210\266rq\210\336`\"\210\337\340`\341Z\"?\205\356 \335 )\266\202\207" [standard-output overriding-local-map commandp command-remapping (ignore undefined) where-is-internal nil self-insert-command vectorp 0 princ "It is bound to many ordinary text characters.\n" event-modifiers (nil (shift)) "Its keys are remapped to " format-message "`%s'" "an anonymous command" ".\n" "Without this remapping, it would be bound to " "It is bound to " 10 mapconcat key-description ", " delq ", and many ordinary text characters" "many ordinary text characters" "." terpri fill-region-as-paragraph looking-back "\n\n" 2] 10 "\n\n(fn FUNCTION)"])
(defalias 'help-fns--compiler-macro #[257 "\300\301\"\211\205K \302c\210\2119\203) \303\304\"c\210\212\305\306\307!\310\311#\210\312\313\314#\210)\202I \315N\211;\203H \303\316\"c\210\212\305\306\307!\310\311#\210\312\313\317$\210)\210\320c\207" [function-get compiler-macro "\nThis function has a compiler macro" format-message " `%s'" re-search-backward substitute-command-keys "`\\([^`']+\\)'" nil t help-xref-button 1 help-function compiler-macro-file " in `%s'" help-function-cmacro ".\n"] 8 "\n\n(fn FUNCTION)"])
#@114 Insert usage at point and return docstring. With highlighting.
(fn FUNCTION DOC REAL-DEF REAL-FUNCTION BUFFER)
(defalias 'help-fns--signature #[1285 "\301!\203 \207\302\303#\211<\203 \211\202 \304!\305\"\211\203' \211A\262\211\2035 <\2045 \211@\202\212 <\203B \306\"\202\212 ;\203K \202\212 \2119\203f \211K\211\262\203f \305\307!\n\"\211\262\203L \262\203q \211@\202\212 ;\204} \310!\203\211 \311\312\313\314 !!\"\202\212 \315\316\317\320\303$\203\260 \321\211rq\210\322!\262\322 !\262)\323\"\266\202\202\264 \211 B`@A\324\261\210\325`\"\210\266\202\266\203\207" [advertised-signature-table keymapp gethash t help-function-arglist help-split-fundoc help--make-usage-docstring documentation vectorp format "\nMacro: %s" help--docstring-quote format-kbd-macro "[Missing arglist. Please make a bug report.]" replace-regexp-in-string "\\`(\\\\=\\\\\\\\=` \\([^\n ]*\\))\\'" "\\\\=`\\1" nil substitute-command-keys help-highlight-arguments "\n" fill-region] 17 (#$ . 9193)])
(defalias 'help-fns--parent-mode #[257 "\2119\205 \211\300N\211\205) \301\302!c\210`\303\304\"c\210\305`\306\307\310C&\266\301\311!c\207" [derived-mode-parent substitute-command-keys "\nParent mode: `" format "%s" make-text-button type help-function help-args "'.\n"] 10 "\n\n(fn FUNCTION)"])
(defalias 'help-fns--obsolete #[257 "\2119\205 \211\300N\211@\205H \301K\242\302=\203 \303\202 \304\305\261\210\3068\203. \307\310\3068\"c\210\211;\2039 \311P\202E \211\203D \312\313\"\202E \314\315\261\207" [byte-obsolete-info "\nThis " macro "macro" "function" " is obsolete" 2 format " since %s" ";\n" format-message ";\nuse `%s' instead." "." "\n"] 7 "\n\n(fn FUNCTION)"])
#@134 Return non-nil if FUNCTION has previously been autoloaded.
FILE is the file where FUNCTION was probably defined.
(fn FUNCTION FILE)
(defalias 'help-fns--autoloaded-p #[514 "\301\302!!\303B\304\2030 \211\2040 @@\203) \301@@!\232\203) @A\235\262A\262\202\n \207" [load-history file-name-sans-extension file-truename t nil] 8 (#$ . 10909)])
#@86 Insert some help blurb if FUNCTION should only be used interactively.
(fn FUNCTION)
(defalias 'help-fns--interactive-only #[257 "\2119\205A \211K\242\301=?\205A \211\302N\206 \303\300!\205 \211>\211\205? \304;\203. \305\306\"\202< \307=\204; \310\311\"\202< \312\313\261\262\207" [byte-compile-interactive-only-functions macro interactive-only boundp "\nThis function is for interactive use only" format ";\nin Lisp code %s" t format-message ";\nin Lisp code use `%s' instead." "." "\n"] 6 (#$ . 11266)])
(defalias 'help-fns-short-filename #[257 "\301!\211\211\2032 \211@\302\"\211GGW\203 \211\262\210\302\"\211GGW\203* \211\262\210A\266\202\202 \210\207" [load-path abbreviate-file-name file-relative-name] 8 "\n\n(fn FILENAME)"])
(defalias 'describe-function-1 #[257 "\2119\205 \303\304!\205 \305\306!!\211\203 \307\306!!\206 \2119\203/ \211K\2060 \310\311C\"\2020 \211\2119\206C \205C 9\205C \211\242\312=?\211\203a \313!\203[ \211K9\203[ \211K\262\202H \211\262\202p \314!\203o \315\316!!\202p \314!\203| \317!\202} \211\320\203\210 \321\202\211 \"r\322 q\210`)\323!\204\246 \324!\204\246 \242\325>\203\302 ;\203\302 \326 \"\203\302 \327!\203\276 \330\202\316 \331\202\316 \327!\203\315 \332\202\316 \333\334;\204\334 \335!\203\340 \336\202\262\314!\203\375 \337!A\340=\203\367 \341P\202\262\342P\202\262\203\n\343\344\"\202\262\211\242\312=\262\203@\345\346\327\n!\203\"\347\202#\350\351 8\352=\2030\353\202<\351 8\203;\354\202<\355#\202\262\242\356=\204O\357 !\203U\354P\202\262\323!\203b\360P\202\262\242\361=\203p\355P\202\262\242\362=\203~\363P\202\262\324!\203\261\364\243\211\203\241\365\242!\203\232\366\262\364\262\211\243\262\202\211\203\252\353\202\253\367P\266\202\202\262\370!\210\203\304\313!\204\304\334\371!\202\323rq\210\212\372 \373\374\375\376\377!\201@ \"\201A $\216\201B \201C \201D !\364\366#\203\370\201E \201F \201G #\210)\210*\203>\334\343\201H \201I =\203\201J \202\201K !\"!\210rq\210\212\201B \201C \201L !\364\366#\210\201E \201F \201M \f$\210*\334\201N !\210r\322 q\210\201O \212b\210\374y\210`)`\"\210)\201P \210\201P \210\201Q \n\366\"p\211\242\312=\262\203\220\203\220 \203\220\201R \201S \"\203\220\201T !\210\201U \f!\210rq\210\201V \f
%\201W \201X \"\210\201Y \206\273\201Z \261\210\n\201[ >?\205\316\201\\ \201] !\262)\266\202\207" [standard-output help-enable-auto-load text-quoting-style featurep nadvice advice--p advice--symbol-function advice--cd*r signal void-function autoload fboundp subrp intern subr-name indirect-function find-lisp-object-file-name defun help-buffer byte-code-function-p keymapp (macro lambda closure) help-fns--autoloaded-p commandp "an interactive autoloaded " "an autoloaded " "an interactive " "a " princ vectorp "a keyboard macro" subr-arity unevalled "special form" "built-in function" format-message "an alias for `%s'" format "%s autoloaded %s" "an interactive" "an" 4 keymap "keymap" "Lisp macro" "Lisp function" macro macrop "compiled Lisp function" lambda closure "Lisp closure" nil char-table-p t "sparse keymap" "" ",\nwhich is not defined. Please make a bug report." match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 re-search-backward substitute-command-keys "alias for `\\([^`']+\\)'" help-xref-button 1 help-function " in `%s'" C-source "C source code" help-fns-short-filename "`\\([^`']+\\)'" help-function-def "." fill-region-as-paragraph terpri documentation string-match "\\([^\\]=\\|[^=]\\|\\`\\)\\\\[[{<]" autoload-do-load help-fns--key-bindings help-fns--signature run-hook-with-args help-fns-describe-function-functions "\n" "Not documented." (straight grave) set-buffer-file-coding-system utf-8] 18 "\n\n(fn FUNCTION)"])
(byte-code "\300\301\302\"\210\300\301\303\"\210\300\301\304\"\210\300\301\305\"\207" [add-hook help-fns-describe-function-functions help-fns--obsolete help-fns--interactive-only help-fns--parent-mode help-fns--compiler-macro] 3)
#@184 Return the bound variable symbol found at or before point.
Return 0 if there is no such symbol.
If ANY-SYMBOL is non-nil, don't insist the symbol be bound.
(fn &optional ANY-SYMBOL)
(defalias 'variable-at-point #[256 "\301 p\302\303\304\305\306\"\307\"\310$\216\311!\210\3121S \212\313\314w\210\315\316!\303U\2039 gz\317=\2049 gz\320=\2049 \321\322!\210\313\314w\210\323p!\2119\205L \324!\205L \211\262)0\202W \210\202Z \206\252 \325 \211\205c \326!\211\203u \204q \324!\203u \211\202\244 \327 \302\303\330\305\306!\331\"\332$\216\205\241 \333\334\"\205\241 \326\335\336\"!\262\204\240 \324!\205\241 )\262\266\202\206\252 \303)\207" [emacs-lisp-mode-syntax-table syntax-table make-byte-code 0 "r\301q\210\302\300!)\207" vconcat vector [set-syntax-table] 2 set-syntax-table (error) "'" nil skip-syntax-backward "_w" 119 95 forward-sexp -1 read boundp find-tag-default intern-soft match-data "\301\300\302\"\207" [set-match-data evaporate] 3 string-match "\\`\\W*\\(.*?\\)\\W*\\'" match-string 1] 12 (#$ . 15346)])
(defalias 'describe-variable-custom-version-info #[257 "\211\301N\302N\303\203 \304\305\"\262\202L \203L \242\243<\203& \243@\202( \243\236\306\"A\203J \203J \304\307\205B \304\310\"\311Q#\262\266\207" [customize-package-emacs-version-alist custom-version custom-package-version nil format "This variable was introduced, or its default value was changed, in\nversion %s of Emacs.\n" assoc "This variable was introduced, or its default value was changed, in\nversion %s of the %s package" " that is part of Emacs %s" ".\n"] 13 "\n\n(fn VARIABLE)"])
#@291 Display the full documentation of VARIABLE (a symbol).
Returns the documentation as a string, also.
If VARIABLE has a buffer-local value in BUFFER or FRAME
(default to the current buffer and current frame),
it is displayed along with the global value.
(fn VARIABLE &optional BUFFER FRAME)
(defalias 'describe-variable #[769 "\306\307!\204\n p\262\310!\204 \311 \2629\204 \312\313!\202z\212rq\210\314!)?\315N\306\211\211\204^ \311 p\316\317\320\321\322\"\323\"\324$\216\325 \326\"\210r q\210\nJ\262\327 !\262*\266\330\331\n\nE\332\333!\"\210\306\211\223\210\334 B\335\nB\311 \336 \337!\211 \306\211r q\210\340
!\210\341
\342\"\262\n \203\330 \343\344\345\f\346=\203\247 \347\202\253 \350
!\"!\210r\fq\210\212\351\352\353!\306\354#\210\355\356\357
$\210*\203\321 \343\360!\210\202\352 \343\361!\210\202\352 \203\344 \343\362!\210\202\352 \343\352\363!!\210)\204\231r\fq\210`\262\343\364!\210`\365 \354 \366 !) 9\203\367\n!\204\344\370\"\202\211\262\371G`[#\372W\203.\211c\210\202M\373 \210\374\n!\210`\372\365\317!\\W\203H\211T|\210\202MS|\210\375N\211:\205f\3761b\377@!0\202f\210\201G :\203\226\211\f\232\204\226\211\201G \232\204\226\343\201H !\210`\262\374!\210`\201I \\W\203\226S|\210\266)\373 \210\203@\201J !\203\273\343\201K \201L \201M !\"!\210\202\361\201N !\203\320\343\201K \201O !!\210\202\361\201P !\203\345\343\201K \201Q !!\210\202\361\343\201K \201R \"!\210\201S
!\204\343\201T !\210\202=\201U
!r\fq\210\343\201V !\210=\203#\343\201W !\210\202;\373 \210`\374!\210`\201I \\W\203:\211S|\210\210)\210\373 \210r\fq\210\201X ed\"\201Y V\203\244\201Z @!\210b\210\201[ \201\\ !\203m\201] \201^ !\210\212\201_ c\210\201` \201A !\210\201a A)\201b c\210\201c \201d \201e A\201f \354\201g \201h &\210\201i c\210)\373 \210\201j 1\270\201k
!0\202\273\210\f
\201l N\211@\201m N\201n \201o \"\206\335\201n \201o \"\306\201p !\2036\201q !\203\201r \201s !r\211q\210\316\317\201t \321\322!\201u \"\201v $\216\201p !*\262\2036\354\262\343\201w !\210
\203-\343\201x !\210\343\201y !\210\202]
\203]\201J !\203R\354\262\343\352\201z !!\210\202]\354\262\343\352\201{ !!\210=\204q\354\262\343\344\201| \"!\210\203\273\354\262\343\201} !\210\201v 8\203\226\343\201K \201~ \201v 8\"!\210\343;\203\244\201 P\202\266\203\263\344\201\200 @\"\202\266\201\201 !\210\373 \210
Brq\210B)\235\203~\354\262
Brq\210C)\235\203v\201\202 !\205\201\203 \201\202 !!?\205\201\204 \201\202 !!\354\343\352\201\205 !!\210\204\343\201i !\210\202q\343\201\206 !\210:\203>\201v 8\2037\201\207 D@\"\262\202>@\262\306\262\343\352\203J\201\210 \202M\201\211 !!\210r\fq\210\201\212 \201\213 \201\214 \201\215 D%\210)\343\352\201\216 !!\210\266\202~\343\352\201\217 !!\210E>\203\217\354\262\343\201\220 !\210\201\221 !\203\261\354\262\343\201\222 !\210F\236\203\261\343\352\201\223 !!\210\203\333\354\262\343\201\224 !\210\343\201\225 !\210\343\201\226 !\203\323\201\227 \202\331\344\201\230 \"!\210\211\203\342\373 \210\343\201\231 !\210r\fq\210\206\363\201\232 c\210)\266\201\233
!\203G\201\234 \373 \210\373 \210\343\201\235 \201\236 Q!\210r\fq\210\212\351\201\237 \201\240 Q\306\354#\210\355\356\201\241 #\210*\210\201\242
!\211\203F\373 \210\373 \210\343!\210\210r\fq\210\201\243 )\262rq\210\201\244 \306\"\262)\201\245 \201\246 !\203r\201\246 \"\202s\211)\266\204*\266\205)\207" [help-window-point-marker temp-buffer-window-setup-hook temp-buffer-window-show-hook help-window-old-frame standard-output print-quoted nil buffer-live-p frame-live-p selected-frame message "You did not specify a variable" boundp permanent-local make-byte-code 0 "\302\300!\203 \303\300\304\"\210\305\301!\205 \301q\207" vconcat vector [frame-live-p select-frame norecord buffer-live-p] 3 select-frame norecord variable-binding-locus help-setup-xref describe-variable called-interactively-p interactive help-mode-setup help-mode-finish help-buffer temp-buffer-window-setup prin1 find-lisp-object-file-name defvar princ format-message " is a variable defined in `%s'.\n" C-source "C source code" file-name-nondirectory re-search-backward substitute-command-keys "`\\([^`']+\\)'" t help-xref-button 1 help-variable-def "It is void as a variable." "Its " " is void as a variable." "'s " "value is " line-beginning-position prin1-to-string booleanp "`%s'" + 68 terpri pp standard-value (error) eval emacs-lisp-mode-syntax-table help-button-cache file-local-variables-alist dir-local-variables-alist dir-locals-file ignored-local-variables safe-local-variable-values :help-eval-error "\nOriginal value was \n" 20 bufferp format "Local in buffer %s; " buffer-name framep "It is a frame-local variable; " terminal-live-p "It is a terminal-local variable; " "It is local to %S" default-boundp "globally void" default-value "global value is " "the same." count-lines 10 set-syntax-table looking-at "value is" replace-match "" "\n\nValue:" make-local-variable point-marker "value is shown " insert-button "below" action follow-link help-echo "mouse-2, RET: show value" ".\n" (error) indirect-variable byte-obsolete-variable safe-local-variable documentation-property variable-documentation local-variable-if-set-p local-variable-p generate-new-buffer " *temp*" "\301\300!\205 \302\300!\207" [buffer-name kill-buffer] 2 " Automatically becomes " "permanently " "buffer-local when set.\n" " This variable's buffer-local value is permanent.\n" " This variable's value is permanent if it is given a local binding.\n" " This variable is an alias for `%s'.\n" " This variable is obsolete" " since %s" ";\n " ";\n use `%s' instead." "." buffer-file-name file-remote-p dir-locals-find-file " This variable's value is directory-local" ", set " expand-file-name "by the file\n `" "for the directory\n `" insert-text-button type help-dir-local-var-def help-args "'.\n" " This variable's value is file-local.\n" " This variable is ignored as a file-local variable.\n" risky-local-variable-p " This variable may be risky if used as a file-local variable.\n" " However, you have added it to `safe-local-variable-values'.\n" " This variable is safe as a file local variable " "if its value\n satisfies the predicate " byte-code-function-p "which is a byte-compiled expression.\n" "`%s'.\n" "Documentation:\n" "Not documented as a variable." custom-variable-p "customize" "You can " " this variable." "\\(" "\\)" help-customize-variable describe-variable-custom-version-info buffer-string temp-buffer-window-show functionp help-window-setup] 28 (#$ . 16957) (byte-code "\302 \303\304\3059\203 \306\307\"\202 \310 \311\303\304\211 9\205# \312\n!&\262\211\313\232\2031 \2024 \314!)C\207" [enable-recursive-minibuffers obarray variable-at-point t nil completing-read format "Describe variable (default %s): " "Describe variable: " #[257 "\211\300N\206 \301!\205 \302!?\207" [variable-documentation boundp keywordp] 3 "\n\n(fn VV)"] symbol-name "" intern] 12)])
#@328 Display the full documentation of SYMBOL.
Will show the info of SYMBOL as a function, variable, and/or face.
Optional arguments BUFFER and FRAME specify for which buffer and
frame to show the information about SYMBOL; they default to the
current buffer and the selected frame, respectively.
(fn SYMBOL &optional BUFFER FRAME)
(defalias 'describe-symbol #[769 "\211CC9\204
\303\304!\210\305\242!\204 \211p\240\210\306\242!\204$ \307 \240\210r\310 q\210\311\312\211\"\210\313\312\314\315\316\317\320\321\f #\322\"\323\324%\"\"\237\211A?A\203\211 eb\210\325@@A@A\211\203 \211c\210`\326\312x\210`|\210\327\330\331\261\210\203 \332\n!\333\334\327\261\210)\266A\262\202I \211\204\227 \312\311\335D\312\"\210eb\266\202)\207" [describe-symbol-backends inhibit-read-only help-xref-stack-item user-error "You didn't specify a function or variable" buffer-live-p frame-live-p selected-frame help-buffer help-setup-xref nil delq mapcar make-byte-code 257 "\211@A\211@A\211@A\300!\205! \304\211\300\301\242\302\242#B\266\203\207" vconcat vector [help-xref-stack-item nil] 15 "\n\n(fn ARG0)" t " \n" "\n\n" #("\n" 0 1 (face (:height 0.1 :inverse-video t))) "\n" symbol-name " is also a " "." describe-symbol] 16 (#$ . 24057) (byte-code "\303 \304\305\306\307\310\311!\312\"\313\314%\"\211\203 \202 \315 \206! \211\316\317\203/ \320\321\"\2020 \322\n\323\316\324\211\205> \325 !&\211\326\232\203J \202M \327!)C\207" [describe-symbol-backends enable-recursive-minibuffers obarray symbol-at-point cl-some make-byte-code 257 "\211A@\300!\207" vconcat vector #1=[] 3 "\n\n(fn X)" function-called-at-point t completing-read format "Describe symbol (default %s): " "Describe symbol: " #[257 "\301\302\303\304\305\306!\307\"\310\311%\"\207" [describe-symbol-backends cl-some make-byte-code 257 "\211A@\300!\207" vconcat vector #1# 3 "\n\n(fn X)"] 8 "\n\n(fn VV)"] nil symbol-name "" intern] 13)])
#@202 Describe the syntax specifications in the syntax table of BUFFER.
The descriptions are inserted in a help buffer, which is then displayed.
BUFFER defaults to the current buffer.
(fn &optional BUFFER)
(defalias 'describe-syntax #[256 "\211\206 p\262\305\306D\307\310!\"\210\311\211\223\210\312 B\313\nB\314 \315 \316!\211 \311\211rq\210\317 )r\fq\210\320\321\"\210\322!\211\262\205M \323c\210\320\321\"\210\2029 )\262\262rq\210\324\311\"\262)\325\326!\203j \326\"\202k \211)\266\204*\207" [help-window-point-marker temp-buffer-window-setup-hook temp-buffer-window-show-hook help-window-old-frame standard-output help-setup-xref describe-syntax called-interactively-p interactive nil help-mode-setup help-mode-finish selected-frame help-buffer temp-buffer-window-setup syntax-table describe-vector internal-describe-syntax-value char-table-parent "\nThe parent syntax table is:" temp-buffer-window-show functionp help-window-setup] 9 (#$ . 26000) nil])
(defalias 'help-describe-category-set #[257 "\211\204 \300\202 \301!\203 \302\202 \3031 \304!0\202 \210\305c\207" ["default" char-table-p "deeper char-table ..." (error) category-set-mnemonics "invalid"] 3 "\n\n(fn VALUE)"])
#@273 Describe the category specifications in the current category table.
The descriptions are inserted in a buffer, which is then displayed.
If BUFFER is non-nil, then describe BUFFER's category table instead.
BUFFER should be a buffer or a buffer name.
(fn &optional BUFFER)
(defalias 'describe-categories #[256 "\211\206 p\262\305\306D\307\310!\"\210\311\211\223\210\312 B\313\nB\314 \315 \316!\211 \311\211rq\210\317 )\320\321\"\322!\203A \211G\323U\204E \324\325!\210r\fq\210\326c\210`\321\311\211\323\321\211W\203l \211H\203d T\262\210\211T\262\202R \266S\327\245T\262\321\262\323\321\211W\203\344 \211H\211\203\333 \330\331\"\210\332\321\"\262\211G\333Y\203\243 \211\321\334O\335P\262`dW\203\263 \336\245\337_\340\"\210\341\\\342\261\210`dW\203\307 \343y\210\202\312 \344c\210T\262\246\321U\203\333 b\210\266\211T\262\202z \266db\210\344\345\346\261\210\347\350\"\210\351c\210\323\321\211W\203'\211H\211\203 \330\344\"\203\211\321\225\311O\262\341\\\352\344\261\210\266\211T\262\202\371 \266\353!\211\262\205=\354c\210\347\350\"\210\202))\266\202\262rq\210\355\311\"\262)\356\357!\203Z\357\"\202[\211)\266\204*\207" [help-window-point-marker temp-buffer-window-setup-hook temp-buffer-window-show-hook help-window-old-frame standard-output help-setup-xref describe-categories called-interactively-p interactive nil help-mode-setup help-mode-finish selected-frame help-buffer temp-buffer-window-setup category-table char-table-extra-slot 0 vectorp 95 error "Invalid first extra slot in this category table\n" "Legend of category mnemonics (see the tail for the longer description)\n" 4 string-match ".*" match-string 17 14 "..." move-to-column 20 t 32 58 1 "\n" "character(s) category mnemonics\n" "------------ ------------------" describe-vector help-describe-category-set "Legend of category mnemonics:\n" ": " char-table-parent "\nThe parent category table is:" temp-buffer-window-show functionp help-window-setup] 18 (#$ . 27212) nil])
#@82 Produce an nroff buffer containing the doc-strings from the DOC file.
(fn FILE)
(defalias 'doc-file-to-man #[257 "\301!\204 \302\303\"\210\304\305\306!!\210\307\310\311\261\210\312!\210\313\314\315\313\316#\203b \317\320!\2034 `S\321 |\210\202 \322\323!\210\211\203B \324c\210\202E \307\262\325c\210\317\326!\203R \327\202S \330c\210\322\331!\210\331y\210\332c\210\202 \210\324c\210\313\333 \207" [buffer-undo-list file-readable-p error "Cannot read file `%s'" pop-to-buffer generate-new-buffer "*man-doc*" t ".TH \"Command Summary for GNU Emacs\"\n" ".AU Richard M. Stallman\n" insert-file-contents nil search-forward " " move looking-at "S" line-end-position delete-char -1 "\n.DE\n" "\n.SH " "F" "Function " "Variable " 1 ".DS L\n" nroff-mode] 6 (#$ . 29235) (byte-code "\302\303 \304$C\207" [doc-directory internal-doc-file-name read-file-name "Name of DOC file: " t] 5)])
#@80 Produce a texinfo buffer with sorted doc-strings from the DOC file.
(fn FILE)
(defalias 'doc-file-to-info #[257 "\301!\204 \302\303\"\210\304\305\211\211\211\306\307!r\211q\210\310\304\311\312\313!\314\"\315$\216\316!\210\317\320\305\321#\203< \322u\210\323c\210\324u\210\202( eb\210\325\326\305\321#\203z \327\330!\204? \305f\262`T\331 {\262\332\315!\325\326\305\333#\203h `S\202i `{\262EB\262\322u\210\202? *\210\334\306\335!!\210\321\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\261\210\364\365\"\262\211\211\203\334 \211@\366\367A@\370\"\203\270 \371\202\271 \372\373@\374\3158\375\261\210T\376\246\211\262\304U\203\325 \377c\210A\266\202\202\244 \210\201@ \201A \261\210\305\201B \207" [buffer-undo-list file-readable-p error "Cannot read file `%s'" 0 nil generate-new-buffer " *temp*" make-byte-code "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 insert-file-contents re-search-forward "[@{}]" t -1 "@" 1 search-forward " " looking-at "S" line-end-position line-beginning-position move pop-to-buffer "*info-doc*" "\\input texinfo @c -*-texinfo-*-\n" "@setfilename emacsdoc.info\n" "@settitle Command Summary for GNU Emacs\n" "@finalout\n" "\n@node Top\n" "@unnumbered Command Summary for GNU Emacs\n\n" "@table @asis\n\n" "@iftex\n" "@global@let@ITEM@item\n" "@def@item{@filbreak@vskip5pt@ITEM}\n" "@font@tensy cmsy10 scaled @magstephalf\n" "@font@teni cmmi10 scaled @magstephalf\n" "@def\\{{@tensy@char110}}\n" "@def|{{@tensy@char106}}\n" "@def@{{{@tensy@char102}}\n" "@def@}{{@tensy@char103}}\n" "@def<{{@teni@char62}}\n" "@def>{{@teni@char60}}\n" "@chardef@@64\n" "@catcode43=12\n" "@tableindent-0.2in\n" "@end iftex\n" sort #[514 "@@\230\203 A@A@X\207@@\231\207" [] 4 "\n\n(fn E1 E2)"] "\n@item " char-equal 70 "Function" "Variable" " @code{" "}\n@display\n" "\n@end display\n" 100 "\n@end table\n@table @asis\n" "@end table\n" "@bye\n" texinfo-mode] 28 (#$ . 30130) (byte-code "\302\303 \304$C\207" [doc-directory internal-doc-file-name read-file-name "Name of DOC file: " t] 5)])
(provide 'help-fns)
Kontol Shell Bypass