403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 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/cus-dep.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(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" (#$ . 173))
#@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$\\)" (#$ . 292))
(byte-code "\301\302!\210\203
\303\304\305\"\210\301\207" [noninteractive require autoload mapc #[257 "\300\301\302\"!\303!\206\304\"\207" [intern format "%s-mh" fboundp defalias] 5 "\n\n(fn E)"] (defcustom defface defgroup)] 3)
#@13 

(fn EXPR)
(defalias 'custom--get-def #[257 "\211\242\300>\204\207\301!C\302\203A\211A\262\242\211:\203=\211\242\211\303\267\266\202
\243\304\"\262\266\202
B\266\203\202
\210\210\202
\305\237!\207" [(define-minor-mode define-globalized-minor-mode) macroexpand-all nil #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (progn 38 custom-declare-variable 52)) append macroexp-progn] 9 (#$ . 758)])
#@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 #[0 "\306\307\310\311\n\312\"\313Q\314\306C\306\211\211A\242\240\210\242\2037\315\316\317\320\"\321\242\306\322#\"!\244\262\306\262\202\237\266\203\323\324\325!\314G\306\326%\327\330\312\"r\211q\210\317\331\"\216\211\203b\211@\211@A\332\333!!T\211\262\n\306\247\203w@Y\205|\334#\266\335
\"\204X\335	\336\337#\"\204X\340!\203X\341 \210\342 \210\343!\210\344 \210eb\210\335\345\"\210@\206\267\346\347\350\"!\211AB\212\351\352\353!\354Q\306\312#)\203\321\355!\262\3561U\351\357\306\312#\205P\360 \210\347\350!\361\362p!!\3631\312A@C\364\242\365=\203A@\202\366#\210\367\312\")\266\2020\266\202\325\210\3701K\371>A@\211\205C\211@\365=\205C\372A@A@\355\336\373\374\232\203>\375\202@\"!#\2620\266\202\325\266\202\3250\210\202V\210*\210)\266A\266\202\202S\210*\210\376!\210*\266\324\336\377D\"\312\"\210\201FD!q\210\312E\341 \210\201GD\201H\312#c\210\201I\201J!\210\306C\201K\317\201L\"!\210\201M\242\201N\"\211\203\312\211@\201O@\201PA\201Q\261\210A\266\202\202\255\266\201R\346D!\201S\261\210\306C\306C\201K\317\201T#!\210\201M\242\201U\"\211\203>\211@\201V@\201WA@\201Q\261\210\201V@\201X\201Y8\201Q\261\210\201Z8\2037\201V@\201[\201Z8\201Q\261\210A\266\202\202\362\210\201\\\242\203M\201]\202P\201^\261\210\201_\201M\242\201`\"p\"\210\201ac\266\201b \210\324\336\201cD\"\312\"\207" [enable-local-eval enable-local-variables preloaded-file-list command-line-args-left default-directory custom-dependencies-no-scan-regexp nil :safe "\\`\\(\\./+\\)?" regexp-opt t "\\.el\\'" 0 reverse mapcar make-closure #[257 "\300\242B\207" [V0] 3 "\n\n(fn F)"] directory-files "\\`[^=.].*\\.el\\'" make-progress-reporter byte-compile-info "Scanning files for custom" 10 generate-new-buffer " *temp*" #[0 "\301\300!\205	\302\300!\207" [V0 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 custom--get-def read (error) put quote custom-where eval (error) :group custom-add-to-group "custom-%s" "custom" "variable" progress-reporter-done "Generating %s..." generated-autoload-load-name load-file-name load-true-file-name custom-dont-initialize generated-custom-dependencies-file buffer-undo-list find-file-noselect autoload-rubric "custom dependencies" search-backward "\f" mapatoms #[257 "\211\302N\303\211\205T\304\305\"\211\203.\211@\211\306N\262\203'\235\204'B\262A\266\202\202
\210\211\205T\300\307!\310\311\312\"\313\216	\314\315\316\"!\210)r	q\210\317 +B\300\242B\240\207" [V0 standard-output custom-group nil mapcar car custom-where symbol-name generate-new-buffer #1=" *string-output*" t #[0 "\301!\207" [standard-output kill-buffer] 2] prin1 sort string< buffer-string] 10 "\n\n(fn SYMBOL)"] sort #[514 "@@\231\207" #2=[] 4 "\n\n(fn E1 E2)"] "(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'\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" #[257 "\211\303N\304\205\233\305N\262\211\205\233\306!\204\307!\203F\310\300\242\"\203=\211\310\300\242\"A\235?\205\233\310\300\242\"\211AB\241\207\300D\300\242B\240\207\301\311!\312\313\314\"\315\216\n\316!\210)r\nq\210\317 +\312\313\314\"\320\216\n\316\321N!\210)r\nq\210\317 +\322N\205\226\312\313\314\"\323\216\n\316\322N!\210)r\nq\210\317 +F\301\242B\240\207" [V0 V1 standard-output custom-version nil custom-where custom-variable-p facep assoc symbol-name generate-new-buffer #1# t #[0 "\301!\207" [standard-output kill-buffer] 2] prin1 buffer-string #[0 "\301!\207" [standard-output kill-buffer] 2] group-documentation custom-tag #[0 "\301!\207" [standard-output kill-buffer] 2]] 10 "\n\n(fn SYMBOL)"] #[514 "@@\231\207" #2# 4 "\n\n(fn E1 E2)"] "(custom-put-if-not '" " 'custom-version '" " 'group-documentation " 2 3 " 'custom-tag " "\n(defvar custom-versions-load-alist " "'" "" prin1 #[514 "\300@@\"\207" [version<] 5 "\n\n(fn E1 E2)"] "\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' generates.\")\n\n" save-buffer "Generating %s...done"] 21 (#$ . 1218)])
(provide 'cus-dep)

Youez - 2016 - github.com/yon3zu
LinuXploit