annotate lisp/auto-autoloads.el @ 294:4b85ae5eabfb r21-0b45

Import from CVS: tag r21-0b45
author cvs
date Mon, 13 Aug 2007 10:38:01 +0200
parents 57709be46d1b
children 341dac730539
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1 ;;; DO NOT MODIFY THIS FILE
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
2 (if (featurep 'Standard-autoloads) (error "Already loaded"))
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
3
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
4 ;;;### (autoloads nil "abbrev" "lisp/abbrev.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
5
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
6 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
7
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
8 ;;;### (autoloads (about-xemacs) "about" "lisp/about.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
9
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
10 (autoload 'about-xemacs "about" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
11 Describe the True Editor and its minions." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
12
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
13 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
14
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
15 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp/apropos.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
16
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
17 (fset 'command-apropos 'apropos-command)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
18
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
19 (autoload 'apropos-command "apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
20 Shows commands (interactively callable functions) that match REGEXP.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
21 With optional prefix ARG or if `apropos-do-all' is non-nil, also show
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
22 variables." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
23
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
24 (autoload 'apropos "apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
25 Show all bound symbols whose names match REGEXP.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
26 With optional prefix ARG or if `apropos-do-all' is non-nil, also show unbound
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
27 symbols and key bindings, which is a little more time-consuming.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
28 Returns list of symbols and documentation found." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
29
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
30 (autoload 'apropos-value "apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
31 Show all symbols whose value's printed image matches REGEXP.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
32 With optional prefix ARG or if `apropos-do-all' is non-nil, also looks
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
33 at the function and at the names and values of properties.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
34 Returns list of symbols and values found." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
35
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
36 (autoload 'apropos-documentation "apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
37 Show symbols whose documentation contain matches for REGEXP.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
38 With optional prefix ARG or if `apropos-do-all' is non-nil, also use
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
39 documentation that is not stored in the documentation file and show key
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
40 bindings.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
41 Returns list of symbols and documentation found." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
42
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
43 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
44
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
45 ;;;### (autoloads (batch-update-directory batch-update-autoloads update-autoloads-from-directory update-autoloads-here update-file-autoloads generate-file-autoloads) "autoload" "lisp/autoload.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
46
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
47 (autoload 'generate-file-autoloads "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
48 Insert at point a loaddefs autoload section for FILE.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
49 autoloads are generated for defuns and defmacros in FILE
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
50 marked by `generate-autoload-cookie' (which see).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
51 If FILE is being visited in a buffer, the contents of the buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
52 are used." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
53
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
54 (autoload 'update-file-autoloads "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
55 Update the autoloads for FILE in `generated-autoload-file'
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
56 \(which FILE might bind in its local variables).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
57 This functions refuses to update autoloads files." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
58
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
59 (autoload 'update-autoloads-here "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
60 Update sections of the current buffer generated by `update-file-autoloads'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
61
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
62 (autoload 'update-autoloads-from-directory "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
63 Update `generated-autoload-file' with all the current autoloads from DIR.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
64 This runs `update-file-autoloads' on each .el file in DIR.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
65 Obsolete autoload entries for files that no longer exist are deleted." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
66
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
67 (autoload 'batch-update-autoloads "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
68 Update the autoloads for the files or directories on the command line.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
69 Runs `update-file-autoloads' on files and `update-directory-autoloads'
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
70 on directories. Must be used only with -batch, and kills Emacs on completion.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
71 Each file will be processed even if an error occurred previously.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
72 For example, invoke `xemacs -batch -f batch-update-autoloads *.el'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
73 The directory to which the auto-autoloads.el file must be the first parameter
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
74 on the command line." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
75
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
76 (autoload 'batch-update-directory "autoload" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
77 Update the autoloads for the directory on the command line.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
78 Runs `update-file-autoloads' on each file in the given directory, must
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
79 be used only with -batch and kills XEmacs on completion." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
80
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
81 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
82
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
83 ;;;### (autoloads nil "buff-menu" "lisp/buff-menu.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
84
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
85 (defvar list-buffers-directory nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
86
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
87 (make-variable-buffer-local 'list-buffers-directory)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
88
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
89 ;;;***
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
90
286
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
91 ;;;### (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-buffer byte-compile-and-load-file byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el")
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
92
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
93 (autoload 'byte-force-recompile "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
94 Recompile every `.el' file in DIRECTORY that already has a `.elc' file.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
95 Files in subdirectories of DIRECTORY are processed also." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
96
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
97 (autoload 'byte-recompile-directory "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
98 Recompile every `.el' file in DIRECTORY that needs recompilation.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
99 This is if a `.elc' file exists but is older than the `.el' file.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
100 Files in subdirectories of DIRECTORY are processed also unless argument
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
101 NORECURSION is non-nil.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
102
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
103 If the `.elc' file does not exist, normally the `.el' file is *not* compiled.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
104 But a prefix argument (optional second arg) means ask user,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
105 for each such `.el' file, whether to compile it. Prefix argument 0 means
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
106 don't ask and compile the file anyway.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
107
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
108 A nonzero prefix argument also means ask about each subdirectory.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
109
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
110 If the fourth argument FORCE is non-nil,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
111 recompile every `.el' file that already has a `.elc' file." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
112
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
113 (autoload 'byte-recompile-file "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
114 Recompile a file of Lisp code named FILENAME if it needs recompilation.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
115 This is if the `.elc' file exists but is older than the `.el' file.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
116
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
117 If the `.elc' file does not exist, normally the `.el' file is *not*
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
118 compiled. But a prefix argument (optional second arg) means ask user
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
119 whether to compile it. Prefix argument 0 don't ask and recompile anyway." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
120
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
121 (autoload 'byte-compile-file "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
122 Compile a file of Lisp code named FILENAME into a file of byte code.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
123 The output file's name is made by appending `c' to the end of FILENAME.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
124 With prefix arg (noninteractively: 2nd arg), load the file after compiling." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
125
286
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
126 (autoload 'byte-compile-and-load-file "bytecomp" "\
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
127 Compile a file of Lisp code named FILENAME into a file of byte code,
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
128 and then load it. The output file's name is made by appending \"c\" to
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
129 the end of FILENAME." t nil)
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
130
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
131 (autoload 'byte-compile-buffer "bytecomp" "\
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
132 Byte-compile and evaluate contents of BUFFER (default: the current buffer)." t nil)
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
133
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
134 (autoload 'compile-defun "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
135 Compile and evaluate the current top-level form.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
136 Print the result in the minibuffer.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
137 With argument, insert value in current buffer after the form." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
138
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
139 (autoload 'byte-compile "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
140 If FORM is a symbol, byte-compile its function definition.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
141 If FORM is a lambda or a macro, byte-compile it as a function." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
142
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
143 (autoload 'byte-compile-sexp "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
144 Compile and return SEXP." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
145
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
146 (autoload 'display-call-tree "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
147 Display a call graph of a specified file.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
148 This lists which functions have been called, what functions called
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
149 them, and what functions they call. The list includes all functions
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
150 whose definitions have been compiled in this Emacs session, as well as
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
151 all functions called by those functions.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
152
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
153 The call graph does not include macros, inline functions, or
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
154 primitives that the byte-code interpreter knows about directly (eq,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
155 cons, etc.).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
156
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
157 The call tree also lists those functions which are not known to be called
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
158 \(that is, to which no calls have been compiled), and which cannot be
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
159 invoked interactively." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
160
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
161 (autoload 'batch-byte-compile "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
162 Run `byte-compile-file' on the files remaining on the command line.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
163 Use this from the command line, with `-batch';
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
164 it won't work in an interactive Emacs.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
165 Each file is processed even if an error occurred previously.
276
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
166 For example, invoke \"xemacs -batch -f batch-byte-compile $emacs/ ~/*.el\"" nil nil)
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
167
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
168 (autoload 'batch-byte-recompile-directory-norecurse "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
169 Same as `batch-byte-recompile-directory' but without recursion." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
170
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
171 (autoload 'batch-byte-recompile-directory "bytecomp" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
172 Runs `byte-recompile-directory' on the dirs remaining on the command line.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
173 Must be used only with `-batch', and kills Emacs on completion.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
174 For example, invoke `xemacs -batch -f batch-byte-recompile-directory .'." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
175
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
176 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
177
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
178 ;;;### (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")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
179
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
180 (autoload 'cl-compile-time-init "cl-macs" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
181
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
182 (autoload 'gensym "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
183 Generate a new uninterned symbol.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
184 The name is made by appending a number to PREFIX, default \"G\"." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
185
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
186 (autoload 'gentemp "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
187 Generate a new interned symbol with a unique name.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
188 The name is made by appending a number to PREFIX, default \"G\"." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
189
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
190 (autoload 'defun* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
191 (defun* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a function.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
192 Like normal `defun', except ARGLIST allows full Common Lisp conventions,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
193 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
194
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
195 (autoload 'defmacro* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
196 (defmacro* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a macro.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
197 Like normal `defmacro', except ARGLIST allows full Common Lisp conventions,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
198 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
199
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
200 (autoload 'function* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
201 (function* SYMBOL-OR-LAMBDA): introduce a function.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
202 Like normal `function', except that if argument is a lambda form, its
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
203 ARGLIST allows full Common Lisp conventions." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
204
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
205 (autoload 'destructuring-bind "cl-macs" nil nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
206
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
207 (autoload 'eval-when "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
208 (eval-when (WHEN...) BODY...): control when BODY is evaluated.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
209 If `compile' is in WHEN, BODY is evaluated when compiled at top-level.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
210 If `load' is in WHEN, BODY is evaluated when loaded after top-level compile.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
211 If `eval' is in WHEN, BODY is evaluated when interpreted or at non-top-level." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
212
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
213 (autoload 'load-time-value "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
214 Like `progn', but evaluates the body at load time.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
215 The result of the body appears to the compiler as a quoted constant." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
216
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
217 (autoload 'case "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
218 (case EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
219 Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
220 against each key in each KEYLIST; the corresponding BODY is evaluated.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
221 If no clause succeeds, case returns nil. A single atom may be used in
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
222 place of a KEYLIST of one atom. A KEYLIST of `t' or `otherwise' is
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
223 allowed only in the final clause, and matches if no other keys match.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
224 Key values are compared by `eql'." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
225
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
226 (autoload 'ecase "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
227 (ecase EXPR CLAUSES...): like `case', but error if no case fits.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
228 `otherwise'-clauses are not allowed." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
229
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
230 (autoload 'typecase "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
231 (typecase EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
232 Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
233 satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
234 typecase returns nil. A TYPE of `t' or `otherwise' is allowed only in the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
235 final clause, and matches if no other keys match." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
236
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
237 (autoload 'etypecase "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
238 (etypecase EXPR CLAUSES...): like `typecase', but error if no case fits.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
239 `otherwise'-clauses are not allowed." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
240
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
241 (autoload 'block "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
242 (block NAME BODY...): define a lexically-scoped block named NAME.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
243 NAME may be any symbol. Code inside the BODY forms can call `return-from'
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
244 to jump prematurely out of the block. This differs from `catch' and `throw'
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
245 in two respects: First, the NAME is an unevaluated symbol rather than a
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
246 quoted symbol or other form; and second, NAME is lexically rather than
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
247 dynamically scoped: Only references to it within BODY will work. These
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
248 references may appear inside macro expansions, but not inside functions
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
249 called from BODY." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
250
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
251 (autoload 'return "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
252 (return [RESULT]): return from the block named nil.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
253 This is equivalent to `(return-from nil RESULT)'." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
254
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
255 (autoload 'return-from "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
256 (return-from NAME [RESULT]): return from the block named NAME.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
257 This jump out to the innermost enclosing `(block NAME ...)' form,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
258 returning RESULT from that form (or nil if RESULT is omitted).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
259 This is compatible with Common Lisp, but note that `defun' and
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
260 `defmacro' do not create implicit blocks as they do in Common Lisp." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
261
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
262 (autoload 'loop "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
263 (loop CLAUSE...): The Common Lisp `loop' macro.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
264 Valid clauses are:
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
265 for VAR from/upfrom/downfrom NUM to/upto/downto/above/below NUM by NUM,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
266 for VAR in LIST by FUNC, for VAR on LIST by FUNC, for VAR = INIT then EXPR,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
267 for VAR across ARRAY, repeat NUM, with VAR = INIT, while COND, until COND,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
268 always COND, never COND, thereis COND, collect EXPR into VAR,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
269 append EXPR into VAR, nconc EXPR into VAR, sum EXPR into VAR,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
270 count EXPR into VAR, maximize EXPR into VAR, minimize EXPR into VAR,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
271 if COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...],
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
272 unless COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...],
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
273 do EXPRS..., initially EXPRS..., finally EXPRS..., return EXPR,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
274 finally return EXPR, named NAME." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
275
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
276 (autoload 'do "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
277 The Common Lisp `do' loop.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
278 Format is: (do ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
279
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
280 (autoload 'do* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
281 The Common Lisp `do*' loop.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
282 Format is: (do* ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
283
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
284 (autoload 'dolist "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
285 (dolist (VAR LIST [RESULT]) BODY...): loop over a list.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
286 Evaluate BODY with VAR bound to each `car' from LIST, in turn.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
287 Then evaluate RESULT to get return value, default nil." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
288
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
289 (autoload 'dotimes "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
290 (dotimes (VAR COUNT [RESULT]) BODY...): loop a certain number of times.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
291 Evaluate BODY with VAR bound to successive integers from 0, inclusive,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
292 to COUNT, exclusive. Then evaluate RESULT to get return value, default
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
293 nil." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
294
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
295 (autoload 'do-symbols "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
296 (dosymbols (VAR [OBARRAY [RESULT]]) BODY...): loop over all symbols.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
297 Evaluate BODY with VAR bound to each interned symbol, or to each symbol
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
298 from OBARRAY." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
299
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
300 (autoload 'do-all-symbols "cl-macs" nil nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
301
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
302 (autoload 'psetq "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
303 (psetq SYM VAL SYM VAL ...): set SYMs to the values VALs in parallel.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
304 This is like `setq', except that all VAL forms are evaluated (in order)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
305 before assigning any symbols SYM to the corresponding values." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
306
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
307 (autoload 'progv "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
308 (progv SYMBOLS VALUES BODY...): bind SYMBOLS to VALUES dynamically in BODY.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
309 The forms SYMBOLS and VALUES are evaluated, and must evaluate to lists.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
310 Each SYMBOL in the first list is bound to the corresponding VALUE in the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
311 second list (or made unbound if VALUES is shorter than SYMBOLS); then the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
312 BODY forms are executed and their result is returned. This is much like
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
313 a `let' form, except that the list of symbols can be computed at run-time." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
314
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
315 (autoload 'flet "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
316 (flet ((FUNC ARGLIST BODY...) ...) FORM...): make temporary function defns.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
317 This is an analogue of `let' that operates on the function cell of FUNC
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
318 rather than its value cell. The FORMs are evaluated with the specified
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
319 function definitions in place, then the definitions are undone (the FUNCs
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
320 go back to their previous definitions, or lack thereof)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
321
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
322 (autoload 'labels "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
323 (labels ((FUNC ARGLIST BODY...) ...) FORM...): make temporary func bindings.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
324 This is like `flet', except the bindings are lexical instead of dynamic.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
325 Unlike `flet', this macro is fully complaint with the Common Lisp standard." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
326
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
327 (autoload 'macrolet "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
328 (macrolet ((NAME ARGLIST BODY...) ...) FORM...): make temporary macro defns.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
329 This is like `flet', but for macros instead of functions." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
330
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
331 (autoload 'symbol-macrolet "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
332 (symbol-macrolet ((NAME EXPANSION) ...) FORM...): make symbol macro defns.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
333 Within the body FORMs, references to the variable NAME will be replaced
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
334 by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
335
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
336 (autoload 'lexical-let "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
337 (lexical-let BINDINGS BODY...): like `let', but lexically scoped.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
338 The main visible difference is that lambdas inside BODY will create
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
339 lexical closures as in Common Lisp." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
340
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
341 (autoload 'lexical-let* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
342 (lexical-let* BINDINGS BODY...): like `let*', but lexically scoped.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
343 The main visible difference is that lambdas inside BODY will create
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
344 lexical closures as in Common Lisp." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
345
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
346 (autoload 'multiple-value-bind "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
347 (multiple-value-bind (SYM SYM...) FORM BODY): collect multiple return values.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
348 FORM must return a list; the BODY is then executed with the first N elements
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
349 of this list bound (`let'-style) to each of the symbols SYM in turn. This
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
350 is analogous to the Common Lisp `multiple-value-bind' macro, using lists to
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
351 simulate true multiple return values. For compatibility, (values A B C) is
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
352 a synonym for (list A B C)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
353
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
354 (autoload 'multiple-value-setq "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
355 (multiple-value-setq (SYM SYM...) FORM): collect multiple return values.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
356 FORM must return a list; the first N elements of this list are stored in
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
357 each of the symbols SYM in turn. This is analogous to the Common Lisp
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
358 `multiple-value-setq' macro, using lists to simulate true multiple return
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
359 values. For compatibility, (values A B C) is a synonym for (list A B C)." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
360
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
361 (autoload 'locally "cl-macs" nil nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
362
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
363 (autoload 'the "cl-macs" nil nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
364
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
365 (autoload 'declare "cl-macs" nil nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
366
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
367 (autoload 'define-setf-method "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
368 (define-setf-method NAME ARGLIST BODY...): define a `setf' method.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
369 This method shows how to handle `setf's to places of the form (NAME ARGS...).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
370 The argument forms ARGS are bound according to ARGLIST, as if NAME were
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
371 going to be expanded as a macro, then the BODY forms are executed and must
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
372 return a list of five elements: a temporary-variables list, a value-forms
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
373 list, a store-variables list (of length one), a store-form, and an access-
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
374 form. See `defsetf' for a simpler way to define most setf-methods." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
375
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
376 (autoload 'defsetf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
377 (defsetf NAME FUNC): define a `setf' method.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
378 This macro is an easy-to-use substitute for `define-setf-method' that works
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
379 well for simple place forms. In the simple `defsetf' form, `setf's of
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
380 the form (setf (NAME ARGS...) VAL) are transformed to function or macro
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
381 calls of the form (FUNC ARGS... VAL). Example: (defsetf aref aset).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
382 Alternate form: (defsetf NAME ARGLIST (STORE) BODY...).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
383 Here, the above `setf' call is expanded by binding the argument forms ARGS
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
384 according to ARGLIST, binding the value form VAL to STORE, then executing
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
385 BODY, which must return a Lisp form that does the necessary `setf' operation.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
386 Actually, ARGLIST and STORE may be bound to temporary variables which are
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
387 introduced automatically to preserve proper execution order of the arguments.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
388 Example: (defsetf nth (n x) (v) (list 'setcar (list 'nthcdr n x) v))." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
389
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
390 (autoload 'get-setf-method "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
391 Return a list of five values describing the setf-method for PLACE.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
392 PLACE may be any Lisp form which can appear as the PLACE argument to
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
393 a macro like `setf' or `incf'." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
394
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
395 (autoload 'setf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
396 (setf PLACE VAL PLACE VAL ...): set each PLACE to the value of its VAL.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
397 This is a generalized version of `setq'; the PLACEs may be symbolic
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
398 references such as (car x) or (aref x i), as well as plain symbols.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
399 For example, (setf (cadar x) y) is equivalent to (setcar (cdar x) y).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
400 The return value is the last VAL in the list." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
401
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
402 (autoload 'psetf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
403 (psetf PLACE VAL PLACE VAL ...): set PLACEs to the values VALs in parallel.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
404 This is like `setf', except that all VAL forms are evaluated (in order)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
405 before assigning any PLACEs to the corresponding values." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
406
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
407 (autoload 'cl-do-pop "cl-macs" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
408
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
409 (autoload 'remf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
410 (remf PLACE TAG): remove TAG from property list PLACE.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
411 PLACE may be a symbol, or any generalized variable allowed by `setf'.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
412 The form returns true if TAG was found and removed, nil otherwise." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
413
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
414 (autoload 'shiftf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
415 (shiftf PLACE PLACE... VAL): shift left among PLACEs.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
416 Example: (shiftf A B C) sets A to B, B to C, and returns the old A.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
417 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
418
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
419 (autoload 'rotatef "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
420 (rotatef PLACE...): rotate left among PLACEs.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
421 Example: (rotatef A B C) sets A to B, B to C, and C to A. It returns nil.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
422 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
423
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
424 (autoload 'letf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
425 (letf ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
426 This is the analogue of `let', but with generalized variables (in the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
427 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
428 VALUE, then the BODY forms are executed. On exit, either normally or
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
429 because of a `throw' or error, the PLACEs are set back to their original
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
430 values. Note that this macro is *not* available in Common Lisp.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
431 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)',
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
432 the PLACE is not modified before executing BODY." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
433
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
434 (autoload 'letf* "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
435 (letf* ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
436 This is the analogue of `let*', but with generalized variables (in the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
437 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
438 VALUE, then the BODY forms are executed. On exit, either normally or
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
439 because of a `throw' or error, the PLACEs are set back to their original
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
440 values. Note that this macro is *not* available in Common Lisp.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
441 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)',
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
442 the PLACE is not modified before executing BODY." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
443
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
444 (autoload 'callf "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
445 (callf FUNC PLACE ARGS...): set PLACE to (FUNC PLACE ARGS...).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
446 FUNC should be an unquoted function name. PLACE may be a symbol,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
447 or any generalized variable allowed by `setf'." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
448
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
449 (autoload 'callf2 "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
450 (callf2 FUNC ARG1 PLACE ARGS...): set PLACE to (FUNC ARG1 PLACE ARGS...).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
451 Like `callf', but PLACE is the second argument of FUNC, not the first." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
452
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
453 (autoload 'define-modify-macro "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
454 (define-modify-macro NAME ARGLIST FUNC): define a `setf'-like modify macro.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
455 If NAME is called, it combines its PLACE argument with the other arguments
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
456 from ARGLIST using FUNC: (define-modify-macro incf (&optional (n 1)) +)" nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
457
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
458 (autoload 'defstruct "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
459 (defstruct (NAME OPTIONS...) (SLOT SLOT-OPTS...)...): define a struct type.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
460 This macro defines a new Lisp data type called NAME, which contains data
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
461 stored in SLOTs. This defines a `make-NAME' constructor, a `copy-NAME'
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
462 copier, a `NAME-p' predicate, and setf-able `NAME-SLOT' accessors." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
463
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
464 (autoload 'cl-struct-setf-expander "cl-macs" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
465
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
466 (autoload 'deftype "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
467 (deftype NAME ARGLIST BODY...): define NAME as a new data type.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
468 The type name can then be used in `typecase', `check-type', etc." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
469
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
470 (autoload 'typep "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
471 Check that OBJECT is of type TYPE.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
472 TYPE is a Common Lisp-style type specifier." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
473
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
474 (autoload 'check-type "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
475 Verify that FORM is of type TYPE; signal an error if not.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
476 STRING is an optional description of the desired type." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
477
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
478 (autoload 'assert "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
479 Verify that FORM returns non-nil; signal an error if not.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
480 Second arg SHOW-ARGS means to include arguments of FORM in message.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
481 Other args STRING and ARGS... are arguments to be passed to `error'.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
482 They are not evaluated unless the assertion fails. If STRING is
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
483 omitted, a default message listing FORM itself is used." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
484
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
485 (autoload 'ignore-errors "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
486 Execute FORMS; if an error occurs, return nil.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
487 Otherwise, return result of last FORM." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
488
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
489 (autoload 'define-compiler-macro "cl-macs" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
490 (define-compiler-macro FUNC ARGLIST BODY...): Define a compiler-only macro.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
491 This is like `defmacro', but macro expansion occurs only if the call to
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
492 FUNC is compiled (i.e., not interpreted). Compiler macros should be used
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
493 for optimizing the way calls to FUNC are compiled; the form returned by
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
494 BODY should do the same thing as a call to the normal function called
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
495 FUNC, though possibly more efficiently. Note that, like regular macros,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
496 compiler macros are expanded repeatedly until no further expansions are
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
497 possible. Unlike regular macros, BODY can decide to \"punt\" and leave the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
498 original function call alone by declaring an initial `&whole foo' parameter
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
499 and then returning foo." nil 'macro)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
500
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
501 (autoload 'compiler-macroexpand "cl-macs" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
502
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
503 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
504
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
505 ;;;### (autoloads (batch-remove-old-elc) "cleantree" "lisp/cleantree.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
506
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
507 (autoload 'batch-remove-old-elc "cleantree" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
508
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
509 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
510
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
511 ;;;### (autoloads (config-value config-value-hash-table) "config" "lisp/config.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
512
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
513 (autoload 'config-value-hash-table "config" "\
276
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
514 Return hashtable of configuration parameters and their values." nil nil)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
515
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
516 (autoload 'config-value "config" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
517 Return the value of the configuration parameter CONFIG_SYMBOL." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
518
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
519 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
520
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
521 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp/cus-dep.el")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
522
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
523 (autoload 'Custom-make-dependencies "cus-dep" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
524 Extract custom dependencies from .el files in SUBDIRS.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
525 SUBDIRS is a list of directories. If it is nil, the command-line
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
526 arguments are used. If it is a string, only that directory is
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
527 processed. This function is especially useful in batch mode.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
528
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
529 Batch usage: xemacs -batch -l cus-dep.el -f Custom-make-dependencies DIRS" t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
530
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
531 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
532
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
533 ;;;### (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-changed-options customize-variable customize-other-window customize customize-save-variable customize-set-variable customize-set-value) "cus-edit" "lisp/cus-edit.el")
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
534
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
535 (autoload 'customize-set-value "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
536 Set VARIABLE to VALUE. VALUE is a Lisp object.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
537
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
538 If VARIABLE has a `variable-interactive' property, that is used as if
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
539 it were the arg to `interactive' (which see) to interactively read the value.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
540
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
541 If VARIABLE has a `custom-type' property, it must be a widget and the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
542 `:prompt-value' property of that widget will be used for reading the value." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
543
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
544 (autoload 'customize-set-variable "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
545 Set the default for VARIABLE to VALUE. VALUE is a Lisp object.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
546
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
547 If VARIABLE has a `custom-set' property, that is used for setting
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
548 VARIABLE, otherwise `set-default' is used.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
549
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
550 The `customized-value' property of the VARIABLE will be set to a list
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
551 with a quoted VALUE as its sole list member.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
552
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
553 If VARIABLE has a `variable-interactive' property, that is used as if
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
554 it were the arg to `interactive' (which see) to interactively read the value.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
555
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
556 If VARIABLE has a `custom-type' property, it must be a widget and the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
557 `:prompt-value' property of that widget will be used for reading the value. " t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
558
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
559 (autoload 'customize-save-variable "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
560 Set the default for VARIABLE to VALUE, and save it for future sessions.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
561 If VARIABLE has a `custom-set' property, that is used for setting
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
562 VARIABLE, otherwise `set-default' is used.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
563
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
564 The `customized-value' property of the VARIABLE will be set to a list
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
565 with a quoted VALUE as its sole list member.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
566
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
567 If VARIABLE has a `variable-interactive' property, that is used as if
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
568 it were the arg to `interactive' (which see) to interactively read the value.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
569
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
570 If VARIABLE has a `custom-type' property, it must be a widget and the
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
571 `:prompt-value' property of that widget will be used for reading the value. " t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
572
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
573 (autoload 'customize "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
574 Select a customization buffer which you can use to set user options.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
575 User options are structured into \"groups\".
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
576 The default group is `Emacs'." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
577
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
578 (defalias 'customize-group 'customize)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
579
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
580 (autoload 'customize-other-window "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
581 Customize SYMBOL, which must be a customization group." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
582
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
583 (defalias 'customize-group-other-window 'customize-other-window)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
584
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
585 (defalias 'customize-option 'customize-variable)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
586
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
587 (autoload 'customize-variable "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
588 Customize SYMBOL, which must be a user option variable." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
589
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
590 (autoload 'customize-changed-options "cus-edit" "\
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
591 Customize all user option variables whose default values changed recently.
225
12579d965149 Import from CVS: tag r20-4b11
cvs
parents: 223
diff changeset
592 This means, in other words, variables defined with a `:version' keyword." t nil)
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
593
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
594 (defalias 'customize-variable-other-window 'customize-option-other-window)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
595
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
596 (autoload 'customize-option-other-window "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
597 Customize SYMBOL, which must be a user option variable.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
598 Show the buffer in another window, but don't select it." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
599
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
600 (autoload 'customize-face "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
601 Customize SYMBOL, which should be a face name or nil.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
602 If SYMBOL is nil, customize all faces." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
603
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
604 (autoload 'customize-face-other-window "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
605 Show customization buffer for FACE in other window." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
606
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
607 (autoload 'customize-customized "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
608 Customize all user options set since the last save in this session." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
609
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
610 (autoload 'customize-saved "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
611 Customize all already saved user options." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
612
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
613 (autoload 'customize-apropos "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
614 Customize all user options matching REGEXP.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
615 If ALL is `options', include only options.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
616 If ALL is `faces', include only faces.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
617 If ALL is `groups', include only groups.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
618 If ALL is t (interactively, with prefix arg), include options which are not
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
619 user-settable, as well as faces and groups." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
620
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
621 (autoload 'customize-apropos-options "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
622 Customize all user options matching REGEXP.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
623 With prefix arg, include options which are not user-settable." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
624
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
625 (autoload 'customize-apropos-faces "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
626 Customize all user faces matching REGEXP." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
627
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
628 (autoload 'customize-apropos-groups "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
629 Customize all user groups matching REGEXP." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
630
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
631 (autoload 'custom-buffer-create "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
632 Create a buffer containing OPTIONS.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
633 Optional NAME is the name of the buffer.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
634 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
635 SYMBOL is a customization option, and WIDGET is a widget for editing
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
636 that option." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
637
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
638 (autoload 'custom-buffer-create-other-window "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
639 Create a buffer containing OPTIONS.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
640 Optional NAME is the name of the buffer.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
641 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
642 SYMBOL is a customization option, and WIDGET is a widget for editing
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
643 that option." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
644
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
645 (autoload 'customize-browse "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
646 Create a tree browser for the customize hierarchy." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
647
286
57709be46d1b Import from CVS: tag r21-0b41
cvs
parents: 282
diff changeset
648 (defcustom custom-file "~/.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)
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
649
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
650 (autoload 'customize-save-customized "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
651 Save all user options which have been set in this session." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
652
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
653 (autoload 'custom-save-all "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
654 Save all customizations in `custom-file'." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
655
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
656 (autoload 'custom-menu-create "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
657 Create menu for customization group SYMBOL.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
658 The menu is in a format applicable to `easy-menu-define'." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
659
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
660 (autoload 'customize-menu-create "cus-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
661 Return a customize menu for customization group SYMBOL.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
662 If optional NAME is given, use that as the name of the menu.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
663 Otherwise the menu will be named `Customize'.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
664 The format is suitable for use with `easy-menu-define'." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
665
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
666 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
667
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
668 ;;;### (autoloads (custom-set-faces custom-declare-face) "cus-face" "lisp/cus-face.el")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
669
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
670 (autoload 'custom-declare-face "cus-face" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
671 Like `defface', but FACE is evaluated as a normal argument." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
672
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
673 (autoload 'custom-set-faces "cus-face" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
674 Initialize faces according to user preferences.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
675 The arguments should be a list where each entry has the form:
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
676
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
677 (FACE SPEC [NOW])
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
678
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
679 SPEC will be stored as the saved value for FACE. If NOW is present
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
680 and non-nil, FACE will also be created according to SPEC.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
681
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
682 See `defface' for the format of SPEC." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
683
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
684 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
685
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
686 ;;;### (autoloads (disassemble) "disass" "lisp/disass.el")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
687
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
688 (autoload 'disassemble "disass" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
689 Print disassembled code for OBJECT in (optional) BUFFER.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
690 OBJECT can be a symbol defined as a function, or a function itself
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
691 \(a lambda expression or a compiled-function object).
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
692 If OBJECT is not already compiled, we compile it, but do not
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
693 redefine OBJECT if it is a symbol." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
694
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
695 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
696
219
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
697 ;;;### (autoloads (standard-display-european standard-display-underline standard-display-graphic standard-display-g1 standard-display-ascii standard-display-default standard-display-8bit make-display-table describe-current-display-table) "disp-table" "lisp/disp-table.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
698
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
699 (autoload 'describe-current-display-table "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
700 Describe the display table in use in the selected window and buffer." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
701
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
702 (autoload 'make-display-table "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
703 Return a new, empty display table." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
704
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
705 (autoload 'standard-display-8bit "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
706 Display characters in the range L to H literally." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
707
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
708 (autoload 'standard-display-default "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
709 Display characters in the range L to H using the default notation." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
710
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
711 (autoload 'standard-display-ascii "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
712 Display character C using printable string S." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
713
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
714 (autoload 'standard-display-g1 "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
715 Display character C as character SC in the g1 character set.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
716 This function assumes that your terminal uses the SO/SI characters;
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
717 it is meaningless for an X frame." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
718
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
719 (autoload 'standard-display-graphic "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
720 Display character C as character GC in graphics character set.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
721 This function assumes VT100-compatible escapes; it is meaningless for an
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
722 X frame." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
723
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
724 (autoload 'standard-display-underline "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
725 Display character C as character UC plus underlining." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
726
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
727 (autoload 'standard-display-european "disp-table" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
728 Toggle display of European characters encoded with ISO 8859.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
729 When enabled, characters in the range of 160 to 255 display not
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
730 as octal escapes, but as accented characters.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
731 With prefix argument, enable European character display iff arg is positive." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
732
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
733 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
734
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
735 ;;;### (autoloads nil "easymenu" "lisp/easymenu.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
736
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
737 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
738
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
739 ;;;### (autoloads (tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file tag-complete-symbol find-tag-other-window find-tag visit-tags-table) "etags" "lisp/etags.el")
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
740
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
741 (autoload 'visit-tags-table "etags" "\
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
742 Tell tags commands to use tags table file FILE when all else fails.
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
743 FILE should be the name of a file created with the `etags' program.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
744 A directory name is ok too; it means file TAGS in that directory." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
745
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
746 (autoload 'find-tag "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
747 *Find tag whose name contains TAGNAME.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
748 Selects the buffer that the tag is contained in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
749 and puts point at its definition.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
750 If TAGNAME is a null string, the expression in the buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
751 around or before point is used as the tag name.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
752 If called interactively with a numeric argument, searches for the next tag
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
753 in the tag table that matches the tagname used in the previous find-tag.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
754 If second arg OTHER-WINDOW is non-nil, uses another window to display
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
755 the tag.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
756
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
757 This version of this function supports multiple active tags tables,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
758 and completion.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
759
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
760 Variables of note:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
761
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
762 tag-table-alist controls which tables apply to which buffers
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
763 tags-file-name a default tags table
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
764 tags-build-completion-table controls completion behavior
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
765 buffer-tag-table another way of specifying a buffer-local table
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
766 make-tags-files-invisible whether tags tables should be very hidden
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
767 tag-mark-stack-max how many tags-based hops to remember" t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
768
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
769 (autoload 'find-tag-other-window "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
770 *Find tag whose name contains TAGNAME.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
771 Selects the buffer that the tag is contained in in another window
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
772 and puts point at its definition.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
773 If TAGNAME is a null string, the expression in the buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
774 around or before point is used as the tag name.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
775 If second arg NEXT is non-nil (interactively, with prefix arg),
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
776 searches for the next tag in the tag table
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
777 that matches the tagname used in the previous find-tag.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
778
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
779 This version of this function supports multiple active tags tables,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
780 and completion.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
781
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
782 Variables of note:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
783
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
784 tag-table-alist controls which tables apply to which buffers
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
785 tags-file-name a default tags table
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
786 tags-build-completion-table controls completion behavior
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
787 buffer-tag-table another way of specifying a buffer-local table
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
788 make-tags-files-invisible whether tags tables should be very hidden
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
789 tag-mark-stack-max how many tags-based hops to remember" t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
790
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
791 (autoload 'tag-complete-symbol "etags" "\
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
792 The function used to do tags-completion (using 'tag-completion-predicate)." t nil)
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
793
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
794 (autoload 'next-file "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
795 Select next file among files in current tag table(s).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
796
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
797 A first argument of t (prefix arg, if interactive) initializes to the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
798 beginning of the list of files in the (first) tags table. If the argument
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
799 is neither nil nor t, it is evalled to initialize the list of files.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
800
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
801 Non-nil second argument NOVISIT means use a temporary buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
802 to save time and avoid uninteresting warnings.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
803
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
804 Value is nil if the file was already visited;
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
805 if the file was newly read in, the value is the filename." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
806
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
807 (autoload 'tags-loop-continue "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
808 Continue last \\[tags-search] or \\[tags-query-replace] command.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
809 Used noninteractively with non-nil argument to begin such a command (the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
810 argument is passed to `next-file', which see).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
811 Two variables control the processing we do on each file:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
812 the value of `tags-loop-scan' is a form to be executed on each file
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
813 to see if it is interesting (it returns non-nil if so)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
814 and `tags-loop-operate' is a form to execute to operate on an interesting file
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
815 If the latter returns non-nil, we exit; otherwise we scan the next file." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
816
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
817 (autoload 'tags-search "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
818 Search through all files listed in tags table for match for REGEXP.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
819 Stops when a match is found.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
820 To continue searching for next match, use command \\[tags-loop-continue].
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
821
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
822 See documentation of variable `tag-table-alist'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
823
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
824 (autoload 'tags-query-replace "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
825 Query-replace-regexp FROM with TO through all files listed in tags table.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
826 Third arg DELIMITED (prefix arg) means replace only word-delimited matches.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
827 If you exit (\\[keyboard-quit] or ESC), you can resume the query-replace
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
828 with the command \\[tags-loop-continue].
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
829
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
830 See documentation of variable `tag-table-alist'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
831
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
832 (autoload 'list-tags "etags" "\
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
833 Display list of tags in FILE." t nil)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
834
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
835 (autoload 'tags-apropos "etags" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
836 Display list of all tags in tag table REGEXP matches." t nil)
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
837 (define-key esc-map "*" 'pop-tag-mark)
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
838
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
839 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
840
239
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
841 ;;;### (autoloads (finder-by-keyword) "finder" "lisp/finder.el")
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
842
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
843 (autoload 'finder-by-keyword "finder" "\
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
844 Find packages matching a given keyword." t nil)
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
845
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
846 ;;;***
41f2f0e326e9 Import from CVS: tag r20-5b18
cvs
parents: 237
diff changeset
847
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
848 ;;;### (autoloads (font-lock-set-defaults-1 font-lock-fontify-buffer turn-off-font-lock turn-on-font-lock font-lock-mode) "font-lock" "lisp/font-lock.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
849
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
850 (defcustom font-lock-auto-fontify t "*Whether font-lock should automatically fontify files as they're loaded.\nThis will only happen if font-lock has fontifying keywords for the major\nmode of the file. You can get finer-grained control over auto-fontification\nby using this variable in combination with `font-lock-mode-enable-list' or\n`font-lock-mode-disable-list'." :type 'boolean :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
851
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
852 (defcustom font-lock-mode-enable-list nil "*List of modes to auto-fontify, if `font-lock-auto-fontify' is nil." :type '(repeat (symbol :tag "Mode")) :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
853
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
854 (defcustom font-lock-mode-disable-list nil "*List of modes not to auto-fontify, if `font-lock-auto-fontify' is t." :type '(repeat (symbol :tag "Mode")) :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
855
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
856 (defcustom font-lock-use-colors '(color) "*Specification for when Font Lock will set up color defaults.\nNormally this should be '(color), meaning that Font Lock will set up\ncolor defaults that are only used on color displays. Set this to nil\nif you don't want Font Lock to set up color defaults at all. This\nshould be one of\n\n-- a list of valid tags, meaning that the color defaults will be used\n when all of the tags apply. (e.g. '(color x))\n-- a list whose first element is 'or and whose remaining elements are\n lists of valid tags, meaning that the defaults will be used when\n any of the tag lists apply.\n-- nil, meaning that the defaults should not be set up at all.\n\n(If you specify face values in your init file, they will override any\nthat Font Lock specifies, regardless of whether you specify the face\nvalues before or after loading Font Lock.)\n\nSee also `font-lock-use-fonts'. If you want more control over the faces\nused for fontification, see the documentation of `font-lock-mode' for\nhow to do it." :type 'sexp :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
857
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
858 (defcustom font-lock-use-fonts '(or (mono) (grayscale)) "*Specification for when Font Lock will set up non-color defaults.\n\nNormally this should be '(or (mono) (grayscale)), meaning that Font\nLock will set up non-color defaults that are only used on either mono\nor grayscale displays. Set this to nil if you don't want Font Lock to\nset up non-color defaults at all. This should be one of\n\n-- a list of valid tags, meaning that the non-color defaults will be used\n when all of the tags apply. (e.g. '(grayscale x))\n-- a list whose first element is 'or and whose remaining elements are\n lists of valid tags, meaning that the defaults will be used when\n any of the tag lists apply.\n-- nil, meaning that the defaults should not be set up at all.\n\n(If you specify face values in your init file, they will override any\nthat Font Lock specifies, regardless of whether you specify the face\nvalues before or after loading Font Lock.)\n\nSee also `font-lock-use-colors'. If you want more control over the faces\nused for fontification, see the documentation of `font-lock-mode' for\nhow to do it." :type 'sexp :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
859
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
860 (defcustom font-lock-maximum-decoration t "*If non-nil, the maximum decoration level for fontifying.\nIf nil, use the minimum decoration (equivalent to level 0).\nIf t, use the maximum decoration available.\nIf a number, use that level of decoration (or if not available the maximum).\nIf a list, each element should be a cons pair of the form (MAJOR-MODE . LEVEL),\nwhere MAJOR-MODE is a symbol or t (meaning the default). For example:\n ((c++-mode . 2) (c-mode . t) (t . 1))\nmeans use level 2 decoration for buffers in `c++-mode', the maximum decoration\navailable for buffers in `c-mode', and level 1 decoration otherwise." :type '(choice (const :tag "default" nil) (const :tag "maximum" t) (integer :tag "level" 1) (repeat :menu-tag "mode specific" :tag "mode specific" :value ((t . t)) (cons :tag "Instance" (radio :tag "Mode" (const :tag "all" t) (symbol :tag "name")) (radio :tag "Decoration" (const :tag "default" nil) (const :tag "maximum" t) (integer :tag "level" 1))))) :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
861
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
862 (define-obsolete-variable-alias 'font-lock-use-maximal-decoration 'font-lock-maximum-decoration)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
863
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
864 (defcustom font-lock-maximum-size (* 250 1024) "*If non-nil, the maximum size for buffers for fontifying.\nOnly buffers less than this can be fontified when Font Lock mode is turned on.\nIf nil, means size is irrelevant.\nIf a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE),\nwhere MAJOR-MODE is a symbol or t (meaning the default). For example:\n ((c++-mode . 256000) (c-mode . 256000) (rmail-mode . 1048576))\nmeans that the maximum size is 250K for buffers in `c++-mode' or `c-mode', one\nmegabyte for buffers in `rmail-mode', and size is irrelevant otherwise." :type '(choice (const :tag "none" nil) (integer :tag "size") (repeat :menu-tag "mode specific" :tag "mode specific" :value ((t)) (cons :tag "Instance" (radio :tag "Mode" (const :tag "all" t) (symbol :tag "name")) (radio :tag "Size" (const :tag "none" nil) (integer :tag "size"))))) :group 'font-lock)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
865
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
866 (defvar font-lock-keywords nil "\
223
2c611d1463a6 Import from CVS: tag r20-4b10
cvs
parents: 219
diff changeset
867 A list of the keywords to highlight.
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
868 Each element should be of the form:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
869
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
870 MATCHER
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
871 (MATCHER . MATCH)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
872 (MATCHER . FACENAME)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
873 (MATCHER . HIGHLIGHT)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
874 (MATCHER HIGHLIGHT ...)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
875 (eval . FORM)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
876
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
877 where HIGHLIGHT should be either MATCH-HIGHLIGHT or MATCH-ANCHORED.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
878
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
879 FORM is an expression, whose value should be a keyword element,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
880 evaluated when the keyword is (first) used in a buffer. This feature
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
881 can be used to provide a keyword that can only be generated when Font
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
882 Lock mode is actually turned on.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
883
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
884 For highlighting single items, typically only MATCH-HIGHLIGHT is required.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
885 However, if an item or (typically) items is to be highlighted following the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
886 instance of another item (the anchor) then MATCH-ANCHORED may be required.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
887
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
888 MATCH-HIGHLIGHT should be of the form:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
889
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
890 (MATCH FACENAME OVERRIDE LAXMATCH)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
891
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
892 Where MATCHER can be either the regexp to search for, a variable
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
893 containing the regexp to search for, or the function to call to make
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
894 the search (called with one argument, the limit of the search). MATCH
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
895 is the subexpression of MATCHER to be highlighted. FACENAME is either
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
896 a symbol naming a face, or an expression whose value is the face name
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
897 to use. If you want FACENAME to be a symbol that evaluates to a face,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
898 use a form like \"(progn sym)\".
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
899
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
900 OVERRIDE and LAXMATCH are flags. If OVERRIDE is t, existing fontification may
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
901 be overwritten. If `keep', only parts not already fontified are highlighted.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
902 If `prepend' or `append', existing fontification is merged with the new, in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
903 which the new or existing fontification, respectively, takes precedence.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
904 If LAXMATCH is non-nil, no error is signalled if there is no MATCH in MATCHER.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
905
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
906 For example, an element of the form highlights (if not already highlighted):
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
907
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
908 \"\\\\\\=<foo\\\\\\=>\" Discrete occurrences of \"foo\" in the value of the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
909 variable `font-lock-keyword-face'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
910 (\"fu\\\\(bar\\\\)\" . 1) Substring \"bar\" within all occurrences of \"fubar\" in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
911 the value of `font-lock-keyword-face'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
912 (\"fubar\" . fubar-face) Occurrences of \"fubar\" in the value of `fubar-face'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
913 (\"foo\\\\|bar\" 0 foo-bar-face t)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
914 Occurrences of either \"foo\" or \"bar\" in the value
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
915 of `foo-bar-face', even if already highlighted.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
916
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
917 MATCH-ANCHORED should be of the form:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
918
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
919 (MATCHER PRE-MATCH-FORM POST-MATCH-FORM MATCH-HIGHLIGHT ...)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
920
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
921 Where MATCHER is as for MATCH-HIGHLIGHT with one exception; see below.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
922 PRE-MATCH-FORM and POST-MATCH-FORM are evaluated before the first, and after
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
923 the last, instance MATCH-ANCHORED's MATCHER is used. Therefore they can be
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
924 used to initialise before, and cleanup after, MATCHER is used. Typically,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
925 PRE-MATCH-FORM is used to move to some position relative to the original
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
926 MATCHER, before starting with MATCH-ANCHORED's MATCHER. POST-MATCH-FORM might
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
927 be used to move, before resuming with MATCH-ANCHORED's parent's MATCHER.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
928
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
929 For example, an element of the form highlights (if not already highlighted):
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
930
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
931 (\"\\\\\\=<anchor\\\\\\=>\" (0 anchor-face) (\"\\\\\\=<item\\\\\\=>\" nil nil (0 item-face)))
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
932
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
933 Discrete occurrences of \"anchor\" in the value of `anchor-face', and subsequent
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
934 discrete occurrences of \"item\" (on the same line) in the value of `item-face'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
935 (Here PRE-MATCH-FORM and POST-MATCH-FORM are nil. Therefore \"item\" is
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
936 initially searched for starting from the end of the match of \"anchor\", and
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
937 searching for subsequent instance of \"anchor\" resumes from where searching
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
938 for \"item\" concluded.)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
939
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
940 The above-mentioned exception is as follows. The limit of the MATCHER search
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
941 defaults to the end of the line after PRE-MATCH-FORM is evaluated.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
942 However, if PRE-MATCH-FORM returns a position greater than the position after
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
943 PRE-MATCH-FORM is evaluated, that position is used as the limit of the search.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
944 It is generally a bad idea to return a position greater than the end of the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
945 line, i.e., cause the MATCHER search to span lines.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
946
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
947 Note that the MATCH-ANCHORED feature is experimental; in the future, we may
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
948 replace it with other ways of providing this functionality.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
949
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
950 These regular expressions should not match text which spans lines. While
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
951 \\[font-lock-fontify-buffer] handles multi-line patterns correctly, updating
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
952 when you edit the buffer does not, since it considers text one line at a time.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
953
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
954 Be very careful composing regexps for this list;
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
955 the wrong pattern can dramatically slow things down!")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
956
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
957 (make-variable-buffer-local 'font-lock-keywords)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
958
282
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
959 (defcustom font-lock-mode nil "Non nil means `font-lock-mode' is on" :group 'font-lock :type 'boolean :initialize 'custom-initialize-default :require 'font-lock :set '(lambda (var val) (font-lock-mode (or val 0))))
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
960
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
961 (defvar font-lock-mode-hook nil "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
962 Function or functions to run on entry to font-lock-mode.")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
963
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
964 (autoload 'font-lock-mode "font-lock" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
965 Toggle Font Lock Mode.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
966 With arg, turn font-lock mode on if and only if arg is positive.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
967
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
968 When Font Lock mode is enabled, text is fontified as you type it:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
969
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
970 - Comments are displayed in `font-lock-comment-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
971 - Strings are displayed in `font-lock-string-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
972 - Documentation strings (in Lisp-like languages) are displayed in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
973 `font-lock-doc-string-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
974 - Language keywords (\"reserved words\") are displayed in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
975 `font-lock-keyword-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
976 - Function names in their defining form are displayed in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
977 `font-lock-function-name-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
978 - Variable names in their defining form are displayed in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
979 `font-lock-variable-name-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
980 - Type names are displayed in `font-lock-type-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
981 - References appearing in help files and the like are displayed
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
982 in `font-lock-reference-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
983 - Preprocessor declarations are displayed in
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
984 `font-lock-preprocessor-face';
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
985
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
986 and
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
987
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
988 - Certain other expressions are displayed in other faces according
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
989 to the value of the variable `font-lock-keywords'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
990
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
991 Where modes support different levels of fontification, you can use the variable
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
992 `font-lock-maximum-decoration' to specify which level you generally prefer.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
993 When you turn Font Lock mode on/off the buffer is fontified/defontified, though
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
994 fontification occurs only if the buffer is less than `font-lock-maximum-size'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
995 To fontify a buffer without turning on Font Lock mode, and regardless of buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
996 size, you can use \\[font-lock-fontify-buffer].
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
997
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
998 See the variable `font-lock-keywords' for customization." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
999
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1000 (autoload 'turn-on-font-lock "font-lock" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1001 Unconditionally turn on Font Lock mode." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1002
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1003 (autoload 'turn-off-font-lock "font-lock" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1004 Unconditionally turn off Font Lock mode." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1005
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1006 (autoload 'font-lock-fontify-buffer "font-lock" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1007 Fontify the current buffer the way `font-lock-mode' would.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1008 See `font-lock-mode' for details.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1009
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1010 This can take a while for large buffers." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1011
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1012 (autoload 'font-lock-set-defaults-1 "font-lock" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1013
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1014 (add-minor-mode 'font-lock-mode " Font")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1015
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1016 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1017
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1018 ;;;### (autoloads (x-font-build-cache font-default-size-for-device font-default-encoding-for-device font-default-registry-for-device font-default-family-for-device font-default-object-for-device font-default-font-for-device font-create-object) "font" "lisp/font.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1019
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1020 (autoload 'font-create-object "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1021
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1022 (autoload 'font-default-font-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1023
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1024 (autoload 'font-default-object-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1025
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1026 (autoload 'font-default-family-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1027
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1028 (autoload 'font-default-registry-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1029
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1030 (autoload 'font-default-encoding-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1031
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1032 (autoload 'font-default-size-for-device "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1033
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1034 (autoload 'x-font-build-cache "font" nil nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1035
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1036 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1037
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1038 ;;;### (autoloads (gnuserv-start gnuserv-running-p) "gnuserv" "lisp/gnuserv.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1039
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1040 (defcustom gnuserv-frame nil "*The frame to be used to display all edited files.\nIf nil, then a new frame is created for each file edited.\nIf t, then the currently selected frame will be used.\nIf a function, then this will be called with a symbol `x' or `tty' as the\nonly argument, and its return value will be interpreted as above." :tag "Gnuserv Frame" :type '(radio (const :tag "Create new frame each time" nil) (const :tag "Use selected frame" t) (function-item :tag "Use main Emacs frame" gnuserv-main-frame-function) (function-item :tag "Use visible frame, otherwise create new" gnuserv-visible-frame-function) (function-item :tag "Create special Gnuserv frame and use it" gnuserv-special-frame-function) (function :tag "Other")) :group 'gnuserv :group 'frames)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1041
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1042 (autoload 'gnuserv-running-p "gnuserv" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1043 Return non-nil if a gnuserv process is running from this XEmacs session." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1044
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1045 (autoload 'gnuserv-start "gnuserv" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1046 Allow this Emacs process to be a server for client processes.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1047 This starts a gnuserv communications subprocess through which
276
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1048 client \"editors\" (gnuclient and gnudoit) can send editing commands to
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1049 this Emacs job. See the gnuserv(1) manual page for more details.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1050
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1051 Prefix arg means just kill any existing server communications subprocess." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1052
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1053 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1054
247
e70b3a057e12 Import from CVS: tag r20-5b22
cvs
parents: 243
diff changeset
1055 ;;;### (autoloads nil "help-macro" "lisp/help-macro.el")
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1056
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1057 (defcustom three-step-help t "*Non-nil means give more info about Help command in three steps.\nThe three steps are simple prompt, prompt with all options,\nand window listing and describing the options.\nA value of nil means skip the middle step, so that\n\\[help-command] \\[help-command] gives the window that lists the options." :type 'boolean :group 'help-appearance)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1058
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1059 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1060
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1061 ;;;### (autoloads (hyper-apropos-popup-menu hyper-apropos-set-variable hyper-set-variable hyper-apropos-read-variable-symbol hyper-describe-function hyper-describe-variable hyper-describe-face hyper-describe-key-briefly hyper-describe-key hyper-apropos) "hyper-apropos" "lisp/hyper-apropos.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1062
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1063 (autoload 'hyper-apropos "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1064 Display lists of functions and variables matching REGEXP
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1065 in buffer \"*Hyper Apropos*\". If optional prefix arg is given, then the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1066 value of `hyper-apropos-programming-apropos' is toggled for this search.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1067 See also `hyper-apropos-mode'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1068
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1069 (autoload 'hyper-describe-key "hyper-apropos" nil t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1070
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1071 (autoload 'hyper-describe-key-briefly "hyper-apropos" nil t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1072
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1073 (autoload 'hyper-describe-face "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1074 Describe face..
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1075 See also `hyper-apropos' and `hyper-describe-function'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1076
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1077 (autoload 'hyper-describe-variable "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1078 Hypertext drop-in replacement for `describe-variable'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1079 See also `hyper-apropos' and `hyper-describe-function'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1080
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1081 (autoload 'hyper-describe-function "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1082 Hypertext replacement for `describe-function'. Unlike `describe-function'
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1083 in that the symbol under the cursor is the default if it is a function.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1084 See also `hyper-apropos' and `hyper-describe-variable'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1085
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1086 (autoload 'hyper-apropos-read-variable-symbol "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1087 Hypertext drop-in replacement for `describe-variable'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1088 See also `hyper-apropos' and `hyper-describe-function'." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1089
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1090 (define-obsolete-function-alias 'hypropos-read-variable-symbol 'hyper-apropos-read-variable-symbol)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1091
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1092 (define-obsolete-function-alias 'hypropos-get-doc 'hyper-apropos-get-doc)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1093
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1094 (autoload 'hyper-set-variable "hyper-apropos" nil t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1095
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1096 (autoload 'hyper-apropos-set-variable "hyper-apropos" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1097 Interactively set the variable on the current line." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1098
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1099 (define-obsolete-function-alias 'hypropos-set-variable 'hyper-apropos-set-variable)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1100
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1101 (autoload 'hyper-apropos-popup-menu "hyper-apropos" nil t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1102
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1103 (define-obsolete-function-alias 'hypropos-popup-menu 'hyper-apropos-popup-menu)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1104
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1105 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1106
282
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1107 ;;;### (autoloads (Info-elisp-ref Info-emacs-key Info-goto-emacs-key-command-node Info-goto-emacs-command-node Info-emacs-command Info-search Info-visit-file Info-goto-node Info-batch-rebuild-dir Info-query info) "info" "lisp/info.el")
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1108
276
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1109 (defvar Info-directory-list nil "\
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1110 List of directories to search for Info documentation files.
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1111
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1112 The first directory in this list, the \"dir\" file there will become
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1113 the (dir)Top node of the Info documentation tree. If you wish to
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1114 modify the info search path, use `M-x customize-variable,
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1115 Info-directory-list' to do so.")
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1116
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1117 (autoload 'info "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1118 Enter Info, the documentation browser.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1119 Optional argument FILE specifies the file to examine;
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1120 the default is the top-level directory of Info.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1121
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1122 In interactive use, a prefix argument directs this command
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1123 to read a file name from the minibuffer." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1124
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1125 (autoload 'Info-query "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1126 Enter Info, the documentation browser. Prompt for name of Info file." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1127
282
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1128 (autoload 'Info-batch-rebuild-dir "info" "\
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1129 (Re)build info `dir' files in the directories remaining on the command line.
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1130 Use this from the command line, with `-batch';
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1131 it won't work in an interactive Emacs.
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1132 Each file is processed even if an error occurred previously.
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1133 For example, invoke \"xemacs -batch -f Info-batch-rebuild-dir /usr/local/info\"" nil nil)
c42ec1d1cded Import from CVS: tag r21-0b39
cvs
parents: 276
diff changeset
1134
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1135 (autoload 'Info-goto-node "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1136 Go to info node named NAME. Give just NODENAME or (FILENAME)NODENAME.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1137 Actually, the following interpretations of NAME are tried in order:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1138 (FILENAME)NODENAME
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1139 (FILENAME) (using Top node)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1140 NODENAME (in current file)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1141 TAGNAME (see below)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1142 FILENAME (using Top node)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1143 where TAGNAME is a string that appears in quotes: \"TAGNAME\", in an
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1144 annotation for any node of any file. (See `a' and `x' commands.)" t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1145
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1146 (autoload 'Info-visit-file "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1147 Directly visit an info file." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1148
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1149 (autoload 'Info-search "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1150 Search for REGEXP, starting from point, and select node it's found in." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1151
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1152 (autoload 'Info-emacs-command "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1153 Look up an Emacs command in the Emacs manual in the Info system.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1154 This command is designed to be used whether you are already in Info or not." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1155
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1156 (autoload 'Info-goto-emacs-command-node "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1157 Look up an Emacs command in the Emacs manual in the Info system.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1158 This command is designed to be used whether you are already in Info or not." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1159
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1160 (autoload 'Info-goto-emacs-key-command-node "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1161 Look up an Emacs key sequence in the Emacs manual in the Info system.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1162 This command is designed to be used whether you are already in Info or not." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1163
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1164 (autoload 'Info-emacs-key "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1165 Look up an Emacs key sequence in the Emacs manual in the Info system.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1166 This command is designed to be used whether you are already in Info or not." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1167
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1168 (autoload 'Info-elisp-ref "info" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1169 Look up an Emacs Lisp function in the Elisp manual in the Info system.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1170 This command is designed to be used whether you are already in Info or not." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1171
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1172 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1173
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1174 ;;;### (autoloads nil "itimer-autosave" "lisp/itimer-autosave.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1175
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1176 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1177
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1178 ;;;### (autoloads nil "loaddefs" "lisp/loaddefs.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1179
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1180 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1181
237
89ec2bb86eea Import from CVS: tag r20-5b17
cvs
parents: 233
diff changeset
1182 ;;;### (autoloads nil "loadhist" "lisp/loadhist.el")
233
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1183
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1184 ;;;***
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1185
265
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1186 ;;;### (autoloads (mwheel-install) "mwheel" "lisp/mwheel.el")
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1187
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1188 (autoload 'mwheel-install "mwheel" "\
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1189 Enable mouse wheel support." nil nil)
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1190
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1191 ;;;***
8efd647ea9ca Import from CVS: tag r20-5b31
cvs
parents: 247
diff changeset
1192
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1193 ;;;### (autoloads (package-admin-add-binary-package package-admin-add-single-file-package) "package-admin" "lisp/package-admin.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1194
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1195 (autoload 'package-admin-add-single-file-package "package-admin" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1196 Install a single file Lisp package into XEmacs package hierarchy.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1197 `file' should be the full path to the lisp file to install.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1198 `destdir' should be a simple directory name.
243
f220cc83d72e Import from CVS: tag r20-5b20
cvs
parents: 239
diff changeset
1199 The optional `pkg-dir' can be used to override the default package hierarchy
276
6330739388db Import from CVS: tag r21-0b36
cvs
parents: 265
diff changeset
1200 \(car (last late-packages))." t nil)
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1201
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1202 (autoload 'package-admin-add-binary-package "package-admin" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1203 Install a pre-bytecompiled XEmacs package into package hierarchy." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1204
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1205 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1206
294
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1207 ;;;### (autoloads (package-get-custom package-get-package-provider package-get package-get-all package-get-update-all) "package-get" "lisp/package-get.el")
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1208
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1209 (autoload 'package-get-update-all "package-get" "\
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1210 Fetch and install the latest versions of all currently installed packages." t nil)
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1211
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1212 (autoload 'package-get-all "package-get" "\
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1213 Fetch PACKAGE with VERSION and all other required packages.
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1214 Uses `package-get-base' to determine just what is required and what
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1215 package provides that functionality. If VERSION is nil, retrieves
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1216 latest version. Optional argument FETCHED-PACKAGES is used to keep
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1217 track of packages already fetched." t nil)
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1218
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1219 (autoload 'package-get "package-get" "\
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1220 Fetch PACKAGE from remote site.
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1221 Optional arguments VERSION indicates which version to retrieve, nil
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1222 means most recent version. CONFLICT indicates what happens if the
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1223 package is already installed. Valid values for CONFLICT are:
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1224 'always always retrieve the package even if it is already installed
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1225 'never do not retrieve the package if it is installed.
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1226
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1227 The value of `package-get-base' is used to determine what files should
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1228 be retrieved. The value of `package-get-remote' is used to determine
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1229 where a package should be retrieved from. The sites are tried in
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1230 order so one is better off listing easily reached sites first.
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1231
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1232 Once the package is retrieved, its md5 checksum is computed. If that
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1233 sum does not match that stored in `package-get-base' for this version
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1234 of the package, an error is signalled." t nil)
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1235
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1236 (autoload 'package-get-package-provider "package-get" "\
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1237 Search for a package that provides SYM and return the name and
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1238 version. Searches in `package-get-base' for SYM. If SYM is a
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1239 consp, then it must match a corresponding (provide (SYM VERSION)) from
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1240 the package." t nil)
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1241
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1242 (autoload 'package-get-custom "package-get" "\
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1243 Fetch and install the latest versions of all customized packages." t nil)
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1244
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1245 ;;;***
4b85ae5eabfb Import from CVS: tag r21-0b45
cvs
parents: 286
diff changeset
1246
219
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1247 ;;;### (autoloads (picture-mode) "picture" "lisp/picture.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1248
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1249 (autoload 'picture-mode "picture" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1250 Switch to Picture mode, in which a quarter-plane screen model is used.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1251 Printing characters replace instead of inserting themselves with motion
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1252 afterwards settable by these commands:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1253 C-c < Move left after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1254 C-c > Move right after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1255 C-c ^ Move up after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1256 C-c . Move down after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1257 C-c ` Move northwest (nw) after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1258 C-c ' Move northeast (ne) after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1259 C-c / Move southwest (sw) after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1260 C-c \\ Move southeast (se) after insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1261 The current direction is displayed in the modeline. The initial
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1262 direction is right. Whitespace is inserted and tabs are changed to
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1263 spaces when required by movement. You can move around in the buffer
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1264 with these commands:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1265 \\[picture-move-down] Move vertically to SAME column in previous line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1266 \\[picture-move-up] Move vertically to SAME column in next line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1267 \\[picture-end-of-line] Move to column following last non-whitespace character.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1268 \\[picture-forward-column] Move right inserting spaces if required.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1269 \\[picture-backward-column] Move left changing tabs to spaces if required.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1270 C-c C-f Move in direction of current picture motion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1271 C-c C-b Move in opposite direction of current picture motion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1272 Return Move to beginning of next line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1273 You can edit tabular text with these commands:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1274 M-Tab Move to column beneath (or at) next interesting character.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1275 `Indents' relative to a previous line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1276 Tab Move to next stop in tab stop list.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1277 C-c Tab Set tab stops according to context of this line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1278 With ARG resets tab stops to default (global) value.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1279 See also documentation of variable picture-tab-chars
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1280 which defines \"interesting character\". You can manually
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1281 change the tab stop list with command \\[edit-tab-stops].
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1282 You can manipulate text with these commands:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1283 C-d Clear (replace) ARG columns after point without moving.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1284 C-c C-d Delete char at point - the command normally assigned to C-d.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1285 \\[picture-backward-clear-column] Clear (replace) ARG columns before point, moving back over them.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1286 \\[picture-clear-line] Clear ARG lines, advancing over them. The cleared
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1287 text is saved in the kill ring.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1288 \\[picture-open-line] Open blank line(s) beneath current line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1289 You can manipulate rectangles with these commands:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1290 C-c C-k Clear (or kill) a rectangle and save it.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1291 C-c C-w Like C-c C-k except rectangle is saved in named register.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1292 C-c C-y Overlay (or insert) currently saved rectangle at point.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1293 C-c C-x Like C-c C-y except rectangle is taken from named register.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1294 \\[copy-rectangle-to-register] Copies a rectangle to a register.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1295 \\[advertised-undo] Can undo effects of rectangle overlay commands
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1296 commands if invoked soon enough.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1297 You can return to the previous mode with:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1298 C-c C-c Which also strips trailing whitespace from every line.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1299 Stripping is suppressed by supplying an argument.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1300
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1301 Entry to this mode calls the value of picture-mode-hook if non-nil.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1302
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1303 Note that Picture mode commands will work outside of Picture mode, but
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1304 they are not defaultly assigned to keys." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1305
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1306 (defalias 'edit-picture 'picture-mode)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1307
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1308 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1309
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1310 ;;;### (autoloads (clear-rectangle string-rectangle open-rectangle insert-rectangle yank-rectangle kill-rectangle extract-rectangle delete-extract-rectangle delete-rectangle) "rect" "lisp/rect.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1311
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1312 (autoload 'delete-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1313 Delete (don't save) text in rectangle with point and mark as corners.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1314 The same range of columns is deleted in each line starting with the line
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1315 where the region begins and ending with the line where the region ends." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1316
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1317 (autoload 'delete-extract-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1318 Delete contents of rectangle and return it as a list of strings.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1319 Arguments START and END are the corners of the rectangle.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1320 The value is list of strings, one for each line of the rectangle." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1321
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1322 (autoload 'extract-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1323 Return contents of rectangle with corners at START and END.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1324 Value is list of strings, one for each line of the rectangle." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1325
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1326 (defvar killed-rectangle nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1327 Rectangle for yank-rectangle to insert.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1328
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1329 (autoload 'kill-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1330 Delete rectangle with corners at point and mark; save as last killed one.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1331 Calling from program, supply two args START and END, buffer positions.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1332 But in programs you might prefer to use `delete-extract-rectangle'." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1333
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1334 (autoload 'yank-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1335 Yank the last killed rectangle with upper left corner at point." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1336
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1337 (autoload 'insert-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1338 Insert text of RECTANGLE with upper left corner at point.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1339 RECTANGLE's first line is inserted at point, its second
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1340 line is inserted at a point vertically under point, etc.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1341 RECTANGLE should be a list of strings.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1342 After this command, the mark is at the upper left corner
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1343 and point is at the lower right corner." nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1344
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1345 (autoload 'open-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1346 Blank out rectangle with corners at point and mark, shifting text right.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1347 The text previously in the region is not overwritten by the blanks,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1348 but instead winds up to the right of the rectangle." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1349
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1350 (autoload 'string-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1351 Insert STRING on each line of the region-rectangle, shifting text right.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1352 The left edge of the rectangle specifies the column for insertion.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1353 This command does not delete or overwrite any existing text.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1354
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1355 Called from a program, takes three args; START, END and STRING." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1356
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1357 (autoload 'clear-rectangle "rect" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1358 Blank out rectangle with corners at point and mark.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1359 The text previously in the region is overwritten by the blanks.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1360 When called from a program, requires two args which specify the corners." t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1361
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1362 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents: 217
diff changeset
1363
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1364 ;;;### (autoloads (list-load-path-shadows) "shadow" "lisp/shadow.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1365
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1366 (autoload 'list-load-path-shadows "shadow" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1367 Display a list of Emacs Lisp files that shadow other files.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1368
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1369 This function lists potential load-path problems. Directories in the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1370 `load-path' variable are searched, in order, for Emacs Lisp
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1371 files. When a previously encountered file name is found again, a
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1372 message is displayed indicating that the later file is \"hidden\" by
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1373 the earlier.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1374
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1375 For example, suppose `load-path' is set to
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1376
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1377 \(\"/usr/gnu/emacs/site-lisp\" \"/usr/gnu/emacs/share/emacs/19.30/lisp\")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1378
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1379 and that each of these directories contains a file called XXX.el. Then
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1380 XXX.el in the site-lisp directory is referred to by all of:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1381 \(require 'XXX), (autoload .... \"XXX\"), (load-library \"XXX\") etc.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1382
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1383 The first XXX.el file prevents emacs from seeing the second (unless
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1384 the second is loaded explicitly via load-file).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1385
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1386 When not intended, such shadowings can be the source of subtle
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1387 problems. For example, the above situation may have arisen because the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1388 XXX package was not distributed with versions of emacs prior to
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1389 19.30. An emacs maintainer downloaded XXX from elsewhere and installed
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1390 it. Later, XXX was updated and included in the emacs distribution.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1391 Unless the emacs maintainer checks for this, the new version of XXX
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1392 will be hidden behind the old (which may no longer work with the new
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1393 emacs version).
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1394
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1395 This function performs these checks and flags all possible
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1396 shadowings. Because a .el file may exist without a corresponding .elc
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1397 \(or vice-versa), these suffixes are essentially ignored. A file
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1398 XXX.elc in an early directory (that does not contain XXX.el) is
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1399 considered to shadow a later file XXX.el, and vice-versa.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1400
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1401 When run interactively, the shadowings (if any) are displayed in a
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1402 buffer called `*Shadows*'. Shadowings are located by calling the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1403 \(non-interactive) companion function, `find-emacs-lisp-shadows'." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1404
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1405 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1406
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1407 ;;;### (autoloads (load-default-sounds load-sound-file) "sound" "lisp/sound.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1408
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1409 (or sound-alist (setq sound-alist '((ready nil) (warp nil))))
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1410
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1411 (autoload 'load-sound-file "sound" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1412 Read in an audio-file and add it to the sound-alist.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1413
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1414 You can only play sound files if you are running on display 0 of the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1415 console of a machine with native sound support or running a NetAudio
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1416 server and XEmacs has the necessary sound support compiled in.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1417
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1418 The sound file must be in the Sun/NeXT U-LAW format, except on Linux,
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1419 where .wav files are also supported by the sound card drivers." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1420
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1421 (autoload 'load-default-sounds "sound" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1422 Load and install some sound files as beep-types, using
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1423 `load-sound-file'. This only works if you're on display 0 of the
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1424 console of a machine with native sound support or running a NetAudio
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1425 server and XEmacs has the necessary sound support compiled in." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1426
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1427 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1428
233
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1429 ;;;### (autoloads (ask-user-about-supersession-threat ask-user-about-lock) "userlock" "lisp/userlock.el")
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1430
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1431 (autoload 'ask-user-about-lock "userlock" "\
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1432 Ask user what to do when he wants to edit FILE but it is locked by USER.
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1433 This function has a choice of three things to do:
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1434 do (signal 'file-locked (list FILE USER))
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1435 to refrain from editing the file
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1436 return t (grab the lock on the file)
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1437 return nil (edit the file even though it is locked).
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1438 You can rewrite it to use any criterion you like to choose which one to do." nil nil)
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1439
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1440 (autoload 'ask-user-about-supersession-threat "userlock" "\
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1441 Ask a user who is about to modify an obsolete buffer what to do.
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1442 This function has two choices: it can return, in which case the modification
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1443 of the buffer will proceed, or it can (signal 'file-supersession (file)),
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1444 in which case the proposed buffer modification will not be made.
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1445
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1446 You can rewrite this to use any criterion you like to choose which one to do.
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1447 The buffer in question is current when this function is called." nil nil)
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1448
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1449 ;;;***
52952cbfc5b5 Import from CVS: tag r20-5b15
cvs
parents: 225
diff changeset
1450
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1451 ;;;### (autoloads (auto-view-mode view-major-mode view-mode view-minor-mode view-buffer-other-window view-file-other-window view-buffer view-file) "view-less" "lisp/view-less.el")
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1452
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1453 (defvar view-minor-mode-map (let ((map (make-keymap))) (set-keymap-name map 'view-minor-mode-map) (suppress-keymap map) (define-key map "-" 'negative-argument) (define-key map " " 'scroll-up) (define-key map "f" 'scroll-up) (define-key map "b" 'scroll-down) (define-key map 'backspace 'scroll-down) (define-key map 'delete 'scroll-down) (define-key map " " 'view-scroll-lines-up) (define-key map "\n" 'view-scroll-lines-up) (define-key map "e" 'view-scroll-lines-up) (define-key map "j" 'view-scroll-lines-up) (define-key map "y" 'view-scroll-lines-down) (define-key map "k" 'view-scroll-lines-down) (define-key map "d" 'view-scroll-some-lines-up) (define-key map "u" 'view-scroll-some-lines-down) (define-key map "r" 'recenter) (define-key map "t" 'toggle-truncate-lines) (define-key map "N" 'view-buffer) (define-key map "E" 'view-file) (define-key map "P" 'view-buffer) (define-key map "!" 'shell-command) (define-key map "|" 'shell-command-on-region) (define-key map "=" 'what-line) (define-key map "?" 'view-search-backward) (define-key map "h" 'view-mode-describe) (define-key map "s" 'view-repeat-search) (define-key map "n" 'view-repeat-search) (define-key map "/" 'view-search-forward) (define-key map "\\" 'view-search-backward) (define-key map "g" 'view-goto-line) (define-key map "G" 'view-last-windowful) (define-key map "%" 'view-goto-percent) (define-key map "p" 'view-goto-percent) (define-key map "m" 'point-to-register) (define-key map "'" 'register-to-point) (define-key map "C" 'view-cleanup-backspaces) (define-key map "" 'view-quit) (define-key map "" 'view-quit-toggle-ro) (define-key map "q" 'view-quit) map))
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1454
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1455 (defvar view-mode-map (let ((map (copy-keymap view-minor-mode-map))) (set-keymap-name map 'view-mode-map) map))
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1456
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1457 (autoload 'view-file "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1458 Find FILE, enter view mode. With prefix arg OTHER-P, use other window." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1459
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1460 (autoload 'view-buffer "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1461 Switch to BUF, enter view mode. With prefix arg use other window." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1462
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1463 (autoload 'view-file-other-window "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1464 Find FILE in other window, and enter view mode." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1465
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1466 (autoload 'view-buffer-other-window "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1467 Switch to BUFFER in another window, and enter view mode." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1468
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1469 (autoload 'view-minor-mode "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1470 Minor mode for viewing text, with bindings like `less'.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1471 Commands are:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1472 \\<view-minor-mode-map>
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1473 0..9 prefix args
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1474 - prefix minus
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1475 \\[scroll-up] page forward
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1476 \\[scroll-down] page back
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1477 \\[view-scroll-lines-up] scroll prefix-arg lines forward, default 1.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1478 \\[view-scroll-lines-down] scroll prefix-arg lines backward, default 1.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1479 \\[view-scroll-some-lines-down] scroll prefix-arg lines backward, default 10.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1480 \\[view-scroll-some-lines-up] scroll prefix-arg lines forward, default 10.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1481 \\[what-line] print line number
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1482 \\[view-mode-describe] print this help message
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1483 \\[view-search-forward] regexp search, uses previous string if you just hit RET
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1484 \\[view-search-backward] as above but searches backward
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1485 \\[view-repeat-search] repeat last search
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1486 \\[view-goto-line] goto line prefix-arg, default 1
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1487 \\[view-last-windowful] goto line prefix-arg, default last line
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1488 \\[view-goto-percent] goto a position by percentage
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1489 \\[toggle-truncate-lines] toggle truncate-lines
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1490 \\[view-file] view another file
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1491 \\[view-buffer] view another buffer
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1492 \\[view-cleanup-backspaces] cleanup backspace constructions
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1493 \\[shell-command] execute a shell command
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1494 \\[shell-command-on-region] execute a shell command with the region as input
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1495 \\[view-quit] exit view-mode, and bury the current buffer.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1496
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1497 If invoked with the optional (prefix) arg non-nil, view-mode cleans up
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1498 backspace constructions.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1499
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1500 More precisely:
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1501 \\{view-minor-mode-map}" t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1502
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1503 (autoload 'view-mode "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1504 View the current buffer using view-minor-mode. This exists to be 99.9%
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1505 compatible with the implementations of `view-mode' in view.el and older
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1506 versions of view-less.el." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1507
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1508 (autoload 'view-major-mode "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1509 View the current buffer using view-mode, as a major mode.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1510 This function has a nonstandard name because `view-mode' is wrongly
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1511 named but is like this for compatibility reasons." t nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1512
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1513 (autoload 'auto-view-mode "view-less" "\
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1514 If the file of the current buffer is not writable, call view-mode.
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1515 This is meant to be added to `find-file-hooks'." nil nil)
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1516
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1517 ;;;***
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1518
209
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1519 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1520
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1521 (autoload 'widget-browse-at "wid-browse" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1522 Browse the widget under point." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1523
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1524 (autoload 'widget-browse "wid-browse" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1525 Create a widget browser for WIDGET." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1526
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1527 (autoload 'widget-browse-other-window "wid-browse" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1528 Show widget browser for WIDGET in other window." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1529
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1530 (autoload 'widget-minor-mode "wid-browse" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1531 Togle minor mode for traversing widgets.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1532 With arg, turn widget mode on if and only if arg is positive." t nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1533
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1534 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1535
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1536 ;;;### (autoloads (widget-delete widget-create widget-prompt-value) "wid-edit" "lisp/wid-edit.el")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1537
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1538 (autoload 'widget-prompt-value "wid-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1539 Prompt for a value matching WIDGET, using PROMPT.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1540 The current value is assumed to be VALUE, unless UNBOUND is non-nil." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1541
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1542 (autoload 'widget-create "wid-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1543 Create widget of TYPE.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1544 The optional ARGS are additional keyword arguments." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1545
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1546 (autoload 'widget-delete "wid-edit" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1547 Delete WIDGET." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1548
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1549 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1550
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1551 ;;;### (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")
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1552
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1553 (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)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1554
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1555 (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)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1556
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1557 (fset 'install-font-menus 'reset-device-font-menus)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1558
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1559 (autoload 'reset-device-font-menus "x-font-menu" "\
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1560 Generates the `Font', `Size', and `Weight' submenus for the Options menu.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1561 This is run the first time that a font-menu is needed for each device.
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1562 If you don't like the lazy invocation of this function, you can add it to
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1563 `create-device-hook' and that will make the font menus respond more quickly
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1564 when they are selected for the first time. If you add fonts to your system,
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1565 or if you change your font path, you can call this to re-initialize the menus." nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1566
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1567 (autoload 'font-menu-family-constructor "x-font-menu" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1568
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1569 (autoload 'font-menu-size-constructor "x-font-menu" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1570
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1571 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil)
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1572
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1573 ;;;***
41ff10fd062f Import from CVS: tag r20-4b3
cvs
parents:
diff changeset
1574
217
d44af0c54775 Import from CVS: tag r20-4b7
cvs
parents: 209
diff changeset
1575 (provide 'Standard-autoloads)