%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/cus-dep.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require widget cus-face cl-lib] 2)
#@45 Output file for `custom-make-dependencies'.
(defvar generated-custom-dependencies-file "cus-load.el" (#$ . 497))
#@72 Regexp matching file names not to scan for `custom-make-dependencies'.
(defvar custom-dependencies-no-scan-regexp "\\(^\\.#\\|\\(loaddefs\\|ldefs-boot\\|cus-load\\|finder-inf\\|esh-groups\\|subdirs\\)\\.el$\\)" (#$ . 616))
(byte-code "\301\302!\210\203
\303\304\305\"\210\301\207" [noninteractive require autoload mapc #[(e) "\302\303\304\"!\305	!\206\306	\")\207" [e sym intern format "%s-mh" fboundp defalias] 4] (defcustom defface defgroup)] 3)
#@132 Batch function to extract custom dependencies from .el files.
Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS
(defalias 'custom-make-dependencies #[nil "\306\307\310\311\n\312\"\313Q\314\306\211@A\211AA\242\211\2031\315\316\317\320
\306\321#\"!@\244@\202@\237*B\322\323\324!\314BG\306\325%C\326\327!DrDq\210\330\216B\306E\211F\203lF@\211E@EAG\331\332
!!HC\fT\211\306\247\203\202@Y\205\207\333#\266\334IG\"\204b\334\335\336
G#\"\204b\337G!\203b\340 \210\341 \210\342G!\210\343 \210eb\210\334\344G\"\210J\206\310\345\346\347G\"!GKL\212\350\351\352L!\353Q\306\312#)\203\344\354L!L\3551\\\350\356\306\312#\205X\357 \210\346\347!\360p!MN\3611\312O\362MA@\363L#\210\364M!)0\202S\210\3651Q\366M>A@\211P\205LP@\367=\205L\370PA@MA@\354\335\371N\372\232\203G\373\202IN\"!#)0\202S\210\306\210*\202\3500\202`\210\202a\210*+FA\211F\204[-\374C!\210.\375\376Q\"\210\377Q!q\210\312R\340 \210\201WQ\201X\312#c\210\201Y\201Z!\210\306S\201[\201\\!\210\201]S\201^\"\306T\211F\203\327F@T\201_T@\201`TA\201a\261\210FA\211F\204\267+\201b\345Q!\201c\261\210\306\211UV\201[\201d!\210\201]U\201e\"\306T\211F\203YF@T\201fT@\201gTA@\201a\261\210\201fT@\201h\201iT8\201a\261\210\201jT8\203P\201fT@\201k\201jT8\201a\261\210FA\211F\204*\201lV\203h\201m\202k\201n\261\210\201o\201]V\201p\"p\"\210\201qc\210*\201r \210\375\201sQ\"\207" [enable-local-eval enable-local-variables preloaded-file-list preloaded file-count subdir nil :safe "\\`\\(\\./+\\)?" regexp-opt t "\\.el\\'" 0 reverse mapcar #[(f) "	B\207" [subdir f] 2] directory-files "\\`[^=.].*\\.el\\'" make-progress-reporter byte-compile-info-string "Scanning files for custom" 10 generate-new-buffer " *temp*" #[nil "\301!\205	\302!\207" [#1=#:temp-buffer buffer-name kill-buffer] 2] directory-file-name expand-file-name progress-reporter-do-update string-match format "%s/%s" file-exists-p erase-buffer kill-all-local-variables insert-file-contents hack-local-variables "\\`\\(.*\\)\\.el\\'" file-name-nondirectory match-string 1 re-search-forward "(\\(cc-\\)?provide[ 	\n]+\\('\\|(quote[ 	\n]\\)[ 	\n]*" regexp-quote "[ 	\n)]" intern (error) "^(def\\(custom\\|face\\|group\\|ine\\(?:-globalized\\)?-minor-mode\\)" beginning-of-line read (error) put custom-where eval (error) :group quote custom-add-to-group "custom-%s" "custom" "variable" progress-reporter-done byte-compile-info-message "Generating %s..." find-file-noselect #2=#:--cl-var-- command-line-args-left files progress #1# elem --dolist-tail-- file default-directory custom-dependencies-no-scan-regexp generated-autoload-load-name load-file-name name expr type custom-dont-initialize group generated-custom-dependencies-file buffer-undo-list alist e groups version-alist autoload-rubric "custom dependencies" search-backward "\f" mapatoms #[(symbol) "\306N\307\211\211\205]\310\311\"\307\211\2033
@\211\312N\211\203,\n	\235\204,\n	B
A\211\204*	\205]\313!\314\315!\316\216\317\320	\321\"!\210)rq\210\322 +BB\211+\207" [symbol found where members member --dolist-tail-- custom-group nil mapcar car custom-where symbol-name generate-new-buffer #4=" *string-output*" #[nil "\301!\207" [standard-output kill-buffer] 2] prin1 sort string< buffer-string standard-output alist] 6] sort #[(e1 e2) "@	@\231\207" [e1 e2] 2] "(put '" " 'custom-loads '" ")\n" "\n;; The remainder of this file is for handling :version.\n;; We provide a minimum of information so that `customize-changed-options'\n;; can do its job.\n\n;; For groups we set `custom-version', `group-documentation' and\n;; `custom-tag' (which are shown in the customize buffer), so we\n;; don't have to load the file containing the group.\n\n;; This macro is used so we don't modify the information about\n;; variables and groups if it's already set. (We don't know when\n;; " " is going to be loaded and at that time some of the\n;; files might be loaded and some others might not).\n(defmacro custom-put-if-not (symbol propname value)\n  `(unless (get ,symbol ,propname)\n     (put ,symbol ,propname ,value)))\n\n" #[(symbol) "\306N\307\211\205\231\310N\211\205\231\311!\204\312!\203I\313\n\"\203?	\313\n\"A\235?\205\231\313\n\"\211	\fAB\241)\202\231\n	DB\211\202\231\314!\315\316!\317\216
\320\n!\210)r
q\210\321 +\315\316!\322\216
\320\323N!\210)r
q\210\321 +\324N\205\222\315\316!\325\216
\320\324N!\210)r
q\210\321 +FB\211*\207" [symbol where version version-alist #3=#:v standard-output custom-version nil custom-where custom-variable-p custom-facep assoc symbol-name generate-new-buffer #4# #[nil "\301!\207" [standard-output kill-buffer] 2] prin1 buffer-string #[nil "\301!\207" [standard-output kill-buffer] 2] group-documentation custom-tag #[nil "\301!\207" [standard-output kill-buffer] 2] groups] 7] #[(e1 e2) "@	@\231\207" [e1 e2] 2] "(custom-put-if-not '" " 'custom-version '" " 'group-documentation " 2 3 " 'custom-tag " "\n(defvar custom-versions-load-alist " "'" "" prin1 #[(e1 e2) "\302@	@\"\207" [e1 e2 version<] 3] "\n  \"For internal use by custom.\nThis is an alist whose members have as car a version string, and as\nelements the files that have variables or faces that contain that\nversion.  These files should be loaded before showing the customization\nbuffer that `customize-changed-options' generates.\")\n\n" save-buffer "Generating %s...done"] 9 (#$ . 1078)])
(provide 'cus-dep)

Zerion Mini Shell 1.0