comparison lisp/auto-autoloads.el @ 209:41ff10fd062f r20-4b3

Import from CVS: tag r20-4b3
author cvs
date Mon, 13 Aug 2007 10:04:58 +0200
parents
children d44af0c54775
comparison
equal deleted inserted replaced
208:f427b8ec4379 209:41ff10fd062f
1 ;;; DO NOT MODIFY THIS FILE
2 (if (featurep 'TopLevel-autoloads) (error "Already loaded"))
3
4 ;;;### (autoloads (batch-byte-recompile-directory batch-byte-recompile-directory-norecurse batch-byte-compile display-call-tree byte-compile-sexp byte-compile compile-defun byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el")
5
6 (autoload 'byte-force-recompile "bytecomp" "\
7 Recompile every `.el' file in DIRECTORY that already has a `.elc' file.
8 Files in subdirectories of DIRECTORY are processed also." t nil)
9
10 (autoload 'byte-recompile-directory "bytecomp" "\
11 Recompile every `.el' file in DIRECTORY that needs recompilation.
12 This is if a `.elc' file exists but is older than the `.el' file.
13 Files in subdirectories of DIRECTORY are processed also unless argument
14 NORECURSION is non-nil.
15
16 If the `.elc' file does not exist, normally the `.el' file is *not* compiled.
17 But a prefix argument (optional second arg) means ask user,
18 for each such `.el' file, whether to compile it. Prefix argument 0 means
19 don't ask and compile the file anyway.
20
21 A nonzero prefix argument also means ask about each subdirectory.
22
23 If the fourth argument FORCE is non-nil,
24 recompile every `.el' file that already has a `.elc' file." t nil)
25
26 (autoload 'byte-recompile-file "bytecomp" "\
27 Recompile a file of Lisp code named FILENAME if it needs recompilation.
28 This is if the `.elc' file exists but is older than the `.el' file.
29
30 If the `.elc' file does not exist, normally the `.el' file is *not*
31 compiled. But a prefix argument (optional second arg) means ask user
32 whether to compile it. Prefix argument 0 don't ask and recompile anyway." t nil)
33
34 (autoload 'byte-compile-file "bytecomp" "\
35 Compile a file of Lisp code named FILENAME into a file of byte code.
36 The output file's name is made by appending `c' to the end of FILENAME.
37 With prefix arg (noninteractively: 2nd arg), load the file after compiling." t nil)
38
39 (autoload 'compile-defun "bytecomp" "\
40 Compile and evaluate the current top-level form.
41 Print the result in the minibuffer.
42 With argument, insert value in current buffer after the form." t nil)
43
44 (autoload 'byte-compile "bytecomp" "\
45 If FORM is a symbol, byte-compile its function definition.
46 If FORM is a lambda or a macro, byte-compile it as a function." nil nil)
47
48 (autoload 'byte-compile-sexp "bytecomp" "\
49 Compile and return SEXP." nil nil)
50
51 (autoload 'display-call-tree "bytecomp" "\
52 Display a call graph of a specified file.
53 This lists which functions have been called, what functions called
54 them, and what functions they call. The list includes all functions
55 whose definitions have been compiled in this Emacs session, as well as
56 all functions called by those functions.
57
58 The call graph does not include macros, inline functions, or
59 primitives that the byte-code interpreter knows about directly (eq,
60 cons, etc.).
61
62 The call tree also lists those functions which are not known to be called
63 \(that is, to which no calls have been compiled), and which cannot be
64 invoked interactively." t nil)
65
66 (autoload 'batch-byte-compile "bytecomp" "\
67 Run `byte-compile-file' on the files remaining on the command line.
68 Use this from the command line, with `-batch';
69 it won't work in an interactive Emacs.
70 Each file is processed even if an error occurred previously.
71 For example, invoke \"emacs -batch -f batch-byte-compile $emacs/ ~/*.el\"" nil nil)
72
73 (autoload 'batch-byte-recompile-directory-norecurse "bytecomp" "\
74 Same as `batch-byte-recompile-directory' but without recursion." nil nil)
75
76 (autoload 'batch-byte-recompile-directory "bytecomp" "\
77 Runs `byte-recompile-directory' on the dirs remaining on the command line.
78 Must be used only with `-batch', and kills Emacs on completion.
79 For example, invoke `xemacs -batch -f batch-byte-recompile-directory .'." nil nil)
80
81 ;;;***
82
83 ;;;### (autoloads (compiler-macroexpand define-compiler-macro ignore-errors assert check-type typep deftype cl-struct-setf-expander defstruct define-modify-macro callf2 callf letf* letf rotatef shiftf remf cl-do-pop psetf setf get-setf-method defsetf define-setf-method declare the locally multiple-value-setq multiple-value-bind lexical-let* lexical-let symbol-macrolet macrolet labels flet progv psetq do-all-symbols do-symbols dotimes dolist do* do loop return-from return block etypecase typecase ecase case load-time-value eval-when destructuring-bind function* defmacro* defun* gentemp gensym cl-compile-time-init) "cl-macs" "lisp/cl-macs.el")
84
85 (autoload 'cl-compile-time-init "cl-macs" nil nil nil)
86
87 (autoload 'gensym "cl-macs" "\
88 Generate a new uninterned symbol.
89 The name is made by appending a number to PREFIX, default \"G\"." nil nil)
90
91 (autoload 'gentemp "cl-macs" "\
92 Generate a new interned symbol with a unique name.
93 The name is made by appending a number to PREFIX, default \"G\"." nil nil)
94
95 (autoload 'defun* "cl-macs" "\
96 (defun* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a function.
97 Like normal `defun', except ARGLIST allows full Common Lisp conventions,
98 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro)
99
100 (autoload 'defmacro* "cl-macs" "\
101 (defmacro* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a macro.
102 Like normal `defmacro', except ARGLIST allows full Common Lisp conventions,
103 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro)
104
105 (autoload 'function* "cl-macs" "\
106 (function* SYMBOL-OR-LAMBDA): introduce a function.
107 Like normal `function', except that if argument is a lambda form, its
108 ARGLIST allows full Common Lisp conventions." nil 'macro)
109
110 (autoload 'destructuring-bind "cl-macs" nil nil 'macro)
111
112 (autoload 'eval-when "cl-macs" "\
113 (eval-when (WHEN...) BODY...): control when BODY is evaluated.
114 If `compile' is in WHEN, BODY is evaluated when compiled at top-level.
115 If `load' is in WHEN, BODY is evaluated when loaded after top-level compile.
116 If `eval' is in WHEN, BODY is evaluated when interpreted or at non-top-level." nil 'macro)
117
118 (autoload 'load-time-value "cl-macs" "\
119 Like `progn', but evaluates the body at load time.
120 The result of the body appears to the compiler as a quoted constant." nil 'macro)
121
122 (autoload 'case "cl-macs" "\
123 (case EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value.
124 Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared
125 against each key in each KEYLIST; the corresponding BODY is evaluated.
126 If no clause succeeds, case returns nil. A single atom may be used in
127 place of a KEYLIST of one atom. A KEYLIST of `t' or `otherwise' is
128 allowed only in the final clause, and matches if no other keys match.
129 Key values are compared by `eql'." nil 'macro)
130
131 (autoload 'ecase "cl-macs" "\
132 (ecase EXPR CLAUSES...): like `case', but error if no case fits.
133 `otherwise'-clauses are not allowed." nil 'macro)
134
135 (autoload 'typecase "cl-macs" "\
136 (typecase EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value.
137 Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it
138 satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds,
139 typecase returns nil. A TYPE of `t' or `otherwise' is allowed only in the
140 final clause, and matches if no other keys match." nil 'macro)
141
142 (autoload 'etypecase "cl-macs" "\
143 (etypecase EXPR CLAUSES...): like `typecase', but error if no case fits.
144 `otherwise'-clauses are not allowed." nil 'macro)
145
146 (autoload 'block "cl-macs" "\
147 (block NAME BODY...): define a lexically-scoped block named NAME.
148 NAME may be any symbol. Code inside the BODY forms can call `return-from'
149 to jump prematurely out of the block. This differs from `catch' and `throw'
150 in two respects: First, the NAME is an unevaluated symbol rather than a
151 quoted symbol or other form; and second, NAME is lexically rather than
152 dynamically scoped: Only references to it within BODY will work. These
153 references may appear inside macro expansions, but not inside functions
154 called from BODY." nil 'macro)
155
156 (autoload 'return "cl-macs" "\
157 (return [RESULT]): return from the block named nil.
158 This is equivalent to `(return-from nil RESULT)'." nil 'macro)
159
160 (autoload 'return-from "cl-macs" "\
161 (return-from NAME [RESULT]): return from the block named NAME.
162 This jump out to the innermost enclosing `(block NAME ...)' form,
163 returning RESULT from that form (or nil if RESULT is omitted).
164 This is compatible with Common Lisp, but note that `defun' and
165 `defmacro' do not create implicit blocks as they do in Common Lisp." nil 'macro)
166
167 (autoload 'loop "cl-macs" "\
168 (loop CLAUSE...): The Common Lisp `loop' macro.
169 Valid clauses are:
170 for VAR from/upfrom/downfrom NUM to/upto/downto/above/below NUM by NUM,
171 for VAR in LIST by FUNC, for VAR on LIST by FUNC, for VAR = INIT then EXPR,
172 for VAR across ARRAY, repeat NUM, with VAR = INIT, while COND, until COND,
173 always COND, never COND, thereis COND, collect EXPR into VAR,
174 append EXPR into VAR, nconc EXPR into VAR, sum EXPR into VAR,
175 count EXPR into VAR, maximize EXPR into VAR, minimize EXPR into VAR,
176 if COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...],
177 unless COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...],
178 do EXPRS..., initially EXPRS..., finally EXPRS..., return EXPR,
179 finally return EXPR, named NAME." nil 'macro)
180
181 (autoload 'do "cl-macs" "\
182 The Common Lisp `do' loop.
183 Format is: (do ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro)
184
185 (autoload 'do* "cl-macs" "\
186 The Common Lisp `do*' loop.
187 Format is: (do* ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro)
188
189 (autoload 'dolist "cl-macs" "\
190 (dolist (VAR LIST [RESULT]) BODY...): loop over a list.
191 Evaluate BODY with VAR bound to each `car' from LIST, in turn.
192 Then evaluate RESULT to get return value, default nil." nil 'macro)
193
194 (autoload 'dotimes "cl-macs" "\
195 (dotimes (VAR COUNT [RESULT]) BODY...): loop a certain number of times.
196 Evaluate BODY with VAR bound to successive integers from 0, inclusive,
197 to COUNT, exclusive. Then evaluate RESULT to get return value, default
198 nil." nil 'macro)
199
200 (autoload 'do-symbols "cl-macs" "\
201 (dosymbols (VAR [OBARRAY [RESULT]]) BODY...): loop over all symbols.
202 Evaluate BODY with VAR bound to each interned symbol, or to each symbol
203 from OBARRAY." nil 'macro)
204
205 (autoload 'do-all-symbols "cl-macs" nil nil 'macro)
206
207 (autoload 'psetq "cl-macs" "\
208 (psetq SYM VAL SYM VAL ...): set SYMs to the values VALs in parallel.
209 This is like `setq', except that all VAL forms are evaluated (in order)
210 before assigning any symbols SYM to the corresponding values." nil 'macro)
211
212 (autoload 'progv "cl-macs" "\
213 (progv SYMBOLS VALUES BODY...): bind SYMBOLS to VALUES dynamically in BODY.
214 The forms SYMBOLS and VALUES are evaluated, and must evaluate to lists.
215 Each SYMBOL in the first list is bound to the corresponding VALUE in the
216 second list (or made unbound if VALUES is shorter than SYMBOLS); then the
217 BODY forms are executed and their result is returned. This is much like
218 a `let' form, except that the list of symbols can be computed at run-time." nil 'macro)
219
220 (autoload 'flet "cl-macs" "\
221 (flet ((FUNC ARGLIST BODY...) ...) FORM...): make temporary function defns.
222 This is an analogue of `let' that operates on the function cell of FUNC
223 rather than its value cell. The FORMs are evaluated with the specified
224 function definitions in place, then the definitions are undone (the FUNCs
225 go back to their previous definitions, or lack thereof)." nil 'macro)
226
227 (autoload 'labels "cl-macs" "\
228 (labels ((FUNC ARGLIST BODY...) ...) FORM...): make temporary func bindings.
229 This is like `flet', except the bindings are lexical instead of dynamic.
230 Unlike `flet', this macro is fully complaint with the Common Lisp standard." nil 'macro)
231
232 (autoload 'macrolet "cl-macs" "\
233 (macrolet ((NAME ARGLIST BODY...) ...) FORM...): make temporary macro defns.
234 This is like `flet', but for macros instead of functions." nil 'macro)
235
236 (autoload 'symbol-macrolet "cl-macs" "\
237 (symbol-macrolet ((NAME EXPANSION) ...) FORM...): make symbol macro defns.
238 Within the body FORMs, references to the variable NAME will be replaced
239 by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...)." nil 'macro)
240
241 (autoload 'lexical-let "cl-macs" "\
242 (lexical-let BINDINGS BODY...): like `let', but lexically scoped.
243 The main visible difference is that lambdas inside BODY will create
244 lexical closures as in Common Lisp." nil 'macro)
245
246 (autoload 'lexical-let* "cl-macs" "\
247 (lexical-let* BINDINGS BODY...): like `let*', but lexically scoped.
248 The main visible difference is that lambdas inside BODY will create
249 lexical closures as in Common Lisp." nil 'macro)
250
251 (autoload 'multiple-value-bind "cl-macs" "\
252 (multiple-value-bind (SYM SYM...) FORM BODY): collect multiple return values.
253 FORM must return a list; the BODY is then executed with the first N elements
254 of this list bound (`let'-style) to each of the symbols SYM in turn. This
255 is analogous to the Common Lisp `multiple-value-bind' macro, using lists to
256 simulate true multiple return values. For compatibility, (values A B C) is
257 a synonym for (list A B C)." nil 'macro)
258
259 (autoload 'multiple-value-setq "cl-macs" "\
260 (multiple-value-setq (SYM SYM...) FORM): collect multiple return values.
261 FORM must return a list; the first N elements of this list are stored in
262 each of the symbols SYM in turn. This is analogous to the Common Lisp
263 `multiple-value-setq' macro, using lists to simulate true multiple return
264 values. For compatibility, (values A B C) is a synonym for (list A B C)." nil 'macro)
265
266 (autoload 'locally "cl-macs" nil nil 'macro)
267
268 (autoload 'the "cl-macs" nil nil 'macro)
269
270 (autoload 'declare "cl-macs" nil nil 'macro)
271
272 (autoload 'define-setf-method "cl-macs" "\
273 (define-setf-method NAME ARGLIST BODY...): define a `setf' method.
274 This method shows how to handle `setf's to places of the form (NAME ARGS...).
275 The argument forms ARGS are bound according to ARGLIST, as if NAME were
276 going to be expanded as a macro, then the BODY forms are executed and must
277 return a list of five elements: a temporary-variables list, a value-forms
278 list, a store-variables list (of length one), a store-form, and an access-
279 form. See `defsetf' for a simpler way to define most setf-methods." nil 'macro)
280
281 (autoload 'defsetf "cl-macs" "\
282 (defsetf NAME FUNC): define a `setf' method.
283 This macro is an easy-to-use substitute for `define-setf-method' that works
284 well for simple place forms. In the simple `defsetf' form, `setf's of
285 the form (setf (NAME ARGS...) VAL) are transformed to function or macro
286 calls of the form (FUNC ARGS... VAL). Example: (defsetf aref aset).
287 Alternate form: (defsetf NAME ARGLIST (STORE) BODY...).
288 Here, the above `setf' call is expanded by binding the argument forms ARGS
289 according to ARGLIST, binding the value form VAL to STORE, then executing
290 BODY, which must return a Lisp form that does the necessary `setf' operation.
291 Actually, ARGLIST and STORE may be bound to temporary variables which are
292 introduced automatically to preserve proper execution order of the arguments.
293 Example: (defsetf nth (n x) (v) (list 'setcar (list 'nthcdr n x) v))." nil 'macro)
294
295 (autoload 'get-setf-method "cl-macs" "\
296 Return a list of five values describing the setf-method for PLACE.
297 PLACE may be any Lisp form which can appear as the PLACE argument to
298 a macro like `setf' or `incf'." nil nil)
299
300 (autoload 'setf "cl-macs" "\
301 (setf PLACE VAL PLACE VAL ...): set each PLACE to the value of its VAL.
302 This is a generalized version of `setq'; the PLACEs may be symbolic
303 references such as (car x) or (aref x i), as well as plain symbols.
304 For example, (setf (cadar x) y) is equivalent to (setcar (cdar x) y).
305 The return value is the last VAL in the list." nil 'macro)
306
307 (autoload 'psetf "cl-macs" "\
308 (psetf PLACE VAL PLACE VAL ...): set PLACEs to the values VALs in parallel.
309 This is like `setf', except that all VAL forms are evaluated (in order)
310 before assigning any PLACEs to the corresponding values." nil 'macro)
311
312 (autoload 'cl-do-pop "cl-macs" nil nil nil)
313
314 (autoload 'remf "cl-macs" "\
315 (remf PLACE TAG): remove TAG from property list PLACE.
316 PLACE may be a symbol, or any generalized variable allowed by `setf'.
317 The form returns true if TAG was found and removed, nil otherwise." nil 'macro)
318
319 (autoload 'shiftf "cl-macs" "\
320 (shiftf PLACE PLACE... VAL): shift left among PLACEs.
321 Example: (shiftf A B C) sets A to B, B to C, and returns the old A.
322 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro)
323
324 (autoload 'rotatef "cl-macs" "\
325 (rotatef PLACE...): rotate left among PLACEs.
326 Example: (rotatef A B C) sets A to B, B to C, and C to A. It returns nil.
327 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro)
328
329 (autoload 'letf "cl-macs" "\
330 (letf ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs.
331 This is the analogue of `let', but with generalized variables (in the
332 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding
333 VALUE, then the BODY forms are executed. On exit, either normally or
334 because of a `throw' or error, the PLACEs are set back to their original
335 values. Note that this macro is *not* available in Common Lisp.
336 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)',
337 the PLACE is not modified before executing BODY." nil 'macro)
338
339 (autoload 'letf* "cl-macs" "\
340 (letf* ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs.
341 This is the analogue of `let*', but with generalized variables (in the
342 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding
343 VALUE, then the BODY forms are executed. On exit, either normally or
344 because of a `throw' or error, the PLACEs are set back to their original
345 values. Note that this macro is *not* available in Common Lisp.
346 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)',
347 the PLACE is not modified before executing BODY." nil 'macro)
348
349 (autoload 'callf "cl-macs" "\
350 (callf FUNC PLACE ARGS...): set PLACE to (FUNC PLACE ARGS...).
351 FUNC should be an unquoted function name. PLACE may be a symbol,
352 or any generalized variable allowed by `setf'." nil 'macro)
353
354 (autoload 'callf2 "cl-macs" "\
355 (callf2 FUNC ARG1 PLACE ARGS...): set PLACE to (FUNC ARG1 PLACE ARGS...).
356 Like `callf', but PLACE is the second argument of FUNC, not the first." nil 'macro)
357
358 (autoload 'define-modify-macro "cl-macs" "\
359 (define-modify-macro NAME ARGLIST FUNC): define a `setf'-like modify macro.
360 If NAME is called, it combines its PLACE argument with the other arguments
361 from ARGLIST using FUNC: (define-modify-macro incf (&optional (n 1)) +)" nil 'macro)
362
363 (autoload 'defstruct "cl-macs" "\
364 (defstruct (NAME OPTIONS...) (SLOT SLOT-OPTS...)...): define a struct type.
365 This macro defines a new Lisp data type called NAME, which contains data
366 stored in SLOTs. This defines a `make-NAME' constructor, a `copy-NAME'
367 copier, a `NAME-p' predicate, and setf-able `NAME-SLOT' accessors." nil 'macro)
368
369 (autoload 'cl-struct-setf-expander "cl-macs" nil nil nil)
370
371 (autoload 'deftype "cl-macs" "\
372 (deftype NAME ARGLIST BODY...): define NAME as a new data type.
373 The type name can then be used in `typecase', `check-type', etc." nil 'macro)
374
375 (autoload 'typep "cl-macs" "\
376 Check that OBJECT is of type TYPE.
377 TYPE is a Common Lisp-style type specifier." nil nil)
378
379 (autoload 'check-type "cl-macs" "\
380 Verify that FORM is of type TYPE; signal an error if not.
381 STRING is an optional description of the desired type." nil 'macro)
382
383 (autoload 'assert "cl-macs" "\
384 Verify that FORM returns non-nil; signal an error if not.
385 Second arg SHOW-ARGS means to include arguments of FORM in message.
386 Other args STRING and ARGS... are arguments to be passed to `error'.
387 They are not evaluated unless the assertion fails. If STRING is
388 omitted, a default message listing FORM itself is used." nil 'macro)
389
390 (autoload 'ignore-errors "cl-macs" "\
391 Execute FORMS; if an error occurs, return nil.
392 Otherwise, return result of last FORM." nil 'macro)
393
394 (autoload 'define-compiler-macro "cl-macs" "\
395 (define-compiler-macro FUNC ARGLIST BODY...): Define a compiler-only macro.
396 This is like `defmacro', but macro expansion occurs only if the call to
397 FUNC is compiled (i.e., not interpreted). Compiler macros should be used
398 for optimizing the way calls to FUNC are compiled; the form returned by
399 BODY should do the same thing as a call to the normal function called
400 FUNC, though possibly more efficiently. Note that, like regular macros,
401 compiler macros are expanded repeatedly until no further expansions are
402 possible. Unlike regular macros, BODY can decide to \"punt\" and leave the
403 original function call alone by declaring an initial `&whole foo' parameter
404 and then returning foo." nil 'macro)
405
406 (autoload 'compiler-macroexpand "cl-macs" nil nil nil)
407
408 ;;;***
409
410 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp/cus-dep.el")
411
412 (autoload 'Custom-make-dependencies "cus-dep" "\
413 Extract custom dependencies from .el files in SUBDIRS.
414 SUBDIRS is a list of directories. If it is nil, the command-line
415 arguments are used. If it is a string, only that directory is
416 processed. This function is especially useful in batch mode.
417
418 Batch usage: xemacs -batch -l cus-dep.el -f Custom-make-dependencies DIRS" t nil)
419
420 ;;;***
421
422 ;;;### (autoloads (customize-menu-create custom-menu-create custom-save-all customize-save-customized customize-browse custom-buffer-create-other-window custom-buffer-create customize-apropos-groups customize-apropos-faces customize-apropos-options customize-apropos customize-saved customize-customized customize-face-other-window customize-face customize-option-other-window customize-variable customize-other-window customize customize-save-variable customize-set-variable customize-set-value) "cus-edit" "lisp/cus-edit.el")
423
424 (autoload 'customize-set-value "cus-edit" "\
425 Set VARIABLE to VALUE. VALUE is a Lisp object.
426
427 If VARIABLE has a `variable-interactive' property, that is used as if
428 it were the arg to `interactive' (which see) to interactively read the value.
429
430 If VARIABLE has a `custom-type' property, it must be a widget and the
431 `:prompt-value' property of that widget will be used for reading the value." t nil)
432
433 (autoload 'customize-set-variable "cus-edit" "\
434 Set the default for VARIABLE to VALUE. VALUE is a Lisp object.
435
436 If VARIABLE has a `custom-set' property, that is used for setting
437 VARIABLE, otherwise `set-default' is used.
438
439 The `customized-value' property of the VARIABLE will be set to a list
440 with a quoted VALUE as its sole list member.
441
442 If VARIABLE has a `variable-interactive' property, that is used as if
443 it were the arg to `interactive' (which see) to interactively read the value.
444
445 If VARIABLE has a `custom-type' property, it must be a widget and the
446 `:prompt-value' property of that widget will be used for reading the value. " t nil)
447
448 (autoload 'customize-save-variable "cus-edit" "\
449 Set the default for VARIABLE to VALUE, and save it for future sessions.
450 If VARIABLE has a `custom-set' property, that is used for setting
451 VARIABLE, otherwise `set-default' is used.
452
453 The `customized-value' property of the VARIABLE will be set to a list
454 with a quoted VALUE as its sole list member.
455
456 If VARIABLE has a `variable-interactive' property, that is used as if
457 it were the arg to `interactive' (which see) to interactively read the value.
458
459 If VARIABLE has a `custom-type' property, it must be a widget and the
460 `:prompt-value' property of that widget will be used for reading the value. " t nil)
461
462 (autoload 'customize "cus-edit" "\
463 Select a customization buffer which you can use to set user options.
464 User options are structured into \"groups\".
465 The default group is `Emacs'." t nil)
466
467 (defalias 'customize-group 'customize)
468
469 (autoload 'customize-other-window "cus-edit" "\
470 Customize SYMBOL, which must be a customization group." t nil)
471
472 (defalias 'customize-group-other-window 'customize-other-window)
473
474 (defalias 'customize-option 'customize-variable)
475
476 (autoload 'customize-variable "cus-edit" "\
477 Customize SYMBOL, which must be a user option variable." t nil)
478
479 (defalias 'customize-variable-other-window 'customize-option-other-window)
480
481 (autoload 'customize-option-other-window "cus-edit" "\
482 Customize SYMBOL, which must be a user option variable.
483 Show the buffer in another window, but don't select it." t nil)
484
485 (autoload 'customize-face "cus-edit" "\
486 Customize SYMBOL, which should be a face name or nil.
487 If SYMBOL is nil, customize all faces." t nil)
488
489 (autoload 'customize-face-other-window "cus-edit" "\
490 Show customization buffer for FACE in other window." t nil)
491
492 (autoload 'customize-customized "cus-edit" "\
493 Customize all user options set since the last save in this session." t nil)
494
495 (autoload 'customize-saved "cus-edit" "\
496 Customize all already saved user options." t nil)
497
498 (autoload 'customize-apropos "cus-edit" "\
499 Customize all user options matching REGEXP.
500 If ALL is `options', include only options.
501 If ALL is `faces', include only faces.
502 If ALL is `groups', include only groups.
503 If ALL is t (interactively, with prefix arg), include options which are not
504 user-settable, as well as faces and groups." t nil)
505
506 (autoload 'customize-apropos-options "cus-edit" "\
507 Customize all user options matching REGEXP.
508 With prefix arg, include options which are not user-settable." t nil)
509
510 (autoload 'customize-apropos-faces "cus-edit" "\
511 Customize all user faces matching REGEXP." t nil)
512
513 (autoload 'customize-apropos-groups "cus-edit" "\
514 Customize all user groups matching REGEXP." t nil)
515
516 (autoload 'custom-buffer-create "cus-edit" "\
517 Create a buffer containing OPTIONS.
518 Optional NAME is the name of the buffer.
519 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
520 SYMBOL is a customization option, and WIDGET is a widget for editing
521 that option." nil nil)
522
523 (autoload 'custom-buffer-create-other-window "cus-edit" "\
524 Create a buffer containing OPTIONS.
525 Optional NAME is the name of the buffer.
526 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
527 SYMBOL is a customization option, and WIDGET is a widget for editing
528 that option." nil nil)
529
530 (autoload 'customize-browse "cus-edit" "\
531 Create a tree browser for the customize hierarchy." t nil)
532
533 (defcustom custom-file (if (boundp 'emacs-user-extension-dir) (concat "~" init-file-user emacs-user-extension-dir "options.el") "~/.emacs") "File used for storing customization information.\nIf you change this from the default \"~/.emacs\" you need to\nexplicitly load that file for the settings to take effect." :type 'file :group 'customize)
534
535 (autoload 'customize-save-customized "cus-edit" "\
536 Save all user options which have been set in this session." t nil)
537
538 (autoload 'custom-save-all "cus-edit" "\
539 Save all customizations in `custom-file'." nil nil)
540
541 (autoload 'custom-menu-create "cus-edit" "\
542 Create menu for customization group SYMBOL.
543 The menu is in a format applicable to `easy-menu-define'." nil nil)
544
545 (autoload 'customize-menu-create "cus-edit" "\
546 Return a customize menu for customization group SYMBOL.
547 If optional NAME is given, use that as the name of the menu.
548 Otherwise the menu will be named `Customize'.
549 The format is suitable for use with `easy-menu-define'." nil nil)
550
551 ;;;***
552
553 ;;;### (autoloads (custom-set-faces custom-declare-face) "cus-face" "lisp/cus-face.el")
554
555 (autoload 'custom-declare-face "cus-face" "\
556 Like `defface', but FACE is evaluated as a normal argument." nil nil)
557
558 (autoload 'custom-set-faces "cus-face" "\
559 Initialize faces according to user preferences.
560 The arguments should be a list where each entry has the form:
561
562 (FACE SPEC [NOW])
563
564 SPEC will be stored as the saved value for FACE. If NOW is present
565 and non-nil, FACE will also be created according to SPEC.
566
567 See `defface' for the format of SPEC." nil nil)
568
569 ;;;***
570
571 ;;;### (autoloads (disassemble) "disass" "lisp/disass.el")
572
573 (autoload 'disassemble "disass" "\
574 Print disassembled code for OBJECT in (optional) BUFFER.
575 OBJECT can be a symbol defined as a function, or a function itself
576 \(a lambda expression or a compiled-function object).
577 If OBJECT is not already compiled, we compile it, but do not
578 redefine OBJECT if it is a symbol." t nil)
579
580 ;;;***
581
582 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el")
583
584 (autoload 'widget-browse-at "wid-browse" "\
585 Browse the widget under point." t nil)
586
587 (autoload 'widget-browse "wid-browse" "\
588 Create a widget browser for WIDGET." t nil)
589
590 (autoload 'widget-browse-other-window "wid-browse" "\
591 Show widget browser for WIDGET in other window." t nil)
592
593 (autoload 'widget-minor-mode "wid-browse" "\
594 Togle minor mode for traversing widgets.
595 With arg, turn widget mode on if and only if arg is positive." t nil)
596
597 ;;;***
598
599 ;;;### (autoloads (widget-delete widget-create widget-prompt-value) "wid-edit" "lisp/wid-edit.el")
600
601 (autoload 'widget-prompt-value "wid-edit" "\
602 Prompt for a value matching WIDGET, using PROMPT.
603 The current value is assumed to be VALUE, unless UNBOUND is non-nil." nil nil)
604
605 (autoload 'widget-create "wid-edit" "\
606 Create widget of TYPE.
607 The optional ARGS are additional keyword arguments." nil nil)
608
609 (autoload 'widget-delete "wid-edit" "\
610 Delete WIDGET." nil nil)
611
612 ;;;***
613
614 ;;;### (autoloads (font-menu-weight-constructor font-menu-size-constructor font-menu-family-constructor reset-device-font-menus) "x-font-menu" "lisp/x-font-menu.el")
615
616 (defcustom font-menu-ignore-scaled-fonts t "*If non-nil, then the font menu will try to show only bitmap fonts." :type 'boolean :group 'x)
617
618 (defcustom font-menu-this-frame-only-p nil "*If non-nil, then changing the default font from the font menu will only\naffect one frame instead of all frames." :type 'boolean :group 'x)
619
620 (fset 'install-font-menus 'reset-device-font-menus)
621
622 (autoload 'reset-device-font-menus "x-font-menu" "\
623 Generates the `Font', `Size', and `Weight' submenus for the Options menu.
624 This is run the first time that a font-menu is needed for each device.
625 If you don't like the lazy invocation of this function, you can add it to
626 `create-device-hook' and that will make the font menus respond more quickly
627 when they are selected for the first time. If you add fonts to your system,
628 or if you change your font path, you can call this to re-initialize the menus." nil nil)
629
630 (autoload 'font-menu-family-constructor "x-font-menu" nil nil nil)
631
632 (autoload 'font-menu-size-constructor "x-font-menu" nil nil nil)
633
634 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil)
635
636 ;;;***
637
638 (provide 'TopLevel-autoloads)