*** empty log message ***
[bpt/emacs.git] / lispref / modes.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2003
4 @c Free Software Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @setfilename ../info/modes
7 @node Modes, Documentation, Keymaps, Top
8 @chapter Major and Minor Modes
9 @cindex mode
10
11 A @dfn{mode} is a set of definitions that customize Emacs and can be
12 turned on and off while you edit. There are two varieties of modes:
13 @dfn{major modes}, which are mutually exclusive and used for editing
14 particular kinds of text, and @dfn{minor modes}, which provide features
15 that users can enable individually.
16
17 This chapter describes how to write both major and minor modes, how to
18 indicate them in the mode line, and how they run hooks supplied by the
19 user. For related topics such as keymaps and syntax tables, see
20 @ref{Keymaps}, and @ref{Syntax Tables}.
21
22 @menu
23 * Major Modes:: Defining major modes.
24 * Minor Modes:: Defining minor modes.
25 * Mode Line Format:: Customizing the text that appears in the mode line.
26 * Imenu:: How a mode can provide a menu
27 of definitions in the buffer.
28 * Font Lock Mode:: How modes can highlight text according to syntax.
29 * Desktop Save Mode:: How modes can have buffer state saved between
30 Emacs sessions.
31 * Hooks:: How to use hooks; how to write code that provides hooks.
32 @end menu
33
34 @node Major Modes
35 @section Major Modes
36 @cindex major mode
37 @cindex Fundamental mode
38
39 Major modes specialize Emacs for editing particular kinds of text.
40 Each buffer has only one major mode at a time. For each major mode
41 there is a function to switch to that mode in the current buffer; its
42 name should end in @samp{-mode}. These functions work by setting
43 buffer-local variable bindings and other data associated with the
44 buffer, such as a local keymap. The effect lasts until you switch
45 to another major mode in the same buffer.
46
47 The least specialized major mode is called @dfn{Fundamental mode}.
48 This mode has no mode-specific definitions or variable settings, so each
49 Emacs command behaves in its default manner, and each option is in its
50 default state. All other major modes redefine various keys and options.
51 For example, Lisp Interaction mode provides special key bindings for
52 @kbd{C-j} (@code{eval-print-last-sexp}), @key{TAB}
53 (@code{lisp-indent-line}), and other keys.
54
55 When you need to write several editing commands to help you perform a
56 specialized editing task, creating a new major mode is usually a good
57 idea. In practice, writing a major mode is easy (in contrast to
58 writing a minor mode, which is often difficult).
59
60 If the new mode is similar to an old one, it is often unwise to modify
61 the old one to serve two purposes, since it may become harder to use and
62 maintain. Instead, copy and rename an existing major mode definition
63 and alter the copy---or define a @dfn{derived mode} (@pxref{Derived
64 Modes}). For example, Rmail Edit mode, which is in
65 @file{emacs/lisp/mail/rmailedit.el}, is a major mode that is very similar to
66 Text mode except that it provides two additional commands. Its
67 definition is distinct from that of Text mode, but uses that of Text mode.
68
69 Even if the new mode is not an obvious derivative of any other mode,
70 it is convenient to use @code{define-derived-mode} with a @code{nil}
71 parent argument, since it automatically enforces the most important
72 coding conventions for you.
73
74 @findex define-generic-mode
75 For a very simple programming language major mode that handles
76 comments and fontification, you can use @code{define-generic-mode}
77 in @file{generic.el}.
78
79 Rmail Edit mode offers an example of changing the major mode
80 temporarily for a buffer, so it can be edited in a different way (with
81 ordinary Emacs commands rather than Rmail commands). In such cases, the
82 temporary major mode usually provides a command to switch back to the
83 buffer's usual mode (Rmail mode, in this case). You might be tempted to
84 present the temporary redefinitions inside a recursive edit and restore
85 the usual ones when the user exits; but this is a bad idea because it
86 constrains the user's options when it is done in more than one buffer:
87 recursive edits must be exited most-recently-entered first. Using an
88 alternative major mode avoids this limitation. @xref{Recursive
89 Editing}.
90
91 The standard GNU Emacs Lisp library directory tree contains the code
92 for several major modes, in files such as @file{text-mode.el},
93 @file{texinfo.el}, @file{lisp-mode.el}, @file{c-mode.el}, and
94 @file{rmail.el}. They are found in various subdirectories of the
95 @file{lisp} directory. You can study these libraries to see how modes
96 are written. Text mode is perhaps the simplest major mode aside from
97 Fundamental mode. Rmail mode is a complicated and specialized mode.
98
99 @menu
100 * Major Mode Conventions:: Coding conventions for keymaps, etc.
101 * Example Major Modes:: Text mode and Lisp modes.
102 * Auto Major Mode:: How Emacs chooses the major mode automatically.
103 * Mode Help:: Finding out how to use a mode.
104 * Derived Modes:: Defining a new major mode based on another major
105 mode.
106 @end menu
107
108 @node Major Mode Conventions
109 @subsection Major Mode Conventions
110
111 The code for existing major modes follows various coding conventions,
112 including conventions for local keymap and syntax table initialization,
113 global names, and hooks. Please follow these conventions when you
114 define a new major mode.
115
116 This list of conventions is only partial, because each major mode
117 should aim for consistency in general with other Emacs major modes.
118 This makes Emacs as a whole more coherent. It is impossible to list
119 here all the possible points where this issue might come up; if the
120 Emacs developers point out an area where your major mode deviates from
121 the usual conventions, please make it compatible.
122
123 @itemize @bullet
124 @item
125 Define a command whose name ends in @samp{-mode}, with no arguments,
126 that switches to the new mode in the current buffer. This command
127 should set up the keymap, syntax table, and buffer-local variables in an
128 existing buffer, without changing the buffer's contents.
129
130 @item
131 Write a documentation string for this command that describes the
132 special commands available in this mode. @kbd{C-h m}
133 (@code{describe-mode}) in your mode will display this string.
134
135 The documentation string may include the special documentation
136 substrings, @samp{\[@var{command}]}, @samp{\@{@var{keymap}@}}, and
137 @samp{\<@var{keymap}>}, which enable the documentation to adapt
138 automatically to the user's own key bindings. @xref{Keys in
139 Documentation}.
140
141 @item
142 The major mode command should start by calling
143 @code{kill-all-local-variables}. This is what gets rid of the
144 buffer-local variables of the major mode previously in effect.
145
146 @item
147 The major mode command should set the variable @code{major-mode} to the
148 major mode command symbol. This is how @code{describe-mode} discovers
149 which documentation to print.
150
151 @item
152 The major mode command should set the variable @code{mode-name} to the
153 ``pretty'' name of the mode, as a string. This string appears in the
154 mode line.
155
156 @item
157 @cindex functions in modes
158 Since all global names are in the same name space, all the global
159 variables, constants, and functions that are part of the mode should
160 have names that start with the major mode name (or with an abbreviation
161 of it if the name is long). @xref{Coding Conventions}.
162
163 @item
164 In a major mode for editing some kind of structured text, such as a
165 programming language, indentation of text according to structure is
166 probably useful. So the mode should set @code{indent-line-function}
167 to a suitable function, and probably customize other variables
168 for indentation.
169
170 @item
171 @cindex keymaps in modes
172 The major mode should usually have its own keymap, which is used as the
173 local keymap in all buffers in that mode. The major mode command should
174 call @code{use-local-map} to install this local map. @xref{Active
175 Keymaps}, for more information.
176
177 This keymap should be stored permanently in a global variable named
178 @code{@var{modename}-mode-map}. Normally the library that defines the
179 mode sets this variable.
180
181 @xref{Tips for Defining}, for advice about how to write the code to set
182 up the mode's keymap variable.
183
184 @item
185 The key sequences bound in a major mode keymap should usually start with
186 @kbd{C-c}, followed by a control character, a digit, or @kbd{@{},
187 @kbd{@}}, @kbd{<}, @kbd{>}, @kbd{:} or @kbd{;}. The other punctuation
188 characters are reserved for minor modes, and ordinary letters are
189 reserved for users.
190
191 It is reasonable for a major mode to rebind a key sequence with a
192 standard meaning, if it implements a command that does ``the same job''
193 in a way that fits the major mode better. For example, a major mode for
194 editing a programming language might redefine @kbd{C-M-a} to ``move to
195 the beginning of a function'' in a way that works better for that
196 language.
197
198 Major modes such as Dired or Rmail that do not allow self-insertion of
199 text can reasonably redefine letters and other printing characters as
200 editing commands. Dired and Rmail both do this.
201
202 @item
203 Major modes must not define @key{RET} to do anything other than insert
204 a newline. The command to insert a newline and then indent is
205 @kbd{C-j}. Please keep this distinction uniform for all major modes.
206
207 @item
208 Major modes should not alter options that are primarily a matter of user
209 preference, such as whether Auto-Fill mode is enabled. Leave this to
210 each user to decide. However, a major mode should customize other
211 variables so that Auto-Fill mode will work usefully @emph{if} the user
212 decides to use it.
213
214 @item
215 @cindex syntax tables in modes
216 The mode may have its own syntax table or may share one with other
217 related modes. If it has its own syntax table, it should store this in
218 a variable named @code{@var{modename}-mode-syntax-table}. @xref{Syntax
219 Tables}.
220
221 @item
222 If the mode handles a language that has a syntax for comments, it should
223 set the variables that define the comment syntax. @xref{Options for
224 Comments,, Options Controlling Comments, emacs, The GNU Emacs Manual}.
225
226 @item
227 @cindex abbrev tables in modes
228 The mode may have its own abbrev table or may share one with other
229 related modes. If it has its own abbrev table, it should store this in
230 a variable named @code{@var{modename}-mode-abbrev-table}. @xref{Abbrev
231 Tables}.
232
233 @item
234 The mode should specify how to do highlighting for Font Lock mode, by
235 setting up a buffer-local value for the variable
236 @code{font-lock-defaults} (@pxref{Font Lock Mode}).
237
238 @item
239 The mode should specify how Imenu should find the definitions or
240 sections of a buffer, by setting up a buffer-local value for the
241 variable @code{imenu-generic-expression}, for the pair of variables
242 @code{imenu-prev-index-position-function} and
243 @code{imenu-extract-index-name-function}, or for the variable
244 @code{imenu-create-index-function} (@pxref{Imenu}).
245
246 @item
247 Use @code{defvar} or @code{defcustom} to set mode-related variables, so
248 that they are not reinitialized if they already have a value. (Such
249 reinitialization could discard customizations made by the user.)
250
251 @item
252 @cindex buffer-local variables in modes
253 To make a buffer-local binding for an Emacs customization variable, use
254 @code{make-local-variable} in the major mode command, not
255 @code{make-variable-buffer-local}. The latter function would make the
256 variable local to every buffer in which it is subsequently set, which
257 would affect buffers that do not use this mode. It is undesirable for a
258 mode to have such global effects. @xref{Buffer-Local Variables}.
259
260 With rare exceptions, the only reasonable way to use
261 @code{make-variable-buffer-local} in a Lisp package is for a variable
262 which is used only within that package. Using it on a variable used by
263 other packages would interfere with them.
264
265 @item
266 @cindex mode hook
267 @cindex major mode hook
268 Each major mode should have a @dfn{mode hook} named
269 @code{@var{modename}-mode-hook}. The major mode command should run that
270 hook, with @code{run-mode-hooks}, as the very last thing it
271 does. @xref{Hooks}.
272
273 @item
274 The major mode command may start by calling some other major mode
275 command (called the @dfn{parent mode}) and then alter some of its
276 settings. A mode that does this is called a @dfn{derived mode}. The
277 recommended way to define one is to use @code{define-derived-mode},
278 but this is not required. Such a mode should use
279 @code{delay-mode-hooks} around its entire body, including the call to
280 the parent mode command and the final call to @code{run-mode-hooks}.
281 (Using @code{define-derived-mode} does this automatically.)
282
283 @item
284 If something special should be done if the user switches a buffer from
285 this mode to any other major mode, this mode can set up a buffer-local
286 value for @code{change-major-mode-hook} (@pxref{Creating Buffer-Local}).
287
288 @item
289 If this mode is appropriate only for specially-prepared text, then the
290 major mode command symbol should have a property named @code{mode-class}
291 with value @code{special}, put on as follows:
292
293 @kindex mode-class @r{(property)}
294 @cindex @code{special}
295 @example
296 (put 'funny-mode 'mode-class 'special)
297 @end example
298
299 @noindent
300 This tells Emacs that new buffers created while the current buffer is in
301 Funny mode should not inherit Funny mode. Modes such as Dired, Rmail,
302 and Buffer List use this feature.
303
304 @item
305 If you want to make the new mode the default for files with certain
306 recognizable names, add an element to @code{auto-mode-alist} to select
307 the mode for those file names. If you define the mode command to
308 autoload, you should add this element in the same file that calls
309 @code{autoload}. Otherwise, it is sufficient to add the element in the
310 file that contains the mode definition. @xref{Auto Major Mode}.
311
312 @item
313 In the documentation, you should provide a sample @code{autoload} form
314 and an example of how to add to @code{auto-mode-alist}, that users can
315 include in their init files (@pxref{Init File}).
316
317 @item
318 @cindex mode loading
319 The top-level forms in the file defining the mode should be written so
320 that they may be evaluated more than once without adverse consequences.
321 Even if you never load the file more than once, someone else will.
322 @end itemize
323
324 @node Example Major Modes
325 @subsection Major Mode Examples
326
327 Text mode is perhaps the simplest mode besides Fundamental mode.
328 Here are excerpts from @file{text-mode.el} that illustrate many of
329 the conventions listed above:
330
331 @smallexample
332 @group
333 ;; @r{Create mode-specific tables.}
334 (defvar text-mode-syntax-table nil
335 "Syntax table used while in text mode.")
336 @end group
337
338 @group
339 (if text-mode-syntax-table
340 () ; @r{Do not change the table if it is already set up.}
341 (setq text-mode-syntax-table (make-syntax-table))
342 (modify-syntax-entry ?\" ". " text-mode-syntax-table)
343 (modify-syntax-entry ?\\ ". " text-mode-syntax-table)
344 (modify-syntax-entry ?' "w " text-mode-syntax-table))
345 @end group
346
347 @group
348 (defvar text-mode-abbrev-table nil
349 "Abbrev table used while in text mode.")
350 (define-abbrev-table 'text-mode-abbrev-table ())
351 @end group
352
353 @group
354 (defvar text-mode-map nil ; @r{Create a mode-specific keymap.}
355 "Keymap for Text mode.
356 Many other modes, such as Mail mode, Outline mode and Indented Text mode,
357 inherit all the commands defined in this map.")
358
359 (if text-mode-map
360 () ; @r{Do not change the keymap if it is already set up.}
361 (setq text-mode-map (make-sparse-keymap))
362 (define-key text-mode-map "\e\t" 'ispell-complete-word)
363 (define-key text-mode-map "\t" 'indent-relative)
364 (define-key text-mode-map "\es" 'center-line)
365 (define-key text-mode-map "\eS" 'center-paragraph))
366 @end group
367 @end smallexample
368
369 This was formerly the complete major mode function definition for Text mode:
370
371 @smallexample
372 @group
373 (defun text-mode ()
374 "Major mode for editing text intended for humans to read...
375 Special commands: \\@{text-mode-map@}
376 @end group
377 @group
378 Turning on text-mode runs the hook `text-mode-hook'."
379 (interactive)
380 (kill-all-local-variables)
381 (use-local-map text-mode-map)
382 @end group
383 @group
384 (setq local-abbrev-table text-mode-abbrev-table)
385 (set-syntax-table text-mode-syntax-table)
386 @end group
387 @group
388 (make-local-variable 'paragraph-start)
389 (setq paragraph-start (concat "[ \t]*$\\|" page-delimiter))
390 (make-local-variable 'paragraph-separate)
391 (setq paragraph-separate paragraph-start)
392 (make-local-variable 'indent-line-function)
393 (setq indent-line-function 'indent-relative-maybe)
394 @end group
395 @group
396 (setq mode-name "Text")
397 (setq major-mode 'text-mode)
398 (run-mode-hooks 'text-mode-hook)) ; @r{Finally, this permits the user to}
399 ; @r{customize the mode with a hook.}
400 @end group
401 @end smallexample
402
403 @cindex @file{lisp-mode.el}
404 The three Lisp modes (Lisp mode, Emacs Lisp mode, and Lisp
405 Interaction mode) have more features than Text mode and the code is
406 correspondingly more complicated. Here are excerpts from
407 @file{lisp-mode.el} that illustrate how these modes are written.
408
409 @cindex syntax table example
410 @smallexample
411 @group
412 ;; @r{Create mode-specific table variables.}
413 (defvar lisp-mode-syntax-table nil "")
414 (defvar emacs-lisp-mode-syntax-table nil "")
415 (defvar lisp-mode-abbrev-table nil "")
416 @end group
417
418 @group
419 (if (not emacs-lisp-mode-syntax-table) ; @r{Do not change the table}
420 ; @r{if it is already set.}
421 (let ((i 0))
422 (setq emacs-lisp-mode-syntax-table (make-syntax-table))
423 @end group
424
425 @group
426 ;; @r{Set syntax of chars up to 0 to class of chars that are}
427 ;; @r{part of symbol names but not words.}
428 ;; @r{(The number 0 is @code{48} in the @acronym{ASCII} character set.)}
429 (while (< i ?0)
430 (modify-syntax-entry i "_ " emacs-lisp-mode-syntax-table)
431 (setq i (1+ i)))
432 @dots{}
433 @end group
434 @group
435 ;; @r{Set the syntax for other characters.}
436 (modify-syntax-entry ? " " emacs-lisp-mode-syntax-table)
437 (modify-syntax-entry ?\t " " emacs-lisp-mode-syntax-table)
438 @dots{}
439 @end group
440 @group
441 (modify-syntax-entry ?\( "() " emacs-lisp-mode-syntax-table)
442 (modify-syntax-entry ?\) ")( " emacs-lisp-mode-syntax-table)
443 @dots{}))
444 ;; @r{Create an abbrev table for lisp-mode.}
445 (define-abbrev-table 'lisp-mode-abbrev-table ())
446 @end group
447 @end smallexample
448
449 Much code is shared among the three Lisp modes. The following
450 function sets various variables; it is called by each of the major Lisp
451 mode functions:
452
453 @smallexample
454 @group
455 (defun lisp-mode-variables (lisp-syntax)
456 (cond (lisp-syntax
457 (set-syntax-table lisp-mode-syntax-table)))
458 (setq local-abbrev-table lisp-mode-abbrev-table)
459 @dots{}
460 @end group
461 @end smallexample
462
463 Functions such as @code{forward-paragraph} use the value of the
464 @code{paragraph-start} variable. Since Lisp code is different from
465 ordinary text, the @code{paragraph-start} variable needs to be set
466 specially to handle Lisp. Also, comments are indented in a special
467 fashion in Lisp and the Lisp modes need their own mode-specific
468 @code{comment-indent-function}. The code to set these variables is the
469 rest of @code{lisp-mode-variables}.
470
471 @smallexample
472 @group
473 (make-local-variable 'paragraph-start)
474 (setq paragraph-start (concat page-delimiter "\\|$" ))
475 (make-local-variable 'paragraph-separate)
476 (setq paragraph-separate paragraph-start)
477 @dots{}
478 @end group
479 @group
480 (make-local-variable 'comment-indent-function)
481 (setq comment-indent-function 'lisp-comment-indent))
482 @dots{}
483 @end group
484 @end smallexample
485
486 Each of the different Lisp modes has a slightly different keymap. For
487 example, Lisp mode binds @kbd{C-c C-z} to @code{run-lisp}, but the other
488 Lisp modes do not. However, all Lisp modes have some commands in
489 common. The following code sets up the common commands:
490
491 @smallexample
492 @group
493 (defvar shared-lisp-mode-map ()
494 "Keymap for commands shared by all sorts of Lisp modes.")
495
496 (if shared-lisp-mode-map
497 ()
498 (setq shared-lisp-mode-map (make-sparse-keymap))
499 (define-key shared-lisp-mode-map "\e\C-q" 'indent-sexp)
500 (define-key shared-lisp-mode-map "\177"
501 'backward-delete-char-untabify))
502 @end group
503 @end smallexample
504
505 @noindent
506 And here is the code to set up the keymap for Lisp mode:
507
508 @smallexample
509 @group
510 (defvar lisp-mode-map ()
511 "Keymap for ordinary Lisp mode...")
512
513 (if lisp-mode-map
514 ()
515 (setq lisp-mode-map (make-sparse-keymap))
516 (set-keymap-parent lisp-mode-map shared-lisp-mode-map)
517 (define-key lisp-mode-map "\e\C-x" 'lisp-eval-defun)
518 (define-key lisp-mode-map "\C-c\C-z" 'run-lisp))
519 @end group
520 @end smallexample
521
522 Finally, here is the complete major mode function definition for
523 Lisp mode.
524
525 @smallexample
526 @group
527 (defun lisp-mode ()
528 "Major mode for editing Lisp code for Lisps other than GNU Emacs Lisp.
529 Commands:
530 Delete converts tabs to spaces as it moves back.
531 Blank lines separate paragraphs. Semicolons start comments.
532 \\@{lisp-mode-map@}
533 Note that `run-lisp' may be used either to start an inferior Lisp job
534 or to switch back to an existing one.
535 @end group
536
537 @group
538 Entry to this mode calls the value of `lisp-mode-hook'
539 if that value is non-nil."
540 (interactive)
541 (kill-all-local-variables)
542 @end group
543 @group
544 (use-local-map lisp-mode-map) ; @r{Select the mode's keymap.}
545 (setq major-mode 'lisp-mode) ; @r{This is how @code{describe-mode}}
546 ; @r{finds out what to describe.}
547 (setq mode-name "Lisp") ; @r{This goes into the mode line.}
548 (lisp-mode-variables t) ; @r{This defines various variables.}
549 @end group
550 @group
551 (setq imenu-case-fold-search t)
552 (set-syntax-table lisp-mode-syntax-table)
553 (run-mode-hooks 'lisp-mode-hook)) ; @r{This permits the user to use a}
554 ; @r{hook to customize the mode.}
555 @end group
556 @end smallexample
557
558 @node Auto Major Mode
559 @subsection How Emacs Chooses a Major Mode
560
561 Based on information in the file name or in the file itself, Emacs
562 automatically selects a major mode for the new buffer when a file is
563 visited. It also processes local variables specified in the file text.
564
565 @deffn Command fundamental-mode
566 Fundamental mode is a major mode that is not specialized for anything
567 in particular. Other major modes are defined in effect by comparison
568 with this one---their definitions say what to change, starting from
569 Fundamental mode. The @code{fundamental-mode} function does @emph{not}
570 run any hooks; you're not supposed to customize it. (If you want Emacs
571 to behave differently in Fundamental mode, change the @emph{global}
572 state of Emacs.)
573 @end deffn
574
575 @deffn Command normal-mode &optional find-file
576 This function establishes the proper major mode and buffer-local variable
577 bindings for the current buffer. First it calls @code{set-auto-mode},
578 then it runs @code{hack-local-variables} to parse, and bind or
579 evaluate as appropriate, the file's local variables.
580
581 If the @var{find-file} argument to @code{normal-mode} is non-@code{nil},
582 @code{normal-mode} assumes that the @code{find-file} function is calling
583 it. In this case, it may process a local variables list at the end of
584 the file and in the @samp{-*-} line. The variable
585 @code{enable-local-variables} controls whether to do so. @xref{File
586 variables, , Local Variables in Files, emacs, The GNU Emacs Manual}, for
587 the syntax of the local variables section of a file.
588
589 If you run @code{normal-mode} interactively, the argument
590 @var{find-file} is normally @code{nil}. In this case,
591 @code{normal-mode} unconditionally processes any local variables list.
592
593 @cindex file mode specification error
594 @code{normal-mode} uses @code{condition-case} around the call to the
595 major mode function, so errors are caught and reported as a @samp{File
596 mode specification error}, followed by the original error message.
597 @end deffn
598
599 @defun set-auto-mode
600 @cindex visited file mode
601 This function selects the major mode that is appropriate for the
602 current buffer. It may base its decision on the value of the @w{@samp{-*-}}
603 line, on the visited file name (using @code{auto-mode-alist}), on the
604 @w{@samp{#!}} line (using @code{interpreter-mode-alist}), or on the
605 file's local variables list. However, this function does not look for
606 the @samp{mode:} local variable near the end of a file; the
607 @code{hack-local-variables} function does that. @xref{Choosing Modes, ,
608 How Major Modes are Chosen, emacs, The GNU Emacs Manual}.
609 @end defun
610
611 @defopt default-major-mode
612 This variable holds the default major mode for new buffers. The
613 standard value is @code{fundamental-mode}.
614
615 If the value of @code{default-major-mode} is @code{nil}, Emacs uses
616 the (previously) current buffer's major mode for the major mode of a new
617 buffer. However, if that major mode symbol has a @code{mode-class}
618 property with value @code{special}, then it is not used for new buffers;
619 Fundamental mode is used instead. The modes that have this property are
620 those such as Dired and Rmail that are useful only with text that has
621 been specially prepared.
622 @end defopt
623
624 @defun set-buffer-major-mode buffer
625 This function sets the major mode of @var{buffer} to the value of
626 @code{default-major-mode}. If that variable is @code{nil}, it uses
627 the current buffer's major mode (if that is suitable).
628
629 The low-level primitives for creating buffers do not use this function,
630 but medium-level commands such as @code{switch-to-buffer} and
631 @code{find-file-noselect} use it whenever they create buffers.
632 @end defun
633
634 @defvar initial-major-mode
635 @cindex @samp{*scratch*}
636 The value of this variable determines the major mode of the initial
637 @samp{*scratch*} buffer. The value should be a symbol that is a major
638 mode command. The default value is @code{lisp-interaction-mode}.
639 @end defvar
640
641 @defvar auto-mode-alist
642 This variable contains an association list of file name patterns
643 (regular expressions; @pxref{Regular Expressions}) and corresponding
644 major mode commands. Usually, the file name patterns test for suffixes,
645 such as @samp{.el} and @samp{.c}, but this need not be the case. An
646 ordinary element of the alist looks like @code{(@var{regexp} .
647 @var{mode-function})}.
648
649 For example,
650
651 @smallexample
652 @group
653 (("\\`/tmp/fol/" . text-mode)
654 ("\\.texinfo\\'" . texinfo-mode)
655 ("\\.texi\\'" . texinfo-mode)
656 @end group
657 @group
658 ("\\.el\\'" . emacs-lisp-mode)
659 ("\\.c\\'" . c-mode)
660 ("\\.h\\'" . c-mode)
661 @dots{})
662 @end group
663 @end smallexample
664
665 When you visit a file whose expanded file name (@pxref{File Name
666 Expansion}) matches a @var{regexp}, @code{set-auto-mode} calls the
667 corresponding @var{mode-function}. This feature enables Emacs to select
668 the proper major mode for most files.
669
670 If an element of @code{auto-mode-alist} has the form @code{(@var{regexp}
671 @var{function} t)}, then after calling @var{function}, Emacs searches
672 @code{auto-mode-alist} again for a match against the portion of the file
673 name that did not match before. This feature is useful for
674 uncompression packages: an entry of the form @code{("\\.gz\\'"
675 @var{function} t)} can uncompress the file and then put the uncompressed
676 file in the proper mode according to the name sans @samp{.gz}.
677
678 Here is an example of how to prepend several pattern pairs to
679 @code{auto-mode-alist}. (You might use this sort of expression in your
680 init file.)
681
682 @smallexample
683 @group
684 (setq auto-mode-alist
685 (append
686 ;; @r{File name (within directory) starts with a dot.}
687 '(("/\\.[^/]*\\'" . fundamental-mode)
688 ;; @r{File name has no dot.}
689 ("[^\\./]*\\'" . fundamental-mode)
690 ;; @r{File name ends in @samp{.C}.}
691 ("\\.C\\'" . c++-mode))
692 auto-mode-alist))
693 @end group
694 @end smallexample
695 @end defvar
696
697 @defvar interpreter-mode-alist
698 This variable specifies major modes to use for scripts that specify a
699 command interpreter in a @samp{#!} line. Its value is a list of
700 elements of the form @code{(@var{interpreter} . @var{mode})}; for
701 example, @code{("perl" . perl-mode)} is one element present by default.
702 The element says to use mode @var{mode} if the file specifies
703 an interpreter which matches @var{interpreter}. The value of
704 @var{interpreter} is actually a regular expression.
705
706 This variable is applicable only when the @code{auto-mode-alist} does
707 not indicate which major mode to use.
708 @end defvar
709
710 @node Mode Help
711 @subsection Getting Help about a Major Mode
712 @cindex mode help
713 @cindex help for major mode
714 @cindex documentation for major mode
715
716 The @code{describe-mode} function is used to provide information
717 about major modes. It is normally called with @kbd{C-h m}. The
718 @code{describe-mode} function uses the value of @code{major-mode},
719 which is why every major mode function needs to set the
720 @code{major-mode} variable.
721
722 @deffn Command describe-mode
723 This function displays the documentation of the current major mode.
724
725 The @code{describe-mode} function calls the @code{documentation}
726 function using the value of @code{major-mode} as an argument. Thus, it
727 displays the documentation string of the major mode function.
728 (@xref{Accessing Documentation}.)
729 @end deffn
730
731 @defvar major-mode
732 This variable holds the symbol for the current buffer's major mode.
733 This symbol should have a function definition that is the command to
734 switch to that major mode. The @code{describe-mode} function uses the
735 documentation string of the function as the documentation of the major
736 mode.
737 @end defvar
738
739 @node Derived Modes
740 @subsection Defining Derived Modes
741
742 It's often useful to define a new major mode in terms of an existing
743 one. An easy way to do this is to use @code{define-derived-mode}.
744
745 @defmac define-derived-mode variant parent name docstring body@dots{}
746 This construct defines @var{variant} as a major mode command, using
747 @var{name} as the string form of the mode name.
748
749 The new command @var{variant} is defined to call the function
750 @var{parent}, then override certain aspects of that parent mode:
751
752 @itemize @bullet
753 @item
754 The new mode has its own keymap, named @code{@var{variant}-map}.
755 @code{define-derived-mode} initializes this map to inherit from
756 @code{@var{parent}-map}, if it is not already set.
757
758 @item
759 The new mode has its own syntax table, kept in the variable
760 @code{@var{variant}-syntax-table}.
761 @code{define-derived-mode} initializes this variable by copying
762 @code{@var{parent}-syntax-table}, if it is not already set.
763
764 @item
765 The new mode has its own abbrev table, kept in the variable
766 @code{@var{variant}-abbrev-table}.
767 @code{define-derived-mode} initializes this variable by copying
768 @code{@var{parent}-abbrev-table}, if it is not already set.
769
770 @item
771 The new mode has its own mode hook, @code{@var{variant}-hook},
772 which it runs in standard fashion as the very last thing that it does.
773 (The new mode also runs the mode hook of @var{parent} as part
774 of calling @var{parent}.)
775 @end itemize
776
777 In addition, you can specify how to override other aspects of
778 @var{parent} with @var{body}. The command @var{variant}
779 evaluates the forms in @var{body} after setting up all its usual
780 overrides, just before running @code{@var{variant}-hook}.
781
782 The argument @var{docstring} specifies the documentation string for the
783 new mode. If you omit @var{docstring}, @code{define-derived-mode}
784 generates a documentation string.
785
786 Here is a hypothetical example:
787
788 @example
789 (define-derived-mode hypertext-mode
790 text-mode "Hypertext"
791 "Major mode for hypertext.
792 \\@{hypertext-mode-map@}"
793 (setq case-fold-search nil))
794
795 (define-key hypertext-mode-map
796 [down-mouse-3] 'do-hyper-link)
797 @end example
798
799 Do not write an @code{interactive} spec in the definition;
800 @code{define-derived-mode} does that automatically.
801 @end defmac
802
803 @node Minor Modes
804 @section Minor Modes
805 @cindex minor mode
806
807 A @dfn{minor mode} provides features that users may enable or disable
808 independently of the choice of major mode. Minor modes can be enabled
809 individually or in combination. Minor modes would be better named
810 ``generally available, optional feature modes,'' except that such a name
811 would be unwieldy.
812
813 A minor mode is not usually meant as a variation of a single major mode.
814 Usually they are general and can apply to many major modes. For
815 example, Auto Fill mode works with any major mode that permits text
816 insertion. To be general, a minor mode must be effectively independent
817 of the things major modes do.
818
819 A minor mode is often much more difficult to implement than a major
820 mode. One reason is that you should be able to activate and deactivate
821 minor modes in any order. A minor mode should be able to have its
822 desired effect regardless of the major mode and regardless of the other
823 minor modes in effect.
824
825 Often the biggest problem in implementing a minor mode is finding a
826 way to insert the necessary hook into the rest of Emacs. Minor mode
827 keymaps make this easier than it used to be.
828
829 @defvar minor-mode-list
830 The value of this variable is a list of all minor mode commands.
831 @end defvar
832
833 @menu
834 * Minor Mode Conventions:: Tips for writing a minor mode.
835 * Keymaps and Minor Modes:: How a minor mode can have its own keymap.
836 * Defining Minor Modes:: A convenient facility for defining minor modes.
837 @end menu
838
839 @node Minor Mode Conventions
840 @subsection Conventions for Writing Minor Modes
841 @cindex minor mode conventions
842 @cindex conventions for writing minor modes
843
844 There are conventions for writing minor modes just as there are for
845 major modes. Several of the major mode conventions apply to minor
846 modes as well: those regarding the name of the mode initialization
847 function, the names of global symbols, and the use of keymaps and
848 other tables.
849
850 In addition, there are several conventions that are specific to
851 minor modes.
852
853 @itemize @bullet
854 @item
855 @cindex mode variable
856 Make a variable whose name ends in @samp{-mode} to control the minor
857 mode. We call this the @dfn{mode variable}. The minor mode command
858 should set this variable (@code{nil} to disable; anything else to
859 enable).
860
861 If possible, implement the mode so that setting the variable
862 automatically enables or disables the mode. Then the minor mode command
863 does not need to do anything except set the variable.
864
865 This variable is used in conjunction with the @code{minor-mode-alist} to
866 display the minor mode name in the mode line. It can also enable
867 or disable a minor mode keymap. Individual commands or hooks can also
868 check the variable's value.
869
870 If you want the minor mode to be enabled separately in each buffer,
871 make the variable buffer-local.
872
873 @item
874 Define a command whose name is the same as the mode variable.
875 Its job is to enable and disable the mode by setting the variable.
876
877 The command should accept one optional argument. If the argument is
878 @code{nil}, it should toggle the mode (turn it on if it is off, and
879 off if it is on). It should turn the mode on if the argument is a
880 positive integer, the symbol @code{t}, or a list whose @sc{car} is one
881 of those. It should turn the mode off if the argument is a negative
882 integer or zero, the symbol @code{-}, or a list whose @sc{car} is a
883 negative integer or zero. The meaning of other arguments is not
884 specified.
885
886 Here is an example taken from the definition of @code{transient-mark-mode}.
887 It shows the use of @code{transient-mark-mode} as a variable that enables or
888 disables the mode's behavior, and also shows the proper way to toggle,
889 enable or disable the minor mode based on the raw prefix argument value.
890
891 @smallexample
892 @group
893 (setq transient-mark-mode
894 (if (null arg) (not transient-mark-mode)
895 (> (prefix-numeric-value arg) 0)))
896 @end group
897 @end smallexample
898
899 @item
900 Add an element to @code{minor-mode-alist} for each minor mode
901 (@pxref{Mode Line Variables}), if you want to indicate the minor mode in
902 the mode line. This element should be a list of the following form:
903
904 @smallexample
905 (@var{mode-variable} @var{string})
906 @end smallexample
907
908 Here @var{mode-variable} is the variable that controls enabling of the
909 minor mode, and @var{string} is a short string, starting with a space,
910 to represent the mode in the mode line. These strings must be short so
911 that there is room for several of them at once.
912
913 When you add an element to @code{minor-mode-alist}, use @code{assq} to
914 check for an existing element, to avoid duplication. For example:
915
916 @smallexample
917 @group
918 (unless (assq 'leif-mode minor-mode-alist)
919 (setq minor-mode-alist
920 (cons '(leif-mode " Leif") minor-mode-alist)))
921 @end group
922 @end smallexample
923
924 @noindent
925 or like this, using @code{add-to-list} (@pxref{Setting Variables}):
926
927 @smallexample
928 @group
929 (add-to-list 'minor-mode-alist '(leif-mode " Leif"))
930 @end group
931 @end smallexample
932 @end itemize
933
934 Global minor modes distributed with Emacs should if possible support
935 enabling and disabling via Custom (@pxref{Customization}). To do this,
936 the first step is to define the mode variable with @code{defcustom}, and
937 specify @code{:type boolean}.
938
939 If just setting the variable is not sufficient to enable the mode, you
940 should also specify a @code{:set} method which enables the mode by
941 invoke the mode command. Note in the variable's documentation string that
942 setting the variable other than via Custom may not take effect.
943
944 Also mark the definition with an autoload cookie (@pxref{Autoload}),
945 and specify a @code{:require} so that customizing the variable will load
946 the library that defines the mode. This will copy suitable definitions
947 into @file{loaddefs.el} so that users can use @code{customize-option} to
948 enable the mode. For example:
949
950 @smallexample
951 @group
952
953 ;;;###autoload
954 (defcustom msb-mode nil
955 "Toggle msb-mode.
956 Setting this variable directly does not take effect;
957 use either \\[customize] or the function `msb-mode'."
958 :set (lambda (symbol value)
959 (msb-mode (or value 0)))
960 :initialize 'custom-initialize-default
961 :version "20.4"
962 :type 'boolean
963 :group 'msb
964 :require 'msb)
965 @end group
966 @end smallexample
967
968 @node Keymaps and Minor Modes
969 @subsection Keymaps and Minor Modes
970
971 Each minor mode can have its own keymap, which is active when the mode
972 is enabled. To set up a keymap for a minor mode, add an element to the
973 alist @code{minor-mode-map-alist}. @xref{Active Keymaps}.
974
975 @cindex @code{self-insert-command}, minor modes
976 One use of minor mode keymaps is to modify the behavior of certain
977 self-inserting characters so that they do something else as well as
978 self-insert. In general, this is the only way to do that, since the
979 facilities for customizing @code{self-insert-command} are limited to
980 special cases (designed for abbrevs and Auto Fill mode). (Do not try
981 substituting your own definition of @code{self-insert-command} for the
982 standard one. The editor command loop handles this function specially.)
983
984 The key sequences bound in a minor mode should consist of @kbd{C-c}
985 followed by a punctuation character @emph{other than} @kbd{@{},
986 @kbd{@}}, @kbd{<}, @kbd{>}, @kbd{:}, and @kbd{;}. (Those few punctuation
987 characters are reserved for major modes.)
988
989 @node Defining Minor Modes
990 @subsection Defining Minor Modes
991
992 The macro @code{define-minor-mode} offers a convenient way of
993 implementing a mode in one self-contained definition. It supports only
994 buffer-local minor modes, not global ones.
995
996 @defmac define-minor-mode mode doc [init-value [lighter [keymap keyword-args... body...]]]
997 @tindex define-minor-mode
998 This macro defines a new minor mode whose name is @var{mode} (a
999 symbol). It defines a command named @var{mode} to toggle the minor
1000 mode, with @var{doc} as its documentation string. It also defines a
1001 variable named @var{mode}, which is set to @code{t} or @code{nil} by
1002 enabling or disabling the mode. The variable is initialized to
1003 @var{init-value}.
1004
1005 The string @var{lighter} says what to display in the mode line
1006 when the mode is enabled; if it is @code{nil}, the mode is not displayed
1007 in the mode line.
1008
1009 The optional argument @var{keymap} specifies the keymap for the minor mode.
1010 It can be a variable name, whose value is the keymap, or it can be an alist
1011 specifying bindings in this form:
1012
1013 @example
1014 (@var{key-sequence} . @var{definition})
1015 @end example
1016
1017 The @var{keyword-args} consist of keywords followed by corresponding
1018 values. A few keywords have special meanings:
1019
1020 @table @code
1021 @item :global @var{global}
1022 If non-@code{nil} specifies that the minor mode should be global.
1023 By default, minor modes are buffer-local.
1024
1025 @item :init-value @var{init-value}
1026 This is equivalent to specifying @var{init-value} positionally.
1027
1028 @item :lighter @var{lighter}
1029 This is equivalent to specifying @var{lighter} positionally.
1030
1031 @item :keymap @var{keymap}
1032 This is equivalent to specifying @var{keymap} positionally.
1033 @end table
1034
1035 Any other keyword arguments are passed passed directly to the
1036 @code{defcustom} generated for the variable @var{mode}.
1037
1038 The command named @var{mode} finishes by executing the @var{body} forms,
1039 if any, after it has performed the standard actions such as setting
1040 the variable named @var{mode}.
1041 @end defmac
1042
1043 @findex easy-mmode-define-minor-mode
1044 The name @code{easy-mmode-define-minor-mode} is an alias
1045 for this macro.
1046
1047 Here is an example of using @code{define-minor-mode}:
1048
1049 @smallexample
1050 (define-minor-mode hungry-mode
1051 "Toggle Hungry mode.
1052 With no argument, this command toggles the mode.
1053 Non-null prefix argument turns on the mode.
1054 Null prefix argument turns off the mode.
1055
1056 When Hungry mode is enabled, the control delete key
1057 gobbles all preceding whitespace except the last.
1058 See the command \\[hungry-electric-delete]."
1059 ;; The initial value.
1060 nil
1061 ;; The indicator for the mode line.
1062 " Hungry"
1063 ;; The minor mode bindings.
1064 '(("\C-\^?" . hungry-electric-delete)
1065 ("\C-\M-\^?"
1066 . (lambda ()
1067 (interactive)
1068 (hungry-electric-delete t))))
1069 :group 'hunger)
1070 @end smallexample
1071
1072 @noindent
1073 This defines a minor mode named ``Hungry mode'', a command named
1074 @code{hungry-mode} to toggle it, a variable named @code{hungry-mode}
1075 which indicates whether the mode is enabled, and a variable named
1076 @code{hungry-mode-map} which holds the keymap that is active when the
1077 mode is enabled. It initializes the keymap with key bindings for
1078 @kbd{C-@key{DEL}} and @kbd{C-M-@key{DEL}}. It puts the variable
1079 @code{hungry-mode} into custom group @code{hunger}. There are no
1080 @var{body} forms---many minor modes don't need any.
1081
1082 Here's an equivalent way to write it:
1083
1084 @smallexample
1085 (define-minor-mode hungry-mode
1086 "Toggle Hungry mode.
1087 With no argument, this command toggles the mode.
1088 Non-null prefix argument turns on the mode.
1089 Null prefix argument turns off the mode.
1090
1091 When Hungry mode is enabled, the control delete key
1092 gobbles all preceding whitespace except the last.
1093 See the command \\[hungry-electric-delete]."
1094 ;; The initial value.
1095 :initial-value nil
1096 ;; The indicator for the mode line.
1097 :lighter " Hungry"
1098 ;; The minor mode bindings.
1099 :keymap
1100 '(("\C-\^?" . hungry-electric-delete)
1101 ("\C-\M-\^?"
1102 . (lambda ()
1103 (interactive)
1104 (hungry-electric-delete t))))
1105 :group 'hunger)
1106 @end smallexample
1107
1108 @node Mode Line Format
1109 @section Mode-Line Format
1110 @cindex mode line
1111
1112 Each Emacs window (aside from minibuffer windows) typically has a mode
1113 line at the bottom, which displays status information about the buffer
1114 displayed in the window. The mode line contains information about the
1115 buffer, such as its name, associated file, depth of recursive editing,
1116 and major and minor modes. A window can also have a @dfn{header
1117 line}, which is much like the mode line but appears at the top of the
1118 window (starting in Emacs 21).
1119
1120 This section describes how to control the contents of the mode line
1121 and header line. We include it in this chapter because much of the
1122 information displayed in the mode line relates to the enabled major and
1123 minor modes.
1124
1125 @code{mode-line-format} is a buffer-local variable that holds a
1126 template used to display the mode line of the current buffer. All
1127 windows for the same buffer use the same @code{mode-line-format}, so
1128 their mode lines appear the same---except for scrolling percentages, and
1129 line and column numbers, since those depend on point and on how the
1130 window is scrolled. @code{header-line-format} is used likewise for
1131 header lines.
1132
1133 For efficiency, Emacs does not recompute the mode line and header
1134 line of a window in every redisplay. It does so when circumstances
1135 appear to call for it---for instance, if you change the window
1136 configuration, switch buffers, narrow or widen the buffer, scroll, or
1137 change the buffer's modification status. If you modify any of the
1138 variables referenced by @code{mode-line-format} (@pxref{Mode Line
1139 Variables}), or any other variables and data structures that affect
1140 how text is displayed (@pxref{Display}), you may want to force an
1141 update of the mode line so as to display the new information or
1142 display it in the new way.
1143
1144 @c Emacs 19 feature
1145 @defun force-mode-line-update &optional all
1146 Force redisplay of the current buffer's mode line and header line.
1147 The next redisplay will update the mode line and header line based on
1148 the latest values of all relevant variables. With optional
1149 non-@code{nil} @var{all}, force redisplay of all mode lines and header
1150 lines.
1151
1152 This function also forces recomputation of the menu bar menus
1153 and the frame title.
1154 @end defun
1155
1156 The mode line is usually displayed in inverse video; see
1157 @code{mode-line-inverse-video} in @ref{Inverse Video}.
1158
1159 A window that is just one line tall does not display either a mode
1160 line or a header line, even if the variables call for one. A window
1161 that is two lines tall cannot display both a mode line and a header
1162 line at once; if the variables call for both, only the mode line
1163 actually appears.
1164
1165 @menu
1166 * Mode Line Data:: The data structure that controls the mode line.
1167 * Mode Line Variables:: Variables used in that data structure.
1168 * %-Constructs:: Putting information into a mode line.
1169 * Properties in Mode:: Using text properties in the mode line.
1170 * Header Lines:: Like a mode line, but at the top.
1171 * Emulating Mode Line:: Formatting text as the mode line would.
1172 @end menu
1173
1174 @node Mode Line Data
1175 @subsection The Data Structure of the Mode Line
1176 @cindex mode-line construct
1177
1178 The mode-line contents are controlled by a data structure of lists,
1179 strings, symbols, and numbers kept in buffer-local variables. The data
1180 structure is called a @dfn{mode-line construct}, and it is built in
1181 recursive fashion out of simpler mode-line constructs. The same data
1182 structure is used for constructing frame titles (@pxref{Frame Titles})
1183 and header lines (@pxref{Header Lines}).
1184
1185 @defvar mode-line-format
1186 The value of this variable is a mode-line construct with overall
1187 responsibility for the mode-line format. The value of this variable
1188 controls which other variables are used to form the mode-line text, and
1189 where they appear.
1190
1191 If you set this variable to @code{nil} in a buffer, that buffer does not
1192 have a mode line. (This feature was added in Emacs 21.)
1193 @end defvar
1194
1195 A mode-line construct may be as simple as a fixed string of text, but
1196 it usually specifies how to use other variables to construct the text.
1197 Many of these variables are themselves defined to have mode-line
1198 constructs as their values.
1199
1200 The default value of @code{mode-line-format} incorporates the values
1201 of variables such as @code{mode-line-position} and
1202 @code{mode-line-modes} (which in turn incorporates the values of the
1203 variables @code{mode-name} and @code{minor-mode-alist}). Because of
1204 this, very few modes need to alter @code{mode-line-format} itself. For
1205 most purposes, it is sufficient to alter some of the variables that
1206 @code{mode-line-format} either directly or indirectly refers to.
1207
1208 A mode-line construct may be a list, a symbol, or a string. If the
1209 value is a list, each element may be a list, a symbol, or a string.
1210
1211 The mode line can display various faces, if the strings that control
1212 it have the @code{face} property. @xref{Properties in Mode}. In
1213 addition, the face @code{mode-line} is used as a default for the whole
1214 mode line (@pxref{Standard Faces}).
1215
1216 @table @code
1217 @cindex percent symbol in mode line
1218 @item @var{string}
1219 A string as a mode-line construct is displayed verbatim in the mode line
1220 except for @dfn{@code{%}-constructs}. Decimal digits after the @samp{%}
1221 specify the field width for space filling on the right (i.e., the data
1222 is left justified). @xref{%-Constructs}.
1223
1224 @item @var{symbol}
1225 A symbol as a mode-line construct stands for its value. The value of
1226 @var{symbol} is used as a mode-line construct, in place of @var{symbol}.
1227 However, the symbols @code{t} and @code{nil} are ignored, as is any
1228 symbol whose value is void.
1229
1230 There is one exception: if the value of @var{symbol} is a string, it is
1231 displayed verbatim: the @code{%}-constructs are not recognized.
1232
1233 Unless @var{symbol} is marked as ``risky'' (i.e., it has a
1234 non-@code{nil} @code{risky-local-variable} property), all properties in
1235 any strings, as well as all @code{:eval} and @code{:propertize} forms in
1236 the value of that symbol will be ignored.
1237
1238 @item (@var{string} @var{rest}@dots{}) @r{or} (@var{list} @var{rest}@dots{})
1239 A list whose first element is a string or list means to process all the
1240 elements recursively and concatenate the results. This is the most
1241 common form of mode-line construct.
1242
1243 @item (:eval @var{form})
1244 A list whose first element is the symbol @code{:eval} says to evaluate
1245 @var{form}, and use the result as a string to display.
1246 (This feature is new as of Emacs 21.)
1247
1248 @item (:propertize @var{elt} @var{props}@dots{})
1249 A list whose first element is the symbol @code{:propertize} says to
1250 process the mode-line construct @var{elt} recursively and add the text
1251 properties specified by @var{props} to the result. The argument
1252 @var{props} should consist of zero or more pairs @var{text-property}
1253 @var{value}. (This feature is new as of Emacs 21.4.)
1254 @c FIXME: This might be Emacs 21.5.
1255
1256 @item (@var{symbol} @var{then} @var{else})
1257 A list whose first element is a symbol that is not a keyword specifies a
1258 conditional. Its meaning depends on the value of @var{symbol}. If the
1259 value is non-@code{nil}, the second element, @var{then}, is processed
1260 recursively as a mode-line element. But if the value of @var{symbol} is
1261 @code{nil}, the third element, @var{else}, is processed recursively.
1262 You may omit @var{else}; then the mode-line element displays nothing if
1263 the value of @var{symbol} is @code{nil}.
1264
1265 @item (@var{width} @var{rest}@dots{})
1266 A list whose first element is an integer specifies truncation or
1267 padding of the results of @var{rest}. The remaining elements
1268 @var{rest} are processed recursively as mode-line constructs and
1269 concatenated together. Then the result is space filled (if
1270 @var{width} is positive) or truncated (to @minus{}@var{width} columns,
1271 if @var{width} is negative) on the right.
1272
1273 For example, the usual way to show what percentage of a buffer is above
1274 the top of the window is to use a list like this: @code{(-3 "%p")}.
1275 @end table
1276
1277 If you do alter @code{mode-line-format} itself, the new value should
1278 use the same variables that appear in the default value (@pxref{Mode
1279 Line Variables}), rather than duplicating their contents or displaying
1280 the information in another fashion. This way, customizations made by
1281 the user or by Lisp programs (such as @code{display-time} and major
1282 modes) via changes to those variables remain effective.
1283
1284 @cindex Shell mode @code{mode-line-format}
1285 Here is an example of a @code{mode-line-format} that might be
1286 useful for @code{shell-mode}, since it contains the host name and default
1287 directory.
1288
1289 @example
1290 @group
1291 (setq mode-line-format
1292 (list "-"
1293 'mode-line-mule-info
1294 'mode-line-modified
1295 'mode-line-frame-identification
1296 "%b--"
1297 @end group
1298 @group
1299 ;; @r{Note that this is evaluated while making the list.}
1300 ;; @r{It makes a mode-line construct which is just a string.}
1301 (getenv "HOST")
1302 @end group
1303 ":"
1304 'default-directory
1305 " "
1306 'global-mode-string
1307 " %[("
1308 '(:eval (mode-line-mode-name))
1309 'mode-line-process
1310 'minor-mode-alist
1311 "%n"
1312 ")%]--"
1313 @group
1314 '(which-func-mode ("" which-func-format "--"))
1315 '(line-number-mode "L%l--")
1316 '(column-number-mode "C%c--")
1317 '(-3 "%p")
1318 "-%-"))
1319 @end group
1320 @end example
1321
1322 @noindent
1323 (The variables @code{line-number-mode}, @code{column-number-mode}
1324 and @code{which-func-mode} enable particular minor modes; as usual,
1325 these variable names are also the minor mode command names.)
1326
1327 @node Mode Line Variables
1328 @subsection Variables Used in the Mode Line
1329
1330 This section describes variables incorporated by the
1331 standard value of @code{mode-line-format} into the text of the mode
1332 line. There is nothing inherently special about these variables; any
1333 other variables could have the same effects on the mode line if
1334 @code{mode-line-format} were changed to use them.
1335
1336 @defvar mode-line-mule-info
1337 This variable holds the value of the mode-line construct that displays
1338 information about the language environment, buffer coding system, and
1339 current input method. @xref{Non-ASCII Characters}.
1340 @end defvar
1341
1342 @defvar mode-line-modified
1343 This variable holds the value of the mode-line construct that displays
1344 whether the current buffer is modified.
1345
1346 The default value of @code{mode-line-modified} is @code{("%1*%1+")}.
1347 This means that the mode line displays @samp{**} if the buffer is
1348 modified, @samp{--} if the buffer is not modified, @samp{%%} if the
1349 buffer is read only, and @samp{%*} if the buffer is read only and
1350 modified.
1351
1352 Changing this variable does not force an update of the mode line.
1353 @end defvar
1354
1355 @defvar mode-line-frame-identification
1356 This variable identifies the current frame. The default value is
1357 @code{" "} if you are using a window system which can show multiple
1358 frames, or @code{"-%F "} on an ordinary terminal which shows only one
1359 frame at a time.
1360 @end defvar
1361
1362 @defvar mode-line-buffer-identification
1363 This variable identifies the buffer being displayed in the window. Its
1364 default value is @code{("%12b")}, which displays the buffer name, padded
1365 with spaces to at least 12 columns.
1366 @end defvar
1367
1368 @defvar mode-line-position
1369 This variable indicates the position in the buffer. Here is a
1370 simplified version of its default value. The actual default value
1371 also specifies addition of the @code{help-echo} text property.
1372
1373 @example
1374 @group
1375 ((-3 "%p")
1376 (size-indication-mode (8 " of %I"))
1377 @end group
1378 @group
1379 (line-number-mode
1380 ((column-number-mode
1381 (10 " (%l,%c)")
1382 (6 " L%l")))
1383 ((column-number-mode
1384 (5 " C%c")))))
1385 @end group
1386 @end example
1387
1388 This means that @code{mode-line-position} displays at least the buffer
1389 percentage and possibly the buffer size, the line number and the column
1390 number.
1391 @end defvar
1392
1393 @defvar vc-mode
1394 The variable @code{vc-mode}, buffer-local in each buffer, records
1395 whether the buffer's visited file is maintained with version control,
1396 and, if so, which kind. Its value is a string that appears in the mode
1397 line, or @code{nil} for no version control.
1398 @end defvar
1399
1400 @defvar mode-line-modes
1401 This variable displays the buffer's major and minor modes. Here is a
1402 simplified version of its default value. The real default value also
1403 specifies addition of text properties.
1404
1405 @example
1406 @group
1407 ("%[(" mode-name
1408 mode-line-process minor-mode-alist
1409 "%n" ")%]--")
1410 @end group
1411 @end example
1412
1413 So @code{mode-line-modes} normally also displays the recursive editing
1414 level, information on the process status and whether narrowing is in
1415 effect.
1416 @end defvar
1417
1418 The following three variables are used in @code{mode-line-modes}:
1419
1420 @defvar mode-name
1421 This buffer-local variable holds the ``pretty'' name of the current
1422 buffer's major mode. Each major mode should set this variable so that the
1423 mode name will appear in the mode line.
1424 @end defvar
1425
1426 @defvar mode-line-process
1427 This buffer-local variable contains the mode-line information on process
1428 status in modes used for communicating with subprocesses. It is
1429 displayed immediately following the major mode name, with no intervening
1430 space. For example, its value in the @samp{*shell*} buffer is
1431 @code{(":%s")}, which allows the shell to display its status along
1432 with the major mode as: @samp{(Shell:run)}. Normally this variable
1433 is @code{nil}.
1434 @end defvar
1435
1436 @defvar minor-mode-alist
1437 This variable holds an association list whose elements specify how the
1438 mode line should indicate that a minor mode is active. Each element of
1439 the @code{minor-mode-alist} should be a two-element list:
1440
1441 @example
1442 (@var{minor-mode-variable} @var{mode-line-string})
1443 @end example
1444
1445 More generally, @var{mode-line-string} can be any mode-line spec. It
1446 appears in the mode line when the value of @var{minor-mode-variable}
1447 is non-@code{nil}, and not otherwise. These strings should begin with
1448 spaces so that they don't run together. Conventionally, the
1449 @var{minor-mode-variable} for a specific mode is set to a
1450 non-@code{nil} value when that minor mode is activated.
1451
1452 @code{minor-mode-alist} itself is not buffer-local. Each variable
1453 mentioned in the alist should be buffer-local if its minor mode can be
1454 enabled separately in each buffer.
1455 @end defvar
1456
1457 @defvar global-mode-string
1458 This variable holds a mode-line spec that, by default, appears in the
1459 mode line just after the @code{which-func-mode} minor mode if set,
1460 else after @code{mode-line-modes}. The command @code{display-time}
1461 sets @code{global-mode-string} to refer to the variable
1462 @code{display-time-string}, which holds a string containing the time
1463 and load information.
1464
1465 The @samp{%M} construct substitutes the value of
1466 @code{global-mode-string}, but that is obsolete, since the variable is
1467 included in the mode line from @code{mode-line-format}.
1468 @end defvar
1469
1470 The variable @code{default-mode-line-format} is where
1471 @code{mode-line-format} usually gets its value:
1472
1473 @defvar default-mode-line-format
1474 This variable holds the default @code{mode-line-format} for buffers
1475 that do not override it. This is the same as @code{(default-value
1476 'mode-line-format)}.
1477
1478 Here is a simplified version of the default value of
1479 @code{default-mode-line-format}. The real default value also
1480 specifies addition of text properties.
1481
1482 @example
1483 @group
1484 ("-"
1485 mode-line-mule-info
1486 mode-line-modified
1487 mode-line-frame-identification
1488 mode-line-buffer-identification
1489 @end group
1490 " "
1491 mode-line-position
1492 (vc-mode vc-mode)
1493 " "
1494 @group
1495 mode-line-modes
1496 (which-func-mode ("" which-func-format "--"))
1497 (global-mode-string ("--" global-mode-string))
1498 "-%-")
1499 @end group
1500 @end example
1501 @end defvar
1502
1503 @node %-Constructs
1504 @subsection @code{%}-Constructs in the Mode Line
1505
1506 The following table lists the recognized @code{%}-constructs and what
1507 they mean. In any construct except @samp{%%}, you can add a decimal
1508 integer after the @samp{%} to specify how many characters to display.
1509
1510 @table @code
1511 @item %b
1512 The current buffer name, obtained with the @code{buffer-name} function.
1513 @xref{Buffer Names}.
1514
1515 @item %c
1516 The current column number of point.
1517
1518 @item %f
1519 The visited file name, obtained with the @code{buffer-file-name}
1520 function. @xref{Buffer File Name}.
1521
1522 @item %F
1523 The title (only on a window system) or the name of the selected frame.
1524 @xref{Window Frame Parameters}.
1525
1526 @item %i
1527 The size of the accessible part of the current buffer; basically
1528 @code{(- (point-max) (point-min))}.
1529
1530 @item %I
1531 Like @samp{%i}, but the size is printed in a more readable way by using
1532 @samp{k} for 10^3, @samp{M} for 10^6, @samp{G} for 10^9, etc., to
1533 abbreviate.
1534
1535 @item %l
1536 The current line number of point, counting within the accessible portion
1537 of the buffer.
1538
1539 @item %n
1540 @samp{Narrow} when narrowing is in effect; nothing otherwise (see
1541 @code{narrow-to-region} in @ref{Narrowing}).
1542
1543 @item %p
1544 The percentage of the buffer text above the @strong{top} of window, or
1545 @samp{Top}, @samp{Bottom} or @samp{All}. Note that the default
1546 mode-line specification truncates this to three characters.
1547
1548 @item %P
1549 The percentage of the buffer text that is above the @strong{bottom} of
1550 the window (which includes the text visible in the window, as well as
1551 the text above the top), plus @samp{Top} if the top of the buffer is
1552 visible on screen; or @samp{Bottom} or @samp{All}.
1553
1554 @item %s
1555 The status of the subprocess belonging to the current buffer, obtained with
1556 @code{process-status}. @xref{Process Information}.
1557
1558 @item %t
1559 Whether the visited file is a text file or a binary file. This is a
1560 meaningful distinction only on certain operating systems (@pxref{MS-DOS
1561 File Types}).
1562
1563 @item %*
1564 @samp{%} if the buffer is read only (see @code{buffer-read-only}); @*
1565 @samp{*} if the buffer is modified (see @code{buffer-modified-p}); @*
1566 @samp{-} otherwise. @xref{Buffer Modification}.
1567
1568 @item %+
1569 @samp{*} if the buffer is modified (see @code{buffer-modified-p}); @*
1570 @samp{%} if the buffer is read only (see @code{buffer-read-only}); @*
1571 @samp{-} otherwise. This differs from @samp{%*} only for a modified
1572 read-only buffer. @xref{Buffer Modification}.
1573
1574 @item %&
1575 @samp{*} if the buffer is modified, and @samp{-} otherwise.
1576
1577 @item %[
1578 An indication of the depth of recursive editing levels (not counting
1579 minibuffer levels): one @samp{[} for each editing level.
1580 @xref{Recursive Editing}.
1581
1582 @item %]
1583 One @samp{]} for each recursive editing level (not counting minibuffer
1584 levels).
1585
1586 @item %-
1587 Dashes sufficient to fill the remainder of the mode line.
1588
1589 @item %%
1590 The character @samp{%}---this is how to include a literal @samp{%} in a
1591 string in which @code{%}-constructs are allowed.
1592 @end table
1593
1594 The following two @code{%}-constructs are still supported, but they are
1595 obsolete, since you can get the same results with the variables
1596 @code{mode-name} and @code{global-mode-string}.
1597
1598 @table @code
1599 @item %m
1600 The value of @code{mode-name}.
1601
1602 @item %M
1603 The value of @code{global-mode-string}. Currently, only
1604 @code{display-time} modifies the value of @code{global-mode-string}.
1605 @end table
1606
1607 @node Properties in Mode
1608 @subsection Properties in the Mode Line
1609 @cindex text properties in the mode line
1610
1611 Starting in Emacs 21, certain text properties are meaningful in the
1612 mode line. The @code{face} property affects the appearance of text; the
1613 @code{help-echo} property associate help strings with the text, and
1614 @code{local-map} can make the text mouse-sensitive.
1615
1616 There are four ways to specify text properties for text in the mode
1617 line:
1618
1619 @enumerate
1620 @item
1621 Put a string with a text property directly into the mode-line data
1622 structure.
1623
1624 @item
1625 Put a text property on a mode-line %-construct such as @samp{%12b}; then
1626 the expansion of the %-construct will have that same text property.
1627
1628 @item
1629 Use a @code{(:propertize @var{elt} @var{props}@dots{})} construct to
1630 give @var{elt} a text property specified by @var{props}.
1631
1632 @item
1633 Use a list containing @code{:eval @var{form}} in the mode-line data
1634 structure, and make @var{form} evaluate to a string that has a text
1635 property.
1636 @end enumerate
1637
1638 You use the @code{local-map} property to specify a keymap. Like any
1639 keymap, it can bind character keys and function keys; but that has no
1640 effect, since it is impossible to move point into the mode line. This
1641 keymap can only take real effect for mouse clicks.
1642
1643 @node Header Lines
1644 @subsection Window Header Lines
1645 @cindex header line (of a window)
1646 @cindex window header line
1647
1648 Starting in Emacs 21, a window can have a @dfn{header line} at the
1649 top, just as it can have a mode line at the bottom. The header line
1650 feature works just like the mode-line feature, except that it's
1651 controlled by different variables.
1652
1653 @tindex header-line-format
1654 @defvar header-line-format
1655 This variable, local in every buffer, specifies how to display the
1656 header line, for windows displaying the buffer. The format of the value
1657 is the same as for @code{mode-line-format} (@pxref{Mode Line Data}).
1658 @end defvar
1659
1660 @tindex default-header-line-format
1661 @defvar default-header-line-format
1662 This variable holds the default @code{header-line-format} for buffers
1663 that do not override it. This is the same as @code{(default-value
1664 'header-line-format)}.
1665
1666 It is normally @code{nil}, so that ordinary buffers have no header line.
1667 @end defvar
1668
1669 @node Emulating Mode Line
1670 @subsection Emulating Mode-Line Formatting
1671
1672 You can use the function @code{format-mode-line} to compute
1673 the text that would appear in a mode line or header line
1674 based on certain mode-line specification.
1675
1676 @defun format-mode-line &optional format window no-props
1677 This function formats a line of text according to @var{format} as if
1678 it were generating the mode line for @var{window}, but instead of
1679 displaying the text in the mode line or the header line, it returns
1680 the text as a string.
1681
1682 If @var{format} is @code{nil}, that means to use
1683 @code{mode-line-format} and return the text that would appear in the
1684 mode line. If @var{format} is @code{t}, that means to use
1685 @code{header-line-format} so as to return the text that would appear
1686 in the header line (@code{""} if the window has no header line).
1687 The argument @var{window} defaults to the selected window.
1688
1689 The value string normally has text properties that correspond to the
1690 faces, keymaps, etc., that the mode line would have. If
1691 @var{no-props} is non-@code{nil}, the value has no text properties.
1692 @end defun
1693
1694 @node Imenu
1695 @section Imenu
1696
1697 @cindex Imenu
1698 @dfn{Imenu} is a feature that lets users select a definition or
1699 section in the buffer, from a menu which lists all of them, to go
1700 directly to that location in the buffer. Imenu works by constructing
1701 a buffer index which lists the names and buffer positions of the
1702 definitions, or other named portions of the buffer; then the user can
1703 choose one of them and move point to it. The user-level commands for
1704 using Imenu are described in the Emacs Manual (@pxref{Imenu,, Imenu,
1705 emacs, the Emacs Manual}). This section explains how to customize
1706 Imenu's method of finding definitions or buffer portions for a
1707 particular major mode.
1708
1709 The usual and simplest way is to set the variable
1710 @code{imenu-generic-expression}:
1711
1712 @defvar imenu-generic-expression
1713 This variable, if non-@code{nil}, is a list that specifies regular
1714 expressions for finding definitions for Imenu. Simple elements of
1715 @code{imenu-generic-expression} look like this:
1716
1717 @example
1718 (@var{menu-title} @var{regexp} @var{index})
1719 @end example
1720
1721 Here, if @var{menu-title} is non-@code{nil}, it says that the matches
1722 for this element should go in a submenu of the buffer index;
1723 @var{menu-title} itself specifies the name for the submenu. If
1724 @var{menu-title} is @code{nil}, the matches for this element go directly
1725 in the top level of the buffer index.
1726
1727 The second item in the list, @var{regexp}, is a regular expression
1728 (@pxref{Regular Expressions}); anything in the buffer that it matches
1729 is considered a definition, something to mention in the buffer index.
1730 The third item, @var{index}, is a non-negative integer that indicates
1731 which subexpression in @var{regexp} matches the definition's name.
1732
1733 An element can also look like this:
1734
1735 @example
1736 (@var{menu-title} @var{regexp} @var{index} @var{function} @var{arguments}@dots{})
1737 @end example
1738
1739 Like in the previous case, each match for this element creates an
1740 index item. However, if this index item is selected by the user, it
1741 calls @var{function} with arguments consisting of the item name, the
1742 buffer position, and @var{arguments}.
1743
1744 For Emacs Lisp mode, @code{imenu-generic-expression} could look like
1745 this:
1746
1747 @c should probably use imenu-syntax-alist and \\sw rather than [-A-Za-z0-9+]
1748 @example
1749 @group
1750 ((nil "^\\s-*(def\\(un\\|subst\\|macro\\|advice\\)\
1751 \\s-+\\([-A-Za-z0-9+]+\\)" 2)
1752 @end group
1753 @group
1754 ("*Vars*" "^\\s-*(def\\(var\\|const\\)\
1755 \\s-+\\([-A-Za-z0-9+]+\\)" 2)
1756 @end group
1757 @group
1758 ("*Types*"
1759 "^\\s-*\
1760 (def\\(type\\|struct\\|class\\|ine-condition\\)\
1761 \\s-+\\([-A-Za-z0-9+]+\\)" 2))
1762 @end group
1763 @end example
1764
1765 Setting this variable makes it buffer-local in the current buffer.
1766 @end defvar
1767
1768 @defvar imenu-case-fold-search
1769 This variable controls whether matching against the regular
1770 expressions in the value of @code{imenu-generic-expression} is
1771 case-sensitive: @code{t}, the default, means matching should ignore
1772 case.
1773
1774 Setting this variable makes it buffer-local in the current buffer.
1775 @end defvar
1776
1777 @defvar imenu-syntax-alist
1778 This variable is an alist of syntax table modifiers to use while
1779 processing @code{imenu-generic-expression}, to override the syntax table
1780 of the current buffer. Each element should have this form:
1781
1782 @example
1783 (@var{characters} . @var{syntax-description})
1784 @end example
1785
1786 The @sc{car}, @var{characters}, can be either a character or a string.
1787 The element says to give that character or characters the syntax
1788 specified by @var{syntax-description}, which is passed to
1789 @code{modify-syntax-entry} (@pxref{Syntax Table Functions}).
1790
1791 This feature is typically used to give word syntax to characters which
1792 normally have symbol syntax, and thus to simplify
1793 @code{imenu-generic-expression} and speed up matching.
1794 For example, Fortran mode uses it this way:
1795
1796 @example
1797 (setq imenu-syntax-alist '(("_$" . "w")))
1798 @end example
1799
1800 The @code{imenu-generic-expression} regular expressions can then use
1801 @samp{\\sw+} instead of @samp{\\(\\sw\\|\\s_\\)+}. Note that this
1802 technique may be inconvenient when the mode needs to limit the initial
1803 character of a name to a smaller set of characters than are allowed in
1804 the rest of a name.
1805
1806 Setting this variable makes it buffer-local in the current buffer.
1807 @end defvar
1808
1809 Another way to customize Imenu for a major mode is to set the
1810 variables @code{imenu-prev-index-position-function} and
1811 @code{imenu-extract-index-name-function}:
1812
1813 @defvar imenu-prev-index-position-function
1814 If this variable is non-@code{nil}, its value should be a function that
1815 finds the next ``definition'' to put in the buffer index, scanning
1816 backward in the buffer from point. It should return @code{nil} if it
1817 doesn't find another ``definition'' before point. Otherwise it should
1818 leave point at the place it finds a ``definition,'' and return any
1819 non-@code{nil} value.
1820
1821 Setting this variable makes it buffer-local in the current buffer.
1822 @end defvar
1823
1824 @defvar imenu-extract-index-name-function
1825 If this variable is non-@code{nil}, its value should be a function to
1826 return the name for a definition, assuming point is in that definition
1827 as the @code{imenu-prev-index-position-function} function would leave
1828 it.
1829
1830 Setting this variable makes it buffer-local in the current buffer.
1831 @end defvar
1832
1833 The last way to customize Imenu for a major mode is to set the
1834 variable @code{imenu-create-index-function}:
1835
1836 @defvar imenu-create-index-function
1837 This variable specifies the function to use for creating a buffer
1838 index. The function should take no arguments, and return an index
1839 alist for the current buffer. It is called within
1840 @code{save-excursion}, so where it leaves point makes no difference.
1841
1842 The index alist can have three types of elements. Simple elements
1843 look like this:
1844
1845 @example
1846 (@var{index-name} . @var{index-position})
1847 @end example
1848
1849 Selecting a simple element has the effect of moving to position
1850 @var{index-position} in the buffer. Special elements look like this:
1851
1852 @example
1853 (@var{index-name} @var{index-position} @var{function} @var{arguments}@dots{})
1854 @end example
1855
1856 Selecting a special element performs:
1857
1858 @example
1859 (funcall @var{function}
1860 @var{index-name} @var{index-position} @var{arguments}@dots{})
1861 @end example
1862
1863 A nested sub-alist element looks like this:
1864
1865 @example
1866 (@var{menu-title} @var{sub-alist})
1867 @end example
1868
1869 It creates the submenu @var{menu-title} specified by @var{sub-alist}.
1870
1871 The default value of @code{imenu-create-index-function} is
1872 @code{imenu-default-create-index-function}. This function uses
1873 @code{imenu-prev-index-position-function} and
1874 @code{imenu-extract-index-name-function} to produce the index alist.
1875 However, if either of these two variables is @code{nil}, the default
1876 function uses @code{imenu-generic-expression} instead.
1877
1878 Setting this variable makes it buffer-local in the current buffer.
1879 @end defvar
1880
1881 @node Font Lock Mode
1882 @section Font Lock Mode
1883 @cindex Font Lock Mode
1884
1885 @dfn{Font Lock mode} is a feature that automatically attaches
1886 @code{face} properties to certain parts of the buffer based on their
1887 syntactic role. How it parses the buffer depends on the major mode;
1888 most major modes define syntactic criteria for which faces to use in
1889 which contexts. This section explains how to customize Font Lock for a
1890 particular major mode.
1891
1892 Font Lock mode finds text to highlight in two ways: through syntactic
1893 parsing based on the syntax table, and through searching (usually for
1894 regular expressions). Syntactic fontification happens first; it finds
1895 comments and string constants, and highlights them using
1896 @code{font-lock-comment-face} and @code{font-lock-string-face}
1897 (@pxref{Faces for Font Lock}). Search-based fontification follows.
1898
1899 @menu
1900 * Font Lock Basics::
1901 * Search-based Fontification::
1902 * Other Font Lock Variables::
1903 * Levels of Font Lock::
1904 * Precalculated Fontification::
1905 * Faces for Font Lock::
1906 * Syntactic Font Lock::
1907 @end menu
1908
1909 @node Font Lock Basics
1910 @subsection Font Lock Basics
1911
1912 There are several variables that control how Font Lock mode highlights
1913 text. But major modes should not set any of these variables directly.
1914 Instead, they should set @code{font-lock-defaults} as a buffer-local
1915 variable. The value assigned to this variable is used, if and when Font
1916 Lock mode is enabled, to set all the other variables.
1917
1918 @defvar font-lock-defaults
1919 This variable is set by major modes, as a buffer-local variable, to
1920 specify how to fontify text in that mode. The value should look like
1921 this:
1922
1923 @example
1924 (@var{keywords} @var{keywords-only} @var{case-fold}
1925 @var{syntax-alist} @var{syntax-begin} @var{other-vars}@dots{})
1926 @end example
1927
1928 The first element, @var{keywords}, indirectly specifies the value of
1929 @code{font-lock-keywords}. It can be a symbol, a variable whose value
1930 is the list to use for @code{font-lock-keywords}. It can also be a list of
1931 several such symbols, one for each possible level of fontification. The
1932 first symbol specifies how to do level 1 fontification, the second
1933 symbol how to do level 2, and so on.
1934
1935 The second element, @var{keywords-only}, specifies the value of the
1936 variable @code{font-lock-keywords-only}. If this is non-@code{nil},
1937 syntactic fontification (of strings and comments) is not performed.
1938
1939 The third element, @var{case-fold}, specifies the value of
1940 @code{font-lock-case-fold-search}. If it is non-@code{nil}, Font Lock
1941 mode ignores case when searching as directed by
1942 @code{font-lock-keywords}.
1943
1944 If the fourth element, @var{syntax-alist}, is non-@code{nil}, it should be
1945 a list of cons cells of the form @code{(@var{char-or-string}
1946 . @var{string})}. These are used to set up a syntax table for
1947 fontification (@pxref{Syntax Table Functions}). The resulting syntax
1948 table is stored in @code{font-lock-syntax-table}.
1949
1950 The fifth element, @var{syntax-begin}, specifies the value of
1951 @code{font-lock-beginning-of-syntax-function} (see below).
1952
1953 All the remaining elements (if any) are collectively called
1954 @var{other-vars}. Each of these elements should have the form
1955 @code{(@var{variable} . @var{value})}---which means, make @var{variable}
1956 buffer-local and then set it to @var{value}. You can use these
1957 @var{other-vars} to set other variables that affect fontification,
1958 aside from those you can control with the first five elements.
1959 @end defvar
1960
1961 @node Search-based Fontification
1962 @subsection Search-based Fontification
1963
1964 The most important variable for customizing Font Lock mode is
1965 @code{font-lock-keywords}. It specifies the search criteria for
1966 search-based fontification.
1967
1968 @defvar font-lock-keywords
1969 This variable's value is a list of the keywords to highlight. Be
1970 careful when composing regular expressions for this list; a poorly
1971 written pattern can dramatically slow things down!
1972 @end defvar
1973
1974 Each element of @code{font-lock-keywords} specifies how to find
1975 certain cases of text, and how to highlight those cases. Font Lock mode
1976 processes the elements of @code{font-lock-keywords} one by one, and for
1977 each element, it finds and handles all matches. Ordinarily, once
1978 part of the text has been fontified already, this cannot be overridden
1979 by a subsequent match in the same text; but you can specify different
1980 behavior using the @var{override} element of a @var{highlighter}.
1981
1982 Each element of @code{font-lock-keywords} should have one of these
1983 forms:
1984
1985 @table @code
1986 @item @var{regexp}
1987 Highlight all matches for @var{regexp} using
1988 @code{font-lock-keyword-face}. For example,
1989
1990 @example
1991 ;; @r{Highlight discrete occurrences of @samp{foo}}
1992 ;; @r{using @code{font-lock-keyword-face}.}
1993 "\\<foo\\>"
1994 @end example
1995
1996 The function @code{regexp-opt} (@pxref{Syntax of Regexps}) is useful for
1997 calculating optimal regular expressions to match a number of different
1998 keywords.
1999
2000 @item @var{function}
2001 Find text by calling @var{function}, and highlight the matches
2002 it finds using @code{font-lock-keyword-face}.
2003
2004 When @var{function} is called, it receives one argument, the limit of
2005 the search; it should begin searching at point, and not search beyond the
2006 limit. It should return non-@code{nil} if it succeeds, and set the
2007 match data to describe the match that was found. Returning @code{nil}
2008 indicates failure of the search.
2009
2010 Fontification will call @var{function} repeatedly with the same limit,
2011 and with point where the previous invocation left it, until
2012 @var{function} fails. On failure, @var{function} need not reset point
2013 in any particular way.
2014
2015 @item (@var{matcher} . @var{match})
2016 In this kind of element, @var{matcher} is either a regular
2017 expression or a function, as described above. The @sc{cdr},
2018 @var{match}, specifies which subexpression of @var{matcher} should be
2019 highlighted (instead of the entire text that @var{matcher} matched).
2020
2021 @example
2022 ;; @r{Highlight the @samp{bar} in each occurrence of @samp{fubar},}
2023 ;; @r{using @code{font-lock-keyword-face}.}
2024 ("fu\\(bar\\)" . 1)
2025 @end example
2026
2027 If you use @code{regexp-opt} to produce the regular expression
2028 @var{matcher}, then you can use @code{regexp-opt-depth} (@pxref{Syntax
2029 of Regexps}) to calculate the value for @var{match}.
2030
2031 @item (@var{matcher} . @var{facespec})
2032 In this kind of element, @var{facespec} is an object which specifies
2033 the face variable to use for highlighting. In the simplest case, it
2034 is a Lisp variable (a symbol), whose value should be a face name.
2035
2036 @example
2037 ;; @r{Highlight occurrences of @samp{fubar},}
2038 ;; @r{using the face which is the value of @code{fubar-face}.}
2039 ("fubar" . fubar-face)
2040 @end example
2041
2042 However, @var{facespec} can also be a list of the form
2043
2044 @example
2045 (face @var{face} @var{prop1} @var{val1} @var{prop2} @var{val2}@dots{})
2046 @end example
2047
2048 to specify various text properties to put on the text that matches.
2049 If you do this, be sure to add the other text property names that you
2050 set in this way to the value of @code{font-lock-extra-managed-props}
2051 so that the properties will also be cleared out when they are no longer
2052 appropriate.
2053
2054 @item (@var{matcher} . @var{highlighter})
2055 In this kind of element, @var{highlighter} is a list
2056 which specifies how to highlight matches found by @var{matcher}.
2057 It has the form
2058
2059 @example
2060 (@var{subexp} @var{facespec} @var{override} @var{laxmatch})
2061 @end example
2062
2063 The @sc{car}, @var{subexp}, is an integer specifying which subexpression
2064 of the match to fontify (0 means the entire matching text). The second
2065 subelement, @var{facespec}, specifies the face, as described above.
2066
2067 The last two values in @var{highlighter}, @var{override} and
2068 @var{laxmatch}, are flags. If @var{override} is @code{t}, this
2069 element can override existing fontification made by previous elements
2070 of @code{font-lock-keywords}. If it is @code{keep}, then each
2071 character is fontified if it has not been fontified already by some
2072 other element. If it is @code{prepend}, the face specified by
2073 @var{facespec} is added to the beginning of the @code{font-lock-face}
2074 property. If it is @code{append}, the face is added to the end of the
2075 @code{font-lock-face} property.
2076
2077 If @var{laxmatch} is non-@code{nil}, it means there should be no error
2078 if there is no subexpression numbered @var{subexp} in @var{matcher}.
2079 Obviously, fontification of the subexpression numbered @var{subexp} will
2080 not occur. However, fontification of other subexpressions (and other
2081 regexps) will continue. If @var{laxmatch} is @code{nil}, and the
2082 specified subexpression is missing, then an error is signalled which
2083 terminates search-based fontification.
2084
2085 Here are some examples of elements of this kind, and what they do:
2086
2087 @smallexample
2088 ;; @r{Highlight occurrences of either @samp{foo} or @samp{bar},}
2089 ;; @r{using @code{foo-bar-face}, even if they have already been highlighted.}
2090 ;; @r{@code{foo-bar-face} should be a variable whose value is a face.}
2091 ("foo\\|bar" 0 foo-bar-face t)
2092
2093 ;; @r{Highlight the first subexpression within each occurrence}
2094 ;; @r{that the function @code{fubar-match} finds,}
2095 ;; @r{using the face which is the value of @code{fubar-face}.}
2096 (fubar-match 1 fubar-face)
2097 @end smallexample
2098
2099 @item (@var{matcher} @var{highlighters}@dots{})
2100 This sort of element specifies several @var{highlighter} lists for a
2101 single @var{matcher}. In order for this to be useful, each
2102 @var{highlighter} should have a different value of @var{subexp}; that is,
2103 each one should apply to a different subexpression of @var{matcher}.
2104
2105 @ignore
2106 @item (@var{matcher} . @var{anchored})
2107 In this kind of element, @var{anchored} acts much like a
2108 @var{highlighter}, but it is more complex and can specify multiple
2109 successive searches.
2110
2111 For highlighting single items, typically only @var{highlighter} is
2112 required. However, if an item or (typically) items are to be
2113 highlighted following the instance of another item (the anchor) then
2114 @var{anchored} may be required.
2115
2116 It has this format:
2117
2118 @example
2119 (@var{submatcher} @var{pre-match-form} @var{post-match-form} @var{highlighters}@dots{})
2120 @end example
2121
2122 @c I can't parse this text -- rms
2123 where @var{submatcher} is much like @var{matcher}, with one
2124 exception---see below. @var{pre-match-form} and @var{post-match-form}
2125 are evaluated before the first, and after the last, instance
2126 @var{anchored}'s @var{submatcher} is used. Therefore they can be used
2127 to initialize before, and cleanup after, @var{submatcher} is used.
2128 Typically, @var{pre-match-form} is used to move to some position
2129 relative to the original @var{submatcher}, before starting with
2130 @var{anchored}'s @var{submatcher}. @var{post-match-form} might be used
2131 to move, before resuming with @var{anchored}'s parent's @var{matcher}.
2132
2133 For example, an element of the form highlights (if not already highlighted):
2134
2135 @example
2136 ("\\<anchor\\>" (0 anchor-face) ("\\<item\\>" nil nil (0 item-face)))
2137 @end example
2138
2139 Discrete occurrences of @samp{anchor} in the value of
2140 @code{anchor-face}, and subsequent discrete occurrences of @samp{item}
2141 (on the same line) in the value of @code{item-face}. (Here
2142 @var{pre-match-form} and @var{post-match-form} are @code{nil}.
2143 Therefore @samp{item} is initially searched for starting from the end of
2144 the match of @samp{anchor}, and searching for subsequent instance of
2145 @samp{anchor} resumes from where searching for @samp{item} concluded.)
2146
2147 The above-mentioned exception is as follows. The limit of the
2148 @var{submatcher} search defaults to the end of the line after
2149 @var{pre-match-form} is evaluated. However, if @var{pre-match-form}
2150 returns a position greater than the position after @var{pre-match-form}
2151 is evaluated, that position is used as the limit of the search. It is
2152 generally a bad idea to return a position greater than the end of the
2153 line; in other words, the @var{submatcher} search should not span lines.
2154
2155 @item (@var{matcher} @var{highlighters-or-anchoreds} ...)
2156 @end ignore
2157
2158 @item (eval . @var{form})
2159 Here @var{form} is an expression to be evaluated the first time
2160 this value of @code{font-lock-keywords} is used in a buffer.
2161 Its value should have one of the forms described in this table.
2162 @end table
2163
2164 @strong{Warning:} Do not design an element of @code{font-lock-keywords}
2165 to match text which spans lines; this does not work reliably. While
2166 @code{font-lock-fontify-buffer} handles multi-line patterns correctly,
2167 updating when you edit the buffer does not, since it considers text one
2168 line at a time. If you have patterns that typically only span one
2169 line but can occasionally span two or three, such as
2170 @samp{<title>...</title>}, you can ask font-lock to be more careful by
2171 setting @code{font-lock-multiline} to @code{t}. But it still will not
2172 work in all cases.
2173
2174 @node Other Font Lock Variables
2175 @subsection Other Font Lock Variables
2176
2177 This section describes additional variables that a major mode
2178 can set by means of @code{font-lock-defaults}.
2179
2180 @defvar font-lock-keywords-only
2181 Non-@code{nil} means Font Lock should not fontify comments or strings
2182 syntactically; it should only fontify based on
2183 @code{font-lock-keywords}.
2184 @end defvar
2185
2186 @ignore
2187 Other variables include those for buffer-specialized fontification functions,
2188 `font-lock-fontify-buffer-function', `font-lock-unfontify-buffer-function',
2189 `font-lock-fontify-region-function', `font-lock-unfontify-region-function',
2190 `font-lock-inhibit-thing-lock' and `font-lock-maximum-size'.
2191 @end ignore
2192
2193 @defvar font-lock-keywords-case-fold-search
2194 Non-@code{nil} means that regular expression matching for the sake of
2195 @code{font-lock-keywords} should be case-insensitive.
2196 @end defvar
2197
2198 @defvar font-lock-syntax-table
2199 This variable specifies the syntax table to use for fontification of
2200 comments and strings.
2201 @end defvar
2202
2203 @defvar font-lock-beginning-of-syntax-function
2204 If this variable is non-@code{nil}, it should be a function to move
2205 point back to a position that is syntactically at ``top level'' and
2206 outside of strings or comments. Font Lock uses this when necessary
2207 to get the right results for syntactic fontification.
2208
2209 This function is called with no arguments. It should leave point at the
2210 beginning of any enclosing syntactic block. Typical values are
2211 @code{beginning-of-line} (i.e., the start of the line is known to be
2212 outside a syntactic block), or @code{beginning-of-defun} for programming
2213 modes or @code{backward-paragraph} for textual modes (i.e., the
2214 mode-dependent function is known to move outside a syntactic block).
2215
2216 If the value is @code{nil}, the beginning of the buffer is used as a
2217 position outside of a syntactic block. This cannot be wrong, but it can
2218 be slow.
2219 @end defvar
2220
2221 @defvar font-lock-mark-block-function
2222 If this variable is non-@code{nil}, it should be a function that is
2223 called with no arguments, to choose an enclosing range of text for
2224 refontification for the command @kbd{M-g M-g}
2225 (@code{font-lock-fontify-block}).
2226
2227 The function should report its choice by placing the region around it.
2228 A good choice is a range of text large enough to give proper results,
2229 but not too large so that refontification becomes slow. Typical values
2230 are @code{mark-defun} for programming modes or @code{mark-paragraph} for
2231 textual modes.
2232 @end defvar
2233
2234 @defvar font-lock-extra-managed-props
2235 Additional properties (other than @code{font-lock-face}) that are
2236 being managed by Font Lock mode. Font Lock mode normally manages only
2237 the @code{font-lock-face} property; if you want it to manage others as
2238 well, you must specify them in a @var{facespec} in
2239 @code{font-lock-keywords} as well as adding them to this list.
2240 @end defvar
2241
2242 @defvar font-lock-syntactic-face-function
2243 A function to determine which face to use for a given syntactic
2244 element (a string or a comment). The function is called with one
2245 argument, the parse state at point returned by
2246 @code{parse-partial-sexp}, and should return a face. The default
2247 value returns @code{font-lock-comment-face} for comments and
2248 @code{font-lock-string-face} for strings.
2249
2250 This can be used to highlighting different kinds of strings or
2251 comments differently. It is also sometimes abused together with
2252 @code{font-lock-syntactic-keywords} to highlight elements that span
2253 multiple lines, but this is too obscure to document in this manual.
2254 @end defvar
2255
2256 @node Levels of Font Lock
2257 @subsection Levels of Font Lock
2258
2259 Many major modes offer three different levels of fontification. You
2260 can define multiple levels by using a list of symbols for @var{keywords}
2261 in @code{font-lock-defaults}. Each symbol specifies one level of
2262 fontification; it is up to the user to choose one of these levels. The
2263 chosen level's symbol value is used to initialize
2264 @code{font-lock-keywords}.
2265
2266 Here are the conventions for how to define the levels of
2267 fontification:
2268
2269 @itemize @bullet
2270 @item
2271 Level 1: highlight function declarations, file directives (such as include or
2272 import directives), strings and comments. The idea is speed, so only
2273 the most important and top-level components are fontified.
2274
2275 @item
2276 Level 2: in addition to level 1, highlight all language keywords,
2277 including type names that act like keywords, as well as named constant
2278 values. The idea is that all keywords (either syntactic or semantic)
2279 should be fontified appropriately.
2280
2281 @item
2282 Level 3: in addition to level 2, highlight the symbols being defined in
2283 function and variable declarations, and all builtin function names,
2284 wherever they appear.
2285 @end itemize
2286
2287 @node Precalculated Fontification
2288 @subsection Precalculated Fontification
2289
2290 In addition to using @code{font-lock-defaults} for search-based
2291 fontification, you may use the special character property
2292 @code{font-lock-face} (@pxref{Special Properties}). This property
2293 acts just like the explicit @code{face} property, but its activation
2294 is toggled when the user calls @kbd{M-x font-lock-mode}. Using
2295 @code{font-lock-face} is especially convenient for special modes
2296 which construct their text programmatically, such as
2297 @code{list-buffers} and @code{occur}.
2298
2299 If your mode does not use any of the other machinery of Font Lock
2300 (i.e. it only uses the @code{font-lock-face} property), you can tell
2301 Emacs not to load all of font-lock.el (unless it's already loaded), by
2302 setting the variable @code{font-lock-core-only} to non-@code{nil} as
2303 part of the @code{font-lock-defaults} settings. Here is the canonical
2304 way to do this:
2305
2306 @example
2307 (set (make-local-variable 'font-lock-defaults)
2308 '(nil t nil nil nil (font-lock-core-only . t)))
2309 @end example
2310
2311 @node Faces for Font Lock
2312 @subsection Faces for Font Lock
2313
2314 You can make Font Lock mode use any face, but several faces are
2315 defined specifically for Font Lock mode. Each of these symbols is both
2316 a face name, and a variable whose default value is the symbol itself.
2317 Thus, the default value of @code{font-lock-comment-face} is
2318 @code{font-lock-comment-face}. This means you can write
2319 @code{font-lock-comment-face} in a context such as
2320 @code{font-lock-keywords} where a face-name-valued expression is used.
2321
2322 @table @code
2323 @item font-lock-comment-face
2324 @vindex font-lock-comment-face
2325 Used (typically) for comments.
2326
2327 @item font-lock-string-face
2328 @vindex font-lock-string-face
2329 Used (typically) for string constants.
2330
2331 @item font-lock-keyword-face
2332 @vindex font-lock-keyword-face
2333 Used (typically) for keywords---names that have special syntactic
2334 significance, like @code{for} and @code{if} in C.
2335
2336 @item font-lock-builtin-face
2337 @vindex font-lock-builtin-face
2338 Used (typically) for built-in function names.
2339
2340 @item font-lock-function-name-face
2341 @vindex font-lock-function-name-face
2342 Used (typically) for the name of a function being defined or declared,
2343 in a function definition or declaration.
2344
2345 @item font-lock-variable-name-face
2346 @vindex font-lock-variable-name-face
2347 Used (typically) for the name of a variable being defined or declared,
2348 in a variable definition or declaration.
2349
2350 @item font-lock-type-face
2351 @vindex font-lock-type-face
2352 Used (typically) for names of user-defined data types,
2353 where they are defined and where they are used.
2354
2355 @item font-lock-constant-face
2356 @vindex font-lock-constant-face
2357 Used (typically) for constant names.
2358
2359 @item font-lock-preprocessor-face
2360 @vindex font-lock-preprocessor-face
2361 Used (typically) for preprocessor commands.
2362
2363 @item font-lock-warning-face
2364 @vindex font-lock-warning-face
2365 Used (typically) for constructs that are peculiar, or that greatly
2366 change the meaning of other text. For example, this is used for
2367 @samp{;;;###autoload} cookies in Emacs Lisp, and for @code{#error}
2368 directives in C.
2369 @end table
2370
2371 @node Syntactic Font Lock
2372 @subsection Syntactic Font Lock
2373
2374 Font Lock mode can be used to update @code{syntax-table} properties
2375 automatically. This is useful in languages for which a single syntax
2376 table by itself is not sufficient.
2377
2378 @defvar font-lock-syntactic-keywords
2379 This variable enables and controls syntactic Font Lock. It is
2380 normally set via @code{font-lock-defaults}. Its value should be a
2381 list of elements of this form:
2382
2383 @example
2384 (@var{matcher} @var{subexp} @var{syntax} @var{override} @var{laxmatch})
2385 @end example
2386
2387 The parts of this element have the same meanings as in the corresponding
2388 sort of element of @code{font-lock-keywords},
2389
2390 @example
2391 (@var{matcher} @var{subexp} @var{facename} @var{override} @var{laxmatch})
2392 @end example
2393
2394 However, instead of specifying the value @var{facename} to use for the
2395 @code{face} property, it specifies the value @var{syntax} to use for
2396 the @code{syntax-table} property. Here, @var{syntax} can be a string
2397 (as taken by @code{modify-syntax-entry}), a syntax table, a cons cell
2398 (as returned by @code{string-to-syntax}), or an expression whose value
2399 is one of those two types. @var{override} cannot be @code{prepend} or
2400 @code{append}.
2401
2402 For example, an element of the form:
2403
2404 @example
2405 ("\\$\\(#\\)" 1 ".")
2406 @end example
2407
2408 highlights syntactically a hash character when following a dollar
2409 character, with a SYNTAX of @code{"."} (meaning punctuation syntax).
2410 Assuming that the buffer syntax table specifies hash characters to
2411 have comment start syntax, the element will only highlight hash
2412 characters that do not follow dollar characters as comments
2413 syntactically.
2414
2415 An element of the form:
2416
2417 @example
2418 ("\\('\\).\\('\\)"
2419 (1 "\"")
2420 (2 "\""))
2421 @end example
2422
2423 highlights syntactically both single quotes which surround a single
2424 character, with a SYNTAX of @code{"\""} (meaning string quote syntax).
2425 Assuming that the buffer syntax table does not specify single quotes
2426 to have quote syntax, the element will only highlight single quotes of
2427 the form @samp{'@var{c}'} as strings syntactically. Other forms, such
2428 as @samp{foo'bar} or @samp{'fubar'}, will not be highlighted as
2429 strings.
2430
2431 @end defvar
2432
2433 @node Desktop Save Mode
2434 @section Desktop Save Mode
2435 @cindex desktop save mode
2436
2437 @dfn{Desktop Save Mode} is a feature to save the state of Emacs from
2438 one session to another. The user-level commands for using Desktop
2439 Save Mode are described in the GNU Emacs Manual (@pxref{Saving Emacs
2440 Sessions,,, emacs, the GNU Emacs Manual}). Modes whose buffers visit
2441 a file, don't have to do anything to use this feature.
2442
2443 For buffers not visiting a file to have their state saved, the major
2444 mode must bind the buffer local variable @code{desktop-save-buffer} to
2445 a non-nil value.
2446
2447 @defvar desktop-save-buffer
2448 If this buffer-local variable is non-@code{nil}, the buffer will have
2449 its state saved in the desktop file at desktop save. If the value is
2450 a function, it is called at desktop save with argument
2451 @var{desktop-dirname}, and its value is saved in the desktop file along
2452 with the state of the buffer for which it was called. When file names
2453 are returned as part of the auxiliary information, they should be
2454 formatted using the call
2455
2456 @example
2457 (desktop-file-name @var{file-name} @var{desktop-dirname})
2458 @end example
2459
2460 @end defvar
2461
2462 For buffers not visiting a file to be restored, the major mode must
2463 define a function to do the job, and that function must be listed in
2464 the alist @code{desktop-buffer-mode-handlers}.
2465
2466 @defvar desktop-buffer-mode-handlers
2467 Alist with elements
2468
2469 @example
2470 (@var{major-mode} . @var{restore-buffer-function})
2471 @end example
2472
2473 The function @var{restore-buffer-function} will be called with
2474 argument list
2475
2476 @example
2477 (@var{buffer-file-name} @var{buffer-name} @var{desktop-buffer-misc})
2478 @end example
2479
2480 and it should return the restored buffer.
2481 Here @var{desktop-buffer-misc} is the value returned by the function
2482 optionally bound to @code{desktop-save-buffer}.
2483
2484 @end defvar
2485
2486 @node Hooks
2487 @section Hooks
2488 @cindex hooks
2489
2490 A @dfn{hook} is a variable where you can store a function or functions
2491 to be called on a particular occasion by an existing program. Emacs
2492 provides hooks for the sake of customization. Most often, hooks are set
2493 up in the init file (@pxref{Init File}), but Lisp programs can set them also.
2494 @xref{Standard Hooks}, for a list of standard hook variables.
2495
2496 @cindex normal hook
2497 Most of the hooks in Emacs are @dfn{normal hooks}. These variables
2498 contain lists of functions to be called with no arguments. When the
2499 hook name ends in @samp{-hook}, that tells you it is normal. We try to
2500 make all hooks normal, as much as possible, so that you can use them in
2501 a uniform way.
2502
2503 Every major mode function is supposed to run a normal hook called the
2504 @dfn{mode hook} as the last step of initialization. This makes it easy
2505 for a user to customize the behavior of the mode, by overriding the
2506 buffer-local variable assignments already made by the mode. But hooks
2507 are used in other contexts too. For example, the hook
2508 @code{suspend-hook} runs just before Emacs suspends itself
2509 (@pxref{Suspending Emacs}).
2510
2511 The recommended way to add a hook function to a normal hook is by
2512 calling @code{add-hook} (see below). The hook functions may be any of
2513 the valid kinds of functions that @code{funcall} accepts (@pxref{What
2514 Is a Function}). Most normal hook variables are initially void;
2515 @code{add-hook} knows how to deal with this. You can add hooks either
2516 globally or buffer-locally with @code{add-hook}.
2517
2518 @cindex abnormal hook
2519 If the hook variable's name does not end with @samp{-hook}, that
2520 indicates it is probably an @dfn{abnormal hook}. Then you should look at its
2521 documentation to see how to use the hook properly.
2522
2523 If the variable's name ends in @samp{-functions} or @samp{-hooks},
2524 then the value is a list of functions, but it is abnormal in that either
2525 these functions are called with arguments or their values are used in
2526 some way. You can use @code{add-hook} to add a function to the list,
2527 but you must take care in writing the function. (A few of these
2528 variables, notably those ending in @samp{-hooks}, are actually
2529 normal hooks which were named before we established the convention of
2530 using @samp{-hook} for them.)
2531
2532 If the variable's name ends in @samp{-function}, then its value
2533 is just a single function, not a list of functions.
2534
2535 Here's an example that uses a mode hook to turn on Auto Fill mode when
2536 in Lisp Interaction mode:
2537
2538 @example
2539 (add-hook 'lisp-interaction-mode-hook 'turn-on-auto-fill)
2540 @end example
2541
2542 At the appropriate time, Emacs uses the @code{run-hooks} function to
2543 run particular hooks. This function calls the hook functions that have
2544 been added with @code{add-hook}.
2545
2546 @defun run-hooks &rest hookvars
2547 This function takes one or more normal hook variable names as
2548 arguments, and runs each hook in turn. Each argument should be a
2549 symbol that is a normal hook variable. These arguments are processed
2550 in the order specified.
2551
2552 If a hook variable has a non-@code{nil} value, that value may be a
2553 function or a list of functions. (The former option is considered
2554 obsolete.) If the value is a function (either a lambda expression or
2555 a symbol with a function definition), it is called. If it is a list
2556 that isn't a function, its elements are called, consecutively. All
2557 the hook functions are called with no arguments.
2558
2559 For example, here's how @code{emacs-lisp-mode} runs its mode hook:
2560
2561 @example
2562 (run-hooks 'emacs-lisp-mode-hook)
2563 @end example
2564 @end defun
2565
2566 @defun run-mode-hooks &rest hookvars
2567 Like @code{run-hooks}, but is affected by the @code{delay-mode-hooks}
2568 macro.
2569 @end defun
2570
2571 @defmac delay-mode-hooks body...
2572 This macro executes the @var{body} forms but defers all calls to
2573 @code{run-mode-hooks} within them until the end of @var{body}.
2574 This macro enables a derived mode to arrange not to run
2575 its parent modes' mode hooks until the end.
2576 @end defmac
2577
2578 @defun run-hook-with-args hook &rest args
2579 This function is the way to run an abnormal hook and always call all
2580 of the hook functions. It calls each of the hook functions one by
2581 one, passing each of them the arguments @var{args}.
2582 @end defun
2583
2584 @defun run-hook-with-args-until-failure hook &rest args
2585 This function is the way to run an abnormal hook until one of the hook
2586 functions fails. It calls each of the hook functions, passing each of
2587 them the arguments @var{args}, until some hook function returns
2588 @code{nil}. It then stops and returns @code{nil}. If none of the
2589 hook functions return @code{nil}, it returns a non-@code{nil} value.
2590 @end defun
2591
2592 @defun run-hook-with-args-until-success hook &rest args
2593 This function is the way to run an abnormal hook until a hook function
2594 succeeds. It calls each of the hook functions, passing each of them
2595 the arguments @var{args}, until some hook function returns
2596 non-@code{nil}. Then it stops, and returns whatever was returned by
2597 the last hook function that was called. If all hook functions return
2598 @code{nil}, it returns @code{nil} as well.
2599 @end defun
2600
2601 @defun add-hook hook function &optional append local
2602 This function is the handy way to add function @var{function} to hook
2603 variable @var{hook}. You can use it for abnormal hooks as well as for
2604 normal hooks. @var{function} can be any Lisp function that can accept
2605 the proper number of arguments for @var{hook}. For example,
2606
2607 @example
2608 (add-hook 'text-mode-hook 'my-text-hook-function)
2609 @end example
2610
2611 @noindent
2612 adds @code{my-text-hook-function} to the hook called @code{text-mode-hook}.
2613
2614 If @var{function} is already present in @var{hook} (comparing using
2615 @code{equal}), then @code{add-hook} does not add it a second time.
2616
2617 It is best to design your hook functions so that the order in which they
2618 are executed does not matter. Any dependence on the order is ``asking
2619 for trouble''. However, the order is predictable: normally,
2620 @var{function} goes at the front of the hook list, so it will be
2621 executed first (barring another @code{add-hook} call). If the optional
2622 argument @var{append} is non-@code{nil}, the new hook function goes at
2623 the end of the hook list and will be executed last.
2624
2625 If @var{local} is non-@code{nil}, that says to add @var{function} to
2626 the buffer-local hook list instead of to the global hook list. If
2627 needed, this makes the hook buffer-local and adds @code{t} to the
2628 buffer-local value. The latter acts as a flag to run the hook
2629 functions in the default value as well as in the local value.
2630 @end defun
2631
2632 @defun remove-hook hook function &optional local
2633 This function removes @var{function} from the hook variable
2634 @var{hook}. It compares @var{function} with elements of @var{hook}
2635 using @code{equal}, so it works for both symbols and lambda
2636 expressions.
2637
2638 If @var{local} is non-@code{nil}, that says to remove @var{function}
2639 from the buffer-local hook list instead of from the global hook list.
2640 @end defun
2641
2642 @ignore
2643 arch-tag: 4c7bff41-36e6-4da6-9e7f-9b9289e27c8e
2644 @end ignore