;ELC   
;;; Compiled by cyd@localhost on Mon Apr 23 22:20:35 2007
;;; from file /home/cyd/emacs/lisp/cus-dep.el
;;; in Emacs version 22.0.99
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`cus-dep.el' was compiled for Emacs 19.29 or later"))

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


(byte-code "\300\301!\210\300\302!\207" [require widget cus-face] 2)
#@46 Output file for \[custom-make-dependencies].
(defvar generated-custom-dependencies-file "cus-load.el" (#$ . 630))
#@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!q\210	\306\211\203\227 @\311\312\n\"\210\313\n\306\314#\315\n!\316\317\320\321\f\"\322\"\323Q9\211:\306;\211<\203\217 <@;\324;!\203\206 \325;\"\204\206 \326 \210\327;!\210eb\210\325\330;\"\210\331\332\333;\"!;=>\212\334\335\336>!\337Q\306\322#)\203\200 \340>!>\306\341\342\217\210*<A\211<\2048 -A\211\204 +\311\343?\"\210\344?!q\210\326 \210\345\331?!\346\261\210\347\350!\210\351\331?!\352\261\210\306@\347\353!\210\354@\203\316 \355\202\317 \356\261\210\357@p\"\210\360c\210)\361\362\331?!!\363\331?!\364\261\210\365A\366 \210)\311\367?\"\210\370 \207" [enable-local-eval command-line-args-left subdir #1=#:--cl-dolist-temp-- preloaded-file-list preloaded nil get-buffer-create " cus-dep temp" message "Directory %s" directory-files "\\`[^=].*\\.el\\'" expand-file-name "\\`" regexp-opt mapcar #[(f) "\301\302!!\207" [f file-name-sans-extension file-name-nondirectory] 3] t "\\.el\\'" file-exists-p string-match erase-buffer insert-file-contents "\\`\\(.*\\)\\.el\\'" file-name-nondirectory match-string 1 re-search-forward "(provide[ 	\n]+\\('\\|(quote[ 	\n]\\)[ 	\n]*" regexp-quote "[ 	\n)]" intern (byte-code "\301\302\303\304#\203 \305 \210\306p!\303\307\310\217\210)\202  \303\207" [expr re-search-forward "^(def\\(custom\\|face\\|group\\)" nil t beginning-of-line read (byte-code "\303\304	!\210\305	A@\306\n#\210)\303\207" [custom-dont-initialize expr name t eval put custom-where] 4) ((error))] 4) ((error)) "Generating %s..." find-file-noselect ";;; " " --- automatically extracted custom dependencies\n;;\n;;; Code:\n\n" mapatoms #[(symbol) "\306N\307\211\211\205K \310\311\312\"\313\"\307\211\2036 @\211\314N\211\203/ \n	\235\204/ \n	BA\211\204 *	\205K \315\316!\317\261\210\320	\237p\"\210\321c+\207" [symbol found where members member #2=#:--cl-dolist-temp-- custom-group nil sort mapcar car string< custom-where "(put '" symbol-name " 'custom-loads '" prin1 ")\n"] 6] ";; These are for handling :version.  We need to have a minimum of\n;; information so `customize-changed-options' could 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;; `custom-versions-load-alist' is an alist that has as car a version\n;; number and as elts the files that have variables or faces that\n;; contain that version. These files should be loaded before showing\n;; the customization buffer that `customize-changed-options'\n;; generates.\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) "\304N\305\211\205\207 \306N\211\205\207 \307!\204 \310!\203J \311\n\"\203? 	\311\n\"A\235?\205\207 \311\n\"	\311\n\"AB\241\202\207 \n	CBB\211\202\207 \312\313!\314\261\210\315\np\"\210\316c\210\312\313!\261\210\317c\210\315\320Np\"\210\316c\210\321N\205\207 \312\313!\261\210\322c\210\315\321Np\"\210\316c*\207" [symbol where version version-alist custom-version nil custom-where custom-variable-p custom-facep assoc "(custom-put-if-not '" symbol-name " 'custom-version " prin1 ")\n" " 'group-documentation " group-documentation custom-tag " 'custom-tag "] 6] "\n(defvar custom-versions-load-alist " "'" "" prin1 "\n \"For internal use by custom.\")\n" "\n(provide '" file-name-sans-extension ")\n\n;; Local Variables:\n;; version-control: never\n;; no-byte-compile: t\n;; no-update-autoloads: t\n;; End:\n;;; " " ends here\n" 10000000 save-buffer "Generating %s...done" kill-emacs default-directory files file #3=#:--cl-dolist-temp-- load-file-name name generated-custom-dependencies-file version-alist kept-new-versions] 8 (#$ . 751)])