]> code.delx.au - gnu-emacs/blob - doc/lispref/modes.texi
Merge from origin/emacs-25
[gnu-emacs] / doc / lispref / modes.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-1999, 2001-2016 Free Software
4 @c Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @node Modes
7 @chapter Major and Minor Modes
8 @cindex mode
9
10 A @dfn{mode} is a set of definitions that customize Emacs and can be
11 turned on and off while you edit. There are two varieties of modes:
12 @dfn{major modes}, which are mutually exclusive and used for editing
13 particular kinds of text, and @dfn{minor modes}, which provide features
14 that users can enable individually.
15
16 This chapter describes how to write both major and minor modes, how to
17 indicate them in the mode line, and how they run hooks supplied by the
18 user. For related topics such as keymaps and syntax tables, see
19 @ref{Keymaps}, and @ref{Syntax Tables}.
20
21 @menu
22 * Hooks:: How to use hooks; how to write code that provides hooks.
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:: Providing a menu of definitions made in a buffer.
27 * Font Lock Mode:: How modes can highlight text according to syntax.
28 * Auto-Indentation:: How to teach Emacs to indent for a major mode.
29 * Desktop Save Mode:: How modes can have buffer state saved between
30 Emacs sessions.
31 @end menu
32
33 @node Hooks
34 @section Hooks
35 @cindex hooks
36
37 A @dfn{hook} is a variable where you can store a function or functions
38 to be called on a particular occasion by an existing program. Emacs
39 provides hooks for the sake of customization. Most often, hooks are set
40 up in the init file (@pxref{Init File}), but Lisp programs can set them also.
41 @xref{Standard Hooks}, for a list of some standard hook variables.
42
43 @cindex normal hook
44 Most of the hooks in Emacs are @dfn{normal hooks}. These variables
45 contain lists of functions to be called with no arguments. By
46 convention, whenever the hook name ends in @samp{-hook}, that tells
47 you it is normal. We try to make all hooks normal, as much as
48 possible, so that you can use them in a uniform way.
49
50 Every major mode command is supposed to run a normal hook called the
51 @dfn{mode hook} as one of the last steps of initialization. This makes
52 it easy for a user to customize the behavior of the mode, by overriding
53 the buffer-local variable assignments already made by the mode. Most
54 minor mode functions also run a mode hook at the end. But hooks are
55 used in other contexts too. For example, the hook @code{suspend-hook}
56 runs just before Emacs suspends itself (@pxref{Suspending Emacs}).
57
58 The recommended way to add a hook function to a hook is by calling
59 @code{add-hook} (@pxref{Setting Hooks}). The hook functions may be any
60 of the valid kinds of functions that @code{funcall} accepts (@pxref{What
61 Is a Function}). Most normal hook variables are initially void;
62 @code{add-hook} knows how to deal with this. You can add hooks either
63 globally or buffer-locally with @code{add-hook}.
64
65 @cindex abnormal hook
66 If the hook variable's name does not end with @samp{-hook}, that
67 indicates it is probably an @dfn{abnormal hook}. That means the hook
68 functions are called with arguments, or their return values are used
69 in some way. The hook's documentation says how the functions are
70 called. You can use @code{add-hook} to add a function to an abnormal
71 hook, but you must write the function to follow the hook's calling
72 convention. By convention, abnormal hook names end in @samp{-functions}.
73
74 @cindex single-function hook
75 If the variable's name ends in @samp{-function}, then its value is
76 just a single function, not a list of functions. @code{add-hook} cannot be
77 used to modify such a @emph{single function hook}, and you have to use
78 @code{add-function} instead (@pxref{Advising Functions}).
79
80 @menu
81 * Running Hooks:: How to run a hook.
82 * Setting Hooks:: How to put functions on a hook, or remove them.
83 @end menu
84
85 @node Running Hooks
86 @subsection Running Hooks
87
88 In this section, we document the @code{run-hooks} function, which is
89 used to run a normal hook. We also document the functions for running
90 various kinds of abnormal hooks.
91
92 @defun run-hooks &rest hookvars
93 This function takes one or more normal hook variable names as
94 arguments, and runs each hook in turn. Each argument should be a
95 symbol that is a normal hook variable. These arguments are processed
96 in the order specified.
97
98 If a hook variable has a non-@code{nil} value, that value should be a
99 list of functions. @code{run-hooks} calls all the functions, one by
100 one, with no arguments.
101
102 The hook variable's value can also be a single function---either a
103 lambda expression or a symbol with a function definition---which
104 @code{run-hooks} calls. But this usage is obsolete.
105
106 If the hook variable is buffer-local, the buffer-local variable will
107 be used instead of the global variable. However, if the buffer-local
108 variable contains the element @code{t}, the global hook variable will
109 be run as well.
110 @end defun
111
112 @defun run-hook-with-args hook &rest args
113 This function runs an abnormal hook by calling all the hook functions in
114 @var{hook}, passing each one the arguments @var{args}.
115 @end defun
116
117 @defun run-hook-with-args-until-failure hook &rest args
118 This function runs an abnormal hook by calling each hook function in
119 turn, stopping if one of them fails by returning @code{nil}. Each
120 hook function is passed the arguments @var{args}. If this function
121 stops because one of the hook functions fails, it returns @code{nil};
122 otherwise it returns a non-@code{nil} value.
123 @end defun
124
125 @defun run-hook-with-args-until-success hook &rest args
126 This function runs an abnormal hook by calling each hook function,
127 stopping if one of them succeeds by returning a non-@code{nil}
128 value. Each hook function is passed the arguments @var{args}. If this
129 function stops because one of the hook functions returns a
130 non-@code{nil} value, it returns that value; otherwise it returns
131 @code{nil}.
132 @end defun
133
134 @node Setting Hooks
135 @subsection Setting Hooks
136
137 Here's an example that uses a mode hook to turn on Auto Fill mode when
138 in Lisp Interaction mode:
139
140 @example
141 (add-hook 'lisp-interaction-mode-hook 'auto-fill-mode)
142 @end example
143
144 @defun add-hook hook function &optional append local
145 This function is the handy way to add function @var{function} to hook
146 variable @var{hook}. You can use it for abnormal hooks as well as for
147 normal hooks. @var{function} can be any Lisp function that can accept
148 the proper number of arguments for @var{hook}. For example,
149
150 @example
151 (add-hook 'text-mode-hook 'my-text-hook-function)
152 @end example
153
154 @noindent
155 adds @code{my-text-hook-function} to the hook called @code{text-mode-hook}.
156
157 If @var{function} is already present in @var{hook} (comparing using
158 @code{equal}), then @code{add-hook} does not add it a second time.
159
160 If @var{function} has a non-@code{nil} property
161 @code{permanent-local-hook}, then @code{kill-all-local-variables} (or
162 changing major modes) won't delete it from the hook variable's local
163 value.
164
165 For a normal hook, hook functions should be designed so that the order
166 in which they are executed does not matter. Any dependence on the order
167 is asking for trouble. However, the order is predictable: normally,
168 @var{function} goes at the front of the hook list, so it is executed
169 first (barring another @code{add-hook} call). If the optional argument
170 @var{append} is non-@code{nil}, the new hook function goes at the end of
171 the hook list and is executed last.
172
173 @code{add-hook} can handle the cases where @var{hook} is void or its
174 value is a single function; it sets or changes the value to a list of
175 functions.
176
177 If @var{local} is non-@code{nil}, that says to add @var{function} to the
178 buffer-local hook list instead of to the global hook list. This makes
179 the hook buffer-local and adds @code{t} to the buffer-local value. The
180 latter acts as a flag to run the hook functions in the default value as
181 well as in the local value.
182 @end defun
183
184 @defun remove-hook hook function &optional local
185 This function removes @var{function} from the hook variable
186 @var{hook}. It compares @var{function} with elements of @var{hook}
187 using @code{equal}, so it works for both symbols and lambda
188 expressions.
189
190 If @var{local} is non-@code{nil}, that says to remove @var{function}
191 from the buffer-local hook list instead of from the global hook list.
192 @end defun
193
194 @node Major Modes
195 @section Major Modes
196 @cindex major mode
197
198 @cindex major mode command
199 Major modes specialize Emacs for editing particular kinds of text.
200 Each buffer has one major mode at a time. Every major mode is
201 associated with a @dfn{major mode command}, whose name should end in
202 @samp{-mode}. This command takes care of switching to that mode in the
203 current buffer, by setting various buffer-local variables such as a
204 local keymap. @xref{Major Mode Conventions}.
205
206 The least specialized major mode is called @dfn{Fundamental mode},
207 which has no mode-specific definitions or variable settings.
208
209 @deffn Command fundamental-mode
210 This is the major mode command for Fundamental mode. Unlike other mode
211 commands, it does @emph{not} run any mode hooks (@pxref{Major Mode
212 Conventions}), since you are not supposed to customize this mode.
213 @end deffn
214
215 The easiest way to write a major mode is to use the macro
216 @code{define-derived-mode}, which sets up the new mode as a variant of
217 an existing major mode. @xref{Derived Modes}. We recommend using
218 @code{define-derived-mode} even if the new mode is not an obvious
219 derivative of another mode, as it automatically enforces many coding
220 conventions for you. @xref{Basic Major Modes}, for common modes to
221 derive from.
222
223 The standard GNU Emacs Lisp directory tree contains the code for
224 several major modes, in files such as @file{text-mode.el},
225 @file{texinfo.el}, @file{lisp-mode.el}, and @file{rmail.el}. You can
226 study these libraries to see how modes are written.
227
228 @defopt major-mode
229 The buffer-local value of this variable holds the symbol for the current
230 major mode. Its default value holds the default major mode for new
231 buffers. The standard default value is @code{fundamental-mode}.
232
233 If the default value is @code{nil}, then whenever Emacs creates a new
234 buffer via a command such as @kbd{C-x b} (@code{switch-to-buffer}), the
235 new buffer is put in the major mode of the previously current buffer.
236 As an exception, if the major mode of the previous buffer has a
237 @code{mode-class} symbol property with value @code{special}, the new
238 buffer is put in Fundamental mode (@pxref{Major Mode Conventions}).
239 @end defopt
240
241 @menu
242 * Major Mode Conventions:: Coding conventions for keymaps, etc.
243 * Auto Major Mode:: How Emacs chooses the major mode automatically.
244 * Mode Help:: Finding out how to use a mode.
245 * Derived Modes:: Defining a new major mode based on another major
246 mode.
247 * Basic Major Modes:: Modes that other modes are often derived from.
248 * Mode Hooks:: Hooks run at the end of major mode functions.
249 * Tabulated List Mode:: Parent mode for buffers containing tabulated data.
250 * Generic Modes:: Defining a simple major mode that supports
251 comment syntax and Font Lock mode.
252 * Example Major Modes:: Text mode and Lisp modes.
253 @end menu
254
255 @node Major Mode Conventions
256 @subsection Major Mode Conventions
257 @cindex major mode conventions
258 @cindex conventions for writing major modes
259
260 The code for every major mode should follow various coding
261 conventions, including conventions for local keymap and syntax table
262 initialization, function and variable names, and hooks.
263
264 If you use the @code{define-derived-mode} macro, it will take care of
265 many of these conventions automatically. @xref{Derived Modes}. Note
266 also that Fundamental mode is an exception to many of these conventions,
267 because it represents the default state of Emacs.
268
269 The following list of conventions is only partial. Each major mode
270 should aim for consistency in general with other Emacs major modes, as
271 this makes Emacs as a whole more coherent. It is impossible to list
272 here all the possible points where this issue might come up; if the
273 Emacs developers point out an area where your major mode deviates from
274 the usual conventions, please make it compatible.
275
276 @itemize @bullet
277 @item
278 Define a major mode command whose name ends in @samp{-mode}. When
279 called with no arguments, this command should switch to the new mode in
280 the current buffer by setting up the keymap, syntax table, and
281 buffer-local variables in an existing buffer. It should not change the
282 buffer's contents.
283
284 @item
285 Write a documentation string for this command that describes the special
286 commands available in this mode. @xref{Mode Help}.
287
288 The documentation string may include the special documentation
289 substrings, @samp{\[@var{command}]}, @samp{\@{@var{keymap}@}}, and
290 @samp{\<@var{keymap}>}, which allow the help display to adapt
291 automatically to the user's own key bindings. @xref{Keys in
292 Documentation}.
293
294 @item
295 The major mode command should start by calling
296 @code{kill-all-local-variables}. This runs the normal hook
297 @code{change-major-mode-hook}, then gets rid of the buffer-local
298 variables of the major mode previously in effect. @xref{Creating
299 Buffer-Local}.
300
301 @item
302 The major mode command should set the variable @code{major-mode} to the
303 major mode command symbol. This is how @code{describe-mode} discovers
304 which documentation to print.
305
306 @item
307 The major mode command should set the variable @code{mode-name} to the
308 ``pretty'' name of the mode, usually a string (but see @ref{Mode Line
309 Data}, for other possible forms). The name of the mode appears
310 in the mode line.
311
312 @item
313 @cindex functions in modes
314 Since all global names are in the same name space, all the global
315 variables, constants, and functions that are part of the mode should
316 have names that start with the major mode name (or with an abbreviation
317 of it if the name is long). @xref{Coding Conventions}.
318
319 @item
320 In a major mode for editing some kind of structured text, such as a
321 programming language, indentation of text according to structure is
322 probably useful. So the mode should set @code{indent-line-function}
323 to a suitable function, and probably customize other variables
324 for indentation. @xref{Auto-Indentation}.
325
326 @item
327 @cindex keymaps in modes
328 The major mode should usually have its own keymap, which is used as the
329 local keymap in all buffers in that mode. The major mode command should
330 call @code{use-local-map} to install this local map. @xref{Active
331 Keymaps}, for more information.
332
333 This keymap should be stored permanently in a global variable named
334 @code{@var{modename}-mode-map}. Normally the library that defines the
335 mode sets this variable.
336
337 @xref{Tips for Defining}, for advice about how to write the code to set
338 up the mode's keymap variable.
339
340 @item
341 The key sequences bound in a major mode keymap should usually start with
342 @kbd{C-c}, followed by a control character, a digit, or @kbd{@{},
343 @kbd{@}}, @kbd{<}, @kbd{>}, @kbd{:} or @kbd{;}. The other punctuation
344 characters are reserved for minor modes, and ordinary letters are
345 reserved for users.
346
347 A major mode can also rebind the keys @kbd{M-n}, @kbd{M-p} and
348 @kbd{M-s}. The bindings for @kbd{M-n} and @kbd{M-p} should normally
349 be some kind of moving forward and backward, but this does not
350 necessarily mean cursor motion.
351
352 It is legitimate for a major mode to rebind a standard key sequence if
353 it provides a command that does the same job in a way better
354 suited to the text this mode is used for. For example, a major mode
355 for editing a programming language might redefine @kbd{C-M-a} to
356 move to the beginning of a function in a way that works better for
357 that language.
358
359 It is also legitimate for a major mode to rebind a standard key
360 sequence whose standard meaning is rarely useful in that mode. For
361 instance, minibuffer modes rebind @kbd{M-r}, whose standard meaning is
362 rarely of any use in the minibuffer. Major modes such as Dired or
363 Rmail that do not allow self-insertion of text can reasonably redefine
364 letters and other printing characters as special commands.
365
366 @item
367 Major modes for editing text should not define @key{RET} to do
368 anything other than insert a newline. However, it is ok for
369 specialized modes for text that users don't directly edit, such as
370 Dired and Info modes, to redefine @key{RET} to do something entirely
371 different.
372
373 @item
374 Major modes should not alter options that are primarily a matter of user
375 preference, such as whether Auto-Fill mode is enabled. Leave this to
376 each user to decide. However, a major mode should customize other
377 variables so that Auto-Fill mode will work usefully @emph{if} the user
378 decides to use it.
379
380 @item
381 @cindex syntax tables in modes
382 The mode may have its own syntax table or may share one with other
383 related modes. If it has its own syntax table, it should store this in
384 a variable named @code{@var{modename}-mode-syntax-table}. @xref{Syntax
385 Tables}.
386
387 @item
388 If the mode handles a language that has a syntax for comments, it should
389 set the variables that define the comment syntax. @xref{Options for
390 Comments,, Options Controlling Comments, emacs, The GNU Emacs Manual}.
391
392 @item
393 @cindex abbrev tables in modes
394 The mode may have its own abbrev table or may share one with other
395 related modes. If it has its own abbrev table, it should store this
396 in a variable named @code{@var{modename}-mode-abbrev-table}. If the
397 major mode command defines any abbrevs itself, it should pass @code{t}
398 for the @var{system-flag} argument to @code{define-abbrev}.
399 @xref{Defining Abbrevs}.
400
401 @item
402 The mode should specify how to do highlighting for Font Lock mode, by
403 setting up a buffer-local value for the variable
404 @code{font-lock-defaults} (@pxref{Font Lock Mode}).
405
406 @item
407 Each face that the mode defines should, if possible, inherit from an
408 existing Emacs face. @xref{Basic Faces}, and @ref{Faces for Font Lock}.
409
410 @item
411 The mode should specify how Imenu should find the definitions or
412 sections of a buffer, by setting up a buffer-local value for the
413 variable @code{imenu-generic-expression}, for the two variables
414 @code{imenu-prev-index-position-function} and
415 @code{imenu-extract-index-name-function}, or for the variable
416 @code{imenu-create-index-function} (@pxref{Imenu}).
417
418 @item
419 The mode can specify a local value for
420 @code{eldoc-documentation-function} to tell ElDoc mode how to handle
421 this mode.
422
423 @item
424 The mode can specify how to complete various keywords by adding one or
425 more buffer-local entries to the special hook
426 @code{completion-at-point-functions}. @xref{Completion in Buffers}.
427
428 @item
429 @cindex buffer-local variables in modes
430 To make a buffer-local binding for an Emacs customization variable, use
431 @code{make-local-variable} in the major mode command, not
432 @code{make-variable-buffer-local}. The latter function would make the
433 variable local to every buffer in which it is subsequently set, which
434 would affect buffers that do not use this mode. It is undesirable for a
435 mode to have such global effects. @xref{Buffer-Local Variables}.
436
437 With rare exceptions, the only reasonable way to use
438 @code{make-variable-buffer-local} in a Lisp package is for a variable
439 which is used only within that package. Using it on a variable used by
440 other packages would interfere with them.
441
442 @item
443 @cindex mode hook
444 @cindex major mode hook
445 Each major mode should have a normal @dfn{mode hook} named
446 @code{@var{modename}-mode-hook}. The very last thing the major mode command
447 should do is to call @code{run-mode-hooks}. This runs the normal
448 hook @code{change-major-mode-after-body-hook}, the mode hook, the
449 function @code{hack-local-variables} (when the buffer is visiting a file),
450 and then the normal hook @code{after-change-major-mode-hook}.
451 @xref{Mode Hooks}.
452
453 @item
454 The major mode command may start by calling some other major mode
455 command (called the @dfn{parent mode}) and then alter some of its
456 settings. A mode that does this is called a @dfn{derived mode}. The
457 recommended way to define one is to use the @code{define-derived-mode}
458 macro, but this is not required. Such a mode should call the parent
459 mode command inside a @code{delay-mode-hooks} form. (Using
460 @code{define-derived-mode} does this automatically.) @xref{Derived
461 Modes}, and @ref{Mode Hooks}.
462
463 @item
464 If something special should be done if the user switches a buffer from
465 this mode to any other major mode, this mode can set up a buffer-local
466 value for @code{change-major-mode-hook} (@pxref{Creating Buffer-Local}).
467
468 @item
469 If this mode is appropriate only for specially-prepared text produced by
470 the mode itself (rather than by the user typing at the keyboard or by an
471 external file), then the major mode command symbol should have a
472 property named @code{mode-class} with value @code{special}, put on as
473 follows:
474
475 @kindex mode-class @r{(property)}
476 @cindex @code{special} modes
477 @example
478 (put 'funny-mode 'mode-class 'special)
479 @end example
480
481 @noindent
482 This tells Emacs that new buffers created while the current buffer is in
483 Funny mode should not be put in Funny mode, even though the default
484 value of @code{major-mode} is @code{nil}. By default, the value of
485 @code{nil} for @code{major-mode} means to use the current buffer's major
486 mode when creating new buffers (@pxref{Auto Major Mode}), but with such
487 @code{special} modes, Fundamental mode is used instead. Modes such as
488 Dired, Rmail, and Buffer List use this feature.
489
490 The function @code{view-buffer} does not enable View mode in buffers
491 whose mode-class is special, because such modes usually provide their
492 own View-like bindings.
493
494 The @code{define-derived-mode} macro automatically marks the derived
495 mode as special if the parent mode is special. Special mode is a
496 convenient parent for such modes to inherit from; @xref{Basic Major
497 Modes}.
498
499 @item
500 If you want to make the new mode the default for files with certain
501 recognizable names, add an element to @code{auto-mode-alist} to select
502 the mode for those file names (@pxref{Auto Major Mode}). If you
503 define the mode command to autoload, you should add this element in
504 the same file that calls @code{autoload}. If you use an autoload
505 cookie for the mode command, you can also use an autoload cookie for
506 the form that adds the element (@pxref{autoload cookie}). If you do
507 not autoload the mode command, it is sufficient to add the element in
508 the file that contains the mode definition.
509
510 @item
511 @cindex mode loading
512 The top-level forms in the file defining the mode should be written so
513 that they may be evaluated more than once without adverse consequences.
514 For instance, use @code{defvar} or @code{defcustom} to set mode-related
515 variables, so that they are not reinitialized if they already have a
516 value (@pxref{Defining Variables}).
517
518 @end itemize
519
520 @node Auto Major Mode
521 @subsection How Emacs Chooses a Major Mode
522 @cindex major mode, automatic selection
523
524 When Emacs visits a file, it automatically selects a major mode for
525 the buffer based on information in the file name or in the file itself.
526 It also processes local variables specified in the file text.
527
528 @deffn Command normal-mode &optional find-file
529 This function establishes the proper major mode and buffer-local
530 variable bindings for the current buffer. It calls
531 @code{set-auto-mode} (see below). As from Emacs 25.2, it no longer
532 runs @code{hack-local-variables}, this now being done in
533 @code{run-mode-hooks} at the initialization of major modes
534 (@pxref{Mode Hooks}).
535
536 If the @var{find-file} argument to @code{normal-mode} is non-@code{nil},
537 @code{normal-mode} assumes that the @code{find-file} function is calling
538 it. In this case, it may process local variables in the @samp{-*-}
539 line or at the end of the file. The variable
540 @code{enable-local-variables} controls whether to do so. @xref{File
541 Variables, , Local Variables in Files, emacs, The GNU Emacs Manual},
542 for the syntax of the local variables section of a file.
543
544 If you run @code{normal-mode} interactively, the argument
545 @var{find-file} is normally @code{nil}. In this case,
546 @code{normal-mode} unconditionally processes any file local variables.
547
548 The function calls @code{set-auto-mode} to choose and set a major
549 mode. If this does not specify a mode, the buffer stays in the major
550 mode determined by the default value of @code{major-mode} (see below).
551
552 @cindex file mode specification error
553 @code{normal-mode} uses @code{condition-case} around the call to the
554 major mode command, so errors are caught and reported as a @samp{File
555 mode specification error}, followed by the original error message.
556 @end deffn
557
558 @defun set-auto-mode &optional keep-mode-if-same
559 @cindex visited file mode
560 This function selects and sets the major mode that is appropriate
561 for the current buffer. It bases its decision (in order of
562 precedence) on the @w{@samp{-*-}} line, on any @samp{mode:} local
563 variable near the end of a file, on the @w{@samp{#!}} line (using
564 @code{interpreter-mode-alist}), on the text at the beginning of the
565 buffer (using @code{magic-mode-alist}), and finally on the visited
566 file name (using @code{auto-mode-alist}). @xref{Choosing Modes, , How
567 Major Modes are Chosen, emacs, The GNU Emacs Manual}. If
568 @code{enable-local-variables} is @code{nil}, @code{set-auto-mode} does
569 not check the @w{@samp{-*-}} line, or near the end of the file, for
570 any mode tag.
571
572 @vindex inhibit-local-variables-regexps
573 There are some file types where it is not appropriate to scan the file
574 contents for a mode specifier. For example, a tar archive may happen to
575 contain, near the end of the file, a member file that has a local
576 variables section specifying a mode for that particular file. This
577 should not be applied to the containing tar file. Similarly, a tiff
578 image file might just happen to contain a first line that seems to
579 match the @w{@samp{-*-}} pattern. For these reasons, both these file
580 extensions are members of the list @code{inhibit-local-variables-regexps}.
581 Add patterns to this list to prevent Emacs searching them for local
582 variables of any kind (not just mode specifiers).
583
584 If @var{keep-mode-if-same} is non-@code{nil}, this function does not
585 call the mode command if the buffer is already in the proper major
586 mode. For instance, @code{set-visited-file-name} sets this to
587 @code{t} to avoid killing buffer local variables that the user may
588 have set.
589 @end defun
590
591 @defun set-buffer-major-mode buffer
592 This function sets the major mode of @var{buffer} to the default value of
593 @code{major-mode}; if that is @code{nil}, it uses the
594 current buffer's major mode (if that is suitable). As an exception,
595 if @var{buffer}'s name is @file{*scratch*}, it sets the mode to
596 @code{initial-major-mode}.
597
598 The low-level primitives for creating buffers do not use this function,
599 but medium-level commands such as @code{switch-to-buffer} and
600 @code{find-file-noselect} use it whenever they create buffers.
601 @end defun
602
603 @defopt initial-major-mode
604 @cindex @file{*scratch*}
605 The value of this variable determines the major mode of the initial
606 @file{*scratch*} buffer. The value should be a symbol that is a major
607 mode command. The default value is @code{lisp-interaction-mode}.
608 @end defopt
609
610 @defvar interpreter-mode-alist
611 This variable specifies major modes to use for scripts that specify a
612 command interpreter in a @samp{#!} line. Its value is an alist with
613 elements of the form @code{(@var{regexp} . @var{mode})}; this says to
614 use mode @var{mode} if the file specifies an interpreter which matches
615 @code{\\`@var{regexp}\\'}. For example, one of the default elements
616 is @code{("python[0-9.]*" . python-mode)}.
617 @end defvar
618
619 @defvar magic-mode-alist
620 This variable's value is an alist with elements of the form
621 @code{(@var{regexp} . @var{function})}, where @var{regexp} is a
622 regular expression and @var{function} is a function or @code{nil}.
623 After visiting a file, @code{set-auto-mode} calls @var{function} if
624 the text at the beginning of the buffer matches @var{regexp} and
625 @var{function} is non-@code{nil}; if @var{function} is @code{nil},
626 @code{auto-mode-alist} gets to decide the mode.
627 @end defvar
628
629 @defvar magic-fallback-mode-alist
630 This works like @code{magic-mode-alist}, except that it is handled
631 only if @code{auto-mode-alist} does not specify a mode for this file.
632 @end defvar
633
634 @defvar auto-mode-alist
635 This variable contains an association list of file name patterns
636 (regular expressions) and corresponding major mode commands. Usually,
637 the file name patterns test for suffixes, such as @samp{.el} and
638 @samp{.c}, but this need not be the case. An ordinary element of the
639 alist looks like @code{(@var{regexp} . @var{mode-function})}.
640
641 For example,
642
643 @smallexample
644 @group
645 (("\\`/tmp/fol/" . text-mode)
646 ("\\.texinfo\\'" . texinfo-mode)
647 ("\\.texi\\'" . texinfo-mode)
648 @end group
649 @group
650 ("\\.el\\'" . emacs-lisp-mode)
651 ("\\.c\\'" . c-mode)
652 ("\\.h\\'" . c-mode)
653 @dots{})
654 @end group
655 @end smallexample
656
657 When you visit a file whose expanded file name (@pxref{File Name
658 Expansion}), with version numbers and backup suffixes removed using
659 @code{file-name-sans-versions} (@pxref{File Name Components}), matches
660 a @var{regexp}, @code{set-auto-mode} calls the corresponding
661 @var{mode-function}. This feature enables Emacs to select the proper
662 major mode for most files.
663
664 If an element of @code{auto-mode-alist} has the form @code{(@var{regexp}
665 @var{function} t)}, then after calling @var{function}, Emacs searches
666 @code{auto-mode-alist} again for a match against the portion of the file
667 name that did not match before. This feature is useful for
668 uncompression packages: an entry of the form @code{("\\.gz\\'"
669 @var{function} t)} can uncompress the file and then put the uncompressed
670 file in the proper mode according to the name sans @samp{.gz}.
671
672 Here is an example of how to prepend several pattern pairs to
673 @code{auto-mode-alist}. (You might use this sort of expression in your
674 init file.)
675
676 @smallexample
677 @group
678 (setq auto-mode-alist
679 (append
680 ;; @r{File name (within directory) starts with a dot.}
681 '(("/\\.[^/]*\\'" . fundamental-mode)
682 ;; @r{File name has no dot.}
683 ("/[^\\./]*\\'" . fundamental-mode)
684 ;; @r{File name ends in @samp{.C}.}
685 ("\\.C\\'" . c++-mode))
686 auto-mode-alist))
687 @end group
688 @end smallexample
689 @end defvar
690
691 @node Mode Help
692 @subsection Getting Help about a Major Mode
693 @cindex mode help
694 @cindex help for major mode
695 @cindex documentation for major mode
696
697 The @code{describe-mode} function provides information about major
698 modes. It is normally bound to @kbd{C-h m}. It uses the value of the
699 variable @code{major-mode} (@pxref{Major Modes}), which is why every
700 major mode command needs to set that variable.
701
702 @deffn Command describe-mode &optional buffer
703 This command displays the documentation of the current buffer's major
704 mode and minor modes. It uses the @code{documentation} function to
705 retrieve the documentation strings of the major and minor mode
706 commands (@pxref{Accessing Documentation}).
707
708 If called from Lisp with a non-@code{nil} @var{buffer} argument, this
709 function displays the documentation for that buffer's major and minor
710 modes, rather than those of the current buffer.
711 @end deffn
712
713 @node Derived Modes
714 @subsection Defining Derived Modes
715 @cindex derived mode
716
717 The recommended way to define a new major mode is to derive it from an
718 existing one using @code{define-derived-mode}. If there is no closely
719 related mode, you should inherit from either @code{text-mode},
720 @code{special-mode}, or @code{prog-mode}. @xref{Basic Major Modes}. If
721 none of these are suitable, you can inherit from @code{fundamental-mode}
722 (@pxref{Major Modes}).
723
724 @defmac define-derived-mode variant parent name docstring keyword-args@dots{} body@dots{}
725 This macro defines @var{variant} as a major mode command, using
726 @var{name} as the string form of the mode name. @var{variant} and
727 @var{parent} should be unquoted symbols.
728
729 The new command @var{variant} is defined to call the function
730 @var{parent}, then override certain aspects of that parent mode:
731
732 @itemize @bullet
733 @item
734 The new mode has its own sparse keymap, named
735 @code{@var{variant}-map}. @code{define-derived-mode}
736 makes the parent mode's keymap the parent of the new map, unless
737 @code{@var{variant}-map} is already set and already has a parent.
738
739 @item
740 The new mode has its own syntax table, kept in the variable
741 @code{@var{variant}-syntax-table}, unless you override this using the
742 @code{:syntax-table} keyword (see below). @code{define-derived-mode}
743 makes the parent mode's syntax-table the parent of
744 @code{@var{variant}-syntax-table}, unless the latter is already set
745 and already has a parent different from the standard syntax table.
746
747 @item
748 The new mode has its own abbrev table, kept in the variable
749 @code{@var{variant}-abbrev-table}, unless you override this using the
750 @code{:abbrev-table} keyword (see below).
751
752 @item
753 The new mode has its own mode hook, @code{@var{variant}-hook}. It
754 runs this hook, after running the hooks of its ancestor modes, with
755 @code{run-mode-hooks}, as the last thing it does, apart from running
756 any @code{:after-hook} form it may have. @xref{Mode Hooks}.
757 @end itemize
758
759 In addition, you can specify how to override other aspects of
760 @var{parent} with @var{body}. The command @var{variant}
761 evaluates the forms in @var{body} after setting up all its usual
762 overrides, just before running the mode hooks.
763
764 If @var{parent} has a non-@code{nil} @code{mode-class} symbol
765 property, then @code{define-derived-mode} sets the @code{mode-class}
766 property of @var{variant} to the same value. This ensures, for
767 example, that if @var{parent} is a special mode, then @var{variant} is
768 also a special mode (@pxref{Major Mode Conventions}).
769
770 You can also specify @code{nil} for @var{parent}. This gives the new
771 mode no parent. Then @code{define-derived-mode} behaves as described
772 above, but, of course, omits all actions connected with @var{parent}.
773
774 The argument @var{docstring} specifies the documentation string for the
775 new mode. @code{define-derived-mode} adds some general information
776 about the mode's hook, followed by the mode's keymap, at the end of this
777 documentation string. If you omit @var{docstring},
778 @code{define-derived-mode} generates a documentation string.
779
780 The @var{keyword-args} are pairs of keywords and values. The values,
781 except for @code{:after-hook}'s, are evaluated. The following
782 keywords are currently supported:
783
784 @table @code
785 @item :syntax-table
786 You can use this to explicitly specify a syntax table for the new
787 mode. If you specify a @code{nil} value, the new mode uses the same
788 syntax table as @var{parent}, or the standard syntax table if
789 @var{parent} is @code{nil}. (Note that this does @emph{not} follow
790 the convention used for non-keyword arguments that a @code{nil} value
791 is equivalent with not specifying the argument.)
792
793 @item :abbrev-table
794 You can use this to explicitly specify an abbrev table for the new
795 mode. If you specify a @code{nil} value, the new mode uses the same
796 abbrev table as @var{parent}, or @code{fundamental-mode-abbrev-table}
797 if @var{parent} is @code{nil}. (Again, a @code{nil} value is
798 @emph{not} equivalent to not specifying this keyword.)
799
800 @item :group
801 If this is specified, the value should be the customization group for
802 this mode. (Not all major modes have one.) Only the (still
803 experimental and unadvertised) command @code{customize-mode} currently
804 uses this. @code{define-derived-mode} does @emph{not} automatically
805 define the specified customization group.
806
807 @item :after-hook
808 This optional keyword specifies a single Lisp form to evaluate as the
809 final act of the mode function, after the mode hooks have been run.
810 It should not be quoted. Since the form might be evaluated after the
811 mode function has terminated, it should not access any element of the
812 mode function's local state. An @code{:after-hook} form is useful for
813 setting up aspects of the mode which depend on the user's settings,
814 which in turn may have been changed in a mode hook.
815 @end table
816
817 Here is a hypothetical example:
818
819 @example
820 (define-derived-mode hypertext-mode
821 text-mode "Hypertext"
822 "Major mode for hypertext.
823 \\@{hypertext-mode-map@}"
824 (setq case-fold-search nil))
825
826 (define-key hypertext-mode-map
827 [down-mouse-3] 'do-hyper-link)
828 @end example
829
830 Do not write an @code{interactive} spec in the definition;
831 @code{define-derived-mode} does that automatically.
832 @end defmac
833
834 @defun derived-mode-p &rest modes
835 This function returns non-@code{nil} if the current major mode is
836 derived from any of the major modes given by the symbols @var{modes}.
837 @end defun
838
839 @node Basic Major Modes
840 @subsection Basic Major Modes
841
842 Apart from Fundamental mode, there are three major modes that other
843 major modes commonly derive from: Text mode, Prog mode, and Special
844 mode. While Text mode is useful in its own right (e.g., for editing
845 files ending in @file{.txt}), Prog mode and Special mode exist mainly to
846 let other modes derive from them.
847
848 @vindex prog-mode-hook
849 As far as possible, new major modes should be derived, either directly
850 or indirectly, from one of these three modes. One reason is that this
851 allows users to customize a single mode hook
852 (e.g., @code{prog-mode-hook}) for an entire family of relevant modes
853 (e.g., all programming language modes).
854
855 @deffn Command text-mode
856 Text mode is a major mode for editing human languages. It defines the
857 @samp{"} and @samp{\} characters as having punctuation syntax
858 (@pxref{Syntax Class Table}), and binds @kbd{M-@key{TAB}} to
859 @code{ispell-complete-word} (@pxref{Spelling,,, emacs, The GNU Emacs
860 Manual}).
861
862 An example of a major mode derived from Text mode is HTML mode.
863 @xref{HTML Mode,,SGML and HTML Modes, emacs, The GNU Emacs Manual}.
864 @end deffn
865
866 @deffn Command prog-mode
867 Prog mode is a basic major mode for buffers containing programming
868 language source code. Most of the programming language major modes
869 built into Emacs are derived from it.
870
871 Prog mode binds @code{parse-sexp-ignore-comments} to @code{t}
872 (@pxref{Motion via Parsing}) and @code{bidi-paragraph-direction} to
873 @code{left-to-right} (@pxref{Bidirectional Display}).
874 @end deffn
875
876 @deffn Command special-mode
877 Special mode is a basic major mode for buffers containing text that is
878 produced specially by Emacs, rather than directly from a file. Major
879 modes derived from Special mode are given a @code{mode-class} property
880 of @code{special} (@pxref{Major Mode Conventions}).
881
882 Special mode sets the buffer to read-only. Its keymap defines several
883 common bindings, including @kbd{q} for @code{quit-window} and @kbd{g}
884 for @code{revert-buffer} (@pxref{Reverting}).
885
886 An example of a major mode derived from Special mode is Buffer Menu
887 mode, which is used by the @file{*Buffer List*} buffer. @xref{List
888 Buffers,,Listing Existing Buffers, emacs, The GNU Emacs Manual}.
889 @end deffn
890
891 In addition, modes for buffers of tabulated data can inherit from
892 Tabulated List mode, which is in turn derived from Special mode.
893 @xref{Tabulated List Mode}.
894
895 @node Mode Hooks
896 @subsection Mode Hooks
897
898 Every major mode command should finish by running the mode-independent
899 normal hook @code{change-major-mode-after-body-hook}, its mode hook,
900 and the normal hook @code{after-change-major-mode-hook}.
901 It does this by calling @code{run-mode-hooks}. If the major mode is a
902 derived mode, that is if it calls another major mode (the parent mode)
903 in its body, it should do this inside @code{delay-mode-hooks} so that
904 the parent won't run these hooks itself. Instead, the derived mode's
905 call to @code{run-mode-hooks} runs the parent's mode hook too.
906 @xref{Major Mode Conventions}.
907
908 Emacs versions before Emacs 22 did not have @code{delay-mode-hooks}.
909 Versions before 24 did not have @code{change-major-mode-after-body-hook}.
910 When user-implemented major modes do not use @code{run-mode-hooks} and
911 have not been updated to use these newer features, they won't entirely
912 follow these conventions: they may run the parent's mode hook too early,
913 or fail to run @code{after-change-major-mode-hook}. If you encounter
914 such a major mode, please correct it to follow these conventions.
915
916 When you defined a major mode using @code{define-derived-mode}, it
917 automatically makes sure these conventions are followed. If you
918 define a major mode ``by hand'', not using @code{define-derived-mode},
919 use the following functions to handle these conventions automatically.
920
921 @defun run-mode-hooks &rest hookvars
922 Major modes should run their mode hook using this function. It is
923 similar to @code{run-hooks} (@pxref{Hooks}), but it also runs
924 @code{change-major-mode-after-body-hook}, @code{hack-local-variables}
925 (when the buffer is visiting a file) (@pxref{File Local Variables}),
926 and @code{after-change-major-mode-hook}. The last thing it does is to
927 evaluate any @code{:after-hook} forms declared by parent modes
928 (@pxref{Derived Modes}).
929
930 When this function is called during the execution of a
931 @code{delay-mode-hooks} form, it does not run the hooks or
932 @code{hack-local-variables} or evaluate the forms immediately.
933 Instead, it arranges for the next call to @code{run-mode-hooks} to run
934 them.
935 @end defun
936
937 @defmac delay-mode-hooks body@dots{}
938 When one major mode command calls another, it should do so inside of
939 @code{delay-mode-hooks}.
940
941 This macro executes @var{body}, but tells all @code{run-mode-hooks}
942 calls during the execution of @var{body} to delay running their hooks.
943 The hooks will actually run during the next call to
944 @code{run-mode-hooks} after the end of the @code{delay-mode-hooks}
945 construct.
946 @end defmac
947
948 @defvar change-major-mode-after-body-hook
949 This is a normal hook run by @code{run-mode-hooks}. It is run before
950 the mode hooks.
951 @end defvar
952
953 @defvar after-change-major-mode-hook
954 This is a normal hook run by @code{run-mode-hooks}. It is run at the
955 very end of every properly-written major mode command.
956 @end defvar
957
958 @node Tabulated List Mode
959 @subsection Tabulated List mode
960 @cindex Tabulated List mode
961
962 Tabulated List mode is a major mode for displaying tabulated data,
963 i.e., data consisting of @dfn{entries}, each entry occupying one row of
964 text with its contents divided into columns. Tabulated List mode
965 provides facilities for pretty-printing rows and columns, and sorting
966 the rows according to the values in each column. It is derived from
967 Special mode (@pxref{Basic Major Modes}).
968
969 Tabulated List mode is intended to be used as a parent mode by a more
970 specialized major mode. Examples include Process Menu mode
971 (@pxref{Process Information}) and Package Menu mode (@pxref{Package
972 Menu,,, emacs, The GNU Emacs Manual}).
973
974 @findex tabulated-list-mode
975 Such a derived mode should use @code{define-derived-mode} in the usual
976 way, specifying @code{tabulated-list-mode} as the second argument
977 (@pxref{Derived Modes}). The body of the @code{define-derived-mode}
978 form should specify the format of the tabulated data, by assigning
979 values to the variables documented below; optionally, it can then call
980 the function @code{tabulated-list-init-header}, which will populate a
981 header with the names of the columns.
982
983 The derived mode should also define a @dfn{listing command}. This,
984 not the mode command, is what the user calls (e.g., @kbd{M-x
985 list-processes}). The listing command should create or switch to a
986 buffer, turn on the derived mode, specify the tabulated data, and
987 finally call @code{tabulated-list-print} to populate the buffer.
988
989 @defvar tabulated-list-format
990 This buffer-local variable specifies the format of the Tabulated List
991 data. Its value should be a vector. Each element of the vector
992 represents a data column, and should be a list @code{(@var{name}
993 @var{width} @var{sort})}, where
994
995 @itemize
996 @item
997 @var{name} is the column's name (a string).
998
999 @item
1000 @var{width} is the width to reserve for the column (an integer). This
1001 is meaningless for the last column, which runs to the end of each line.
1002
1003 @item
1004 @var{sort} specifies how to sort entries by the column. If @code{nil},
1005 the column cannot be used for sorting. If @code{t}, the column is
1006 sorted by comparing string values. Otherwise, this should be a
1007 predicate function for @code{sort} (@pxref{Rearrangement}), which
1008 accepts two arguments with the same form as the elements of
1009 @code{tabulated-list-entries} (see below).
1010 @end itemize
1011 @end defvar
1012
1013 @defvar tabulated-list-entries
1014 This buffer-local variable specifies the entries displayed in the
1015 Tabulated List buffer. Its value should be either a list, or a
1016 function.
1017
1018 If the value is a list, each list element corresponds to one entry, and
1019 should have the form @w{@code{(@var{id} @var{contents})}}, where
1020
1021 @itemize
1022 @item
1023 @var{id} is either @code{nil}, or a Lisp object that identifies the
1024 entry. If the latter, the cursor stays on the same entry when
1025 re-sorting entries. Comparison is done with @code{equal}.
1026
1027 @item
1028 @var{contents} is a vector with the same number of elements as
1029 @code{tabulated-list-format}. Each vector element is either a string,
1030 which is inserted into the buffer as-is, or a list @code{(@var{label}
1031 . @var{properties})}, which means to insert a text button by calling
1032 @code{insert-text-button} with @var{label} and @var{properties} as
1033 arguments (@pxref{Making Buttons}).
1034
1035 There should be no newlines in any of these strings.
1036 @end itemize
1037
1038 Otherwise, the value should be a function which returns a list of the
1039 above form when called with no arguments.
1040 @end defvar
1041
1042 @defvar tabulated-list-revert-hook
1043 This normal hook is run prior to reverting a Tabulated List buffer. A
1044 derived mode can add a function to this hook to recompute
1045 @code{tabulated-list-entries}.
1046 @end defvar
1047
1048 @defvar tabulated-list-printer
1049 The value of this variable is the function called to insert an entry at
1050 point, including its terminating newline. The function should accept
1051 two arguments, @var{id} and @var{contents}, having the same meanings as
1052 in @code{tabulated-list-entries}. The default value is a function which
1053 inserts an entry in a straightforward way; a mode which uses Tabulated
1054 List mode in a more complex way can specify another function.
1055 @end defvar
1056
1057 @defvar tabulated-list-sort-key
1058 The value of this variable specifies the current sort key for the
1059 Tabulated List buffer. If it is @code{nil}, no sorting is done.
1060 Otherwise, it should have the form @code{(@var{name} . @var{flip})},
1061 where @var{name} is a string matching one of the column names in
1062 @code{tabulated-list-format}, and @var{flip}, if non-@code{nil}, means
1063 to invert the sort order.
1064 @end defvar
1065
1066 @defun tabulated-list-init-header
1067 This function computes and sets @code{header-line-format} for the
1068 Tabulated List buffer (@pxref{Header Lines}), and assigns a keymap to
1069 the header line to allow sort entries by clicking on column headers.
1070
1071 Modes derived from Tabulated List mode should call this after setting
1072 the above variables (in particular, only after setting
1073 @code{tabulated-list-format}).
1074 @end defun
1075
1076 @defun tabulated-list-print &optional remember-pos update
1077 This function populates the current buffer with entries. It should be
1078 called by the listing command. It erases the buffer, sorts the entries
1079 specified by @code{tabulated-list-entries} according to
1080 @code{tabulated-list-sort-key}, then calls the function specified by
1081 @code{tabulated-list-printer} to insert each entry.
1082
1083 If the optional argument @var{remember-pos} is non-@code{nil}, this
1084 function looks for the @var{id} element on the current line, if any, and
1085 tries to move to that entry after all the entries are (re)inserted.
1086
1087 If the optional argument @var{update} is non-@code{nil}, this function
1088 will only erase or add entries that have changed since the last print.
1089 This is several times faster if most entries haven't changed since the
1090 last time this function was called. The only difference in outcome is
1091 that tags placed via @code{tabulated-list-put-tag} will not be removed
1092 from entries that haven't changed (normally all tags are removed).
1093 @end defun
1094
1095 @node Generic Modes
1096 @subsection Generic Modes
1097 @cindex generic mode
1098
1099 @dfn{Generic modes} are simple major modes with basic support for
1100 comment syntax and Font Lock mode. To define a generic mode, use the
1101 macro @code{define-generic-mode}. See the file @file{generic-x.el}
1102 for some examples of the use of @code{define-generic-mode}.
1103
1104 @defmac define-generic-mode mode comment-list keyword-list font-lock-list auto-mode-list function-list &optional docstring
1105 This macro defines a generic mode command named @var{mode} (a symbol,
1106 not quoted). The optional argument @var{docstring} is the
1107 documentation for the mode command. If you do not supply it,
1108 @code{define-generic-mode} generates one by default.
1109
1110 The argument @var{comment-list} is a list in which each element is
1111 either a character, a string of one or two characters, or a cons cell.
1112 A character or a string is set up in the mode's syntax table as a
1113 comment starter. If the entry is a cons cell, the @sc{car} is set
1114 up as a comment starter and the @sc{cdr} as a comment ender.
1115 (Use @code{nil} for the latter if you want comments to end at the end
1116 of the line.) Note that the syntax table mechanism has limitations
1117 about what comment starters and enders are actually possible.
1118 @xref{Syntax Tables}.
1119
1120 The argument @var{keyword-list} is a list of keywords to highlight
1121 with @code{font-lock-keyword-face}. Each keyword should be a string.
1122 Meanwhile, @var{font-lock-list} is a list of additional expressions to
1123 highlight. Each element of this list should have the same form as an
1124 element of @code{font-lock-keywords}. @xref{Search-based
1125 Fontification}.
1126
1127 The argument @var{auto-mode-list} is a list of regular expressions to
1128 add to the variable @code{auto-mode-alist}. They are added by the execution
1129 of the @code{define-generic-mode} form, not by expanding the macro call.
1130
1131 Finally, @var{function-list} is a list of functions for the mode
1132 command to call for additional setup. It calls these functions just
1133 before it runs the mode hook variable @code{@var{mode}-hook}.
1134 @end defmac
1135
1136 @node Example Major Modes
1137 @subsection Major Mode Examples
1138
1139 Text mode is perhaps the simplest mode besides Fundamental mode.
1140 Here are excerpts from @file{text-mode.el} that illustrate many of
1141 the conventions listed above:
1142
1143 @smallexample
1144 @group
1145 ;; @r{Create the syntax table for this mode.}
1146 (defvar text-mode-syntax-table
1147 (let ((st (make-syntax-table)))
1148 (modify-syntax-entry ?\" ". " st)
1149 (modify-syntax-entry ?\\ ". " st)
1150 ;; Add 'p' so M-c on 'hello' leads to 'Hello', not 'hello'.
1151 (modify-syntax-entry ?' "w p" st)
1152 st)
1153 "Syntax table used while in `text-mode'.")
1154 @end group
1155
1156 ;; @r{Create the keymap for this mode.}
1157 @group
1158 (defvar text-mode-map
1159 (let ((map (make-sparse-keymap)))
1160 (define-key map "\e\t" 'ispell-complete-word)
1161 map)
1162 "Keymap for `text-mode'.
1163 Many other modes, such as `mail-mode', `outline-mode' and
1164 `indented-text-mode', inherit all the commands defined in this map.")
1165 @end group
1166 @end smallexample
1167
1168 Here is how the actual mode command is defined now:
1169
1170 @smallexample
1171 @group
1172 (define-derived-mode text-mode nil "Text"
1173 "Major mode for editing text written for humans to read.
1174 In this mode, paragraphs are delimited only by blank or white lines.
1175 You can thus get the full benefit of adaptive filling
1176 (see the variable `adaptive-fill-mode').
1177 \\@{text-mode-map@}
1178 Turning on Text mode runs the normal hook `text-mode-hook'."
1179 @end group
1180 @group
1181 (set (make-local-variable 'text-mode-variant) t)
1182 (set (make-local-variable 'require-final-newline)
1183 mode-require-final-newline)
1184 (set (make-local-variable 'indent-line-function) 'indent-relative))
1185 @end group
1186 @end smallexample
1187
1188 @noindent
1189 (The last line is redundant nowadays, since @code{indent-relative} is
1190 the default value, and we'll delete it in a future version.)
1191
1192 @cindex @file{lisp-mode.el}
1193 The three Lisp modes (Lisp mode, Emacs Lisp mode, and Lisp Interaction
1194 mode) have more features than Text mode and the code is correspondingly
1195 more complicated. Here are excerpts from @file{lisp-mode.el} that
1196 illustrate how these modes are written.
1197
1198 Here is how the Lisp mode syntax and abbrev tables are defined:
1199
1200 @cindex syntax table example
1201 @smallexample
1202 @group
1203 ;; @r{Create mode-specific table variables.}
1204 (defvar lisp-mode-abbrev-table nil)
1205 (define-abbrev-table 'lisp-mode-abbrev-table ())
1206
1207 (defvar lisp-mode-syntax-table
1208 (let ((table (copy-syntax-table emacs-lisp-mode-syntax-table)))
1209 (modify-syntax-entry ?\[ "_ " table)
1210 (modify-syntax-entry ?\] "_ " table)
1211 (modify-syntax-entry ?# "' 14" table)
1212 (modify-syntax-entry ?| "\" 23bn" table)
1213 table)
1214 "Syntax table used in `lisp-mode'.")
1215 @end group
1216 @end smallexample
1217
1218 The three modes for Lisp share much of their code. For instance,
1219 each calls the following function to set various variables:
1220
1221 @smallexample
1222 @group
1223 (defun lisp-mode-variables (&optional syntax keywords-case-insensitive)
1224 (when syntax
1225 (set-syntax-table lisp-mode-syntax-table))
1226 (setq local-abbrev-table lisp-mode-abbrev-table)
1227 @dots{}
1228 @end group
1229 @end smallexample
1230
1231 @noindent
1232 Amongst other things, this function sets up the @code{comment-start}
1233 variable to handle Lisp comments:
1234
1235 @smallexample
1236 @group
1237 (make-local-variable 'comment-start)
1238 (setq comment-start ";")
1239 @dots{}
1240 @end group
1241 @end smallexample
1242
1243 Each of the different Lisp modes has a slightly different keymap. For
1244 example, Lisp mode binds @kbd{C-c C-z} to @code{run-lisp}, but the other
1245 Lisp modes do not. However, all Lisp modes have some commands in
1246 common. The following code sets up the common commands:
1247
1248 @smallexample
1249 @group
1250 (defvar lisp-mode-shared-map
1251 (let ((map (make-sparse-keymap)))
1252 (define-key map "\e\C-q" 'indent-sexp)
1253 (define-key map "\177" 'backward-delete-char-untabify)
1254 map)
1255 "Keymap for commands shared by all sorts of Lisp modes.")
1256 @end group
1257 @end smallexample
1258
1259 @noindent
1260 And here is the code to set up the keymap for Lisp mode:
1261
1262 @smallexample
1263 @group
1264 (defvar lisp-mode-map
1265 (let ((map (make-sparse-keymap))
1266 (menu-map (make-sparse-keymap "Lisp")))
1267 (set-keymap-parent map lisp-mode-shared-map)
1268 (define-key map "\e\C-x" 'lisp-eval-defun)
1269 (define-key map "\C-c\C-z" 'run-lisp)
1270 @dots{}
1271 map)
1272 "Keymap for ordinary Lisp mode.
1273 All commands in `lisp-mode-shared-map' are inherited by this map.")
1274 @end group
1275 @end smallexample
1276
1277 @noindent
1278 Finally, here is the major mode command for Lisp mode:
1279
1280 @smallexample
1281 @group
1282 (define-derived-mode lisp-mode prog-mode "Lisp"
1283 "Major mode for editing Lisp code for Lisps other than GNU Emacs Lisp.
1284 Commands:
1285 Delete converts tabs to spaces as it moves back.
1286 Blank lines separate paragraphs. Semicolons start comments.
1287
1288 \\@{lisp-mode-map@}
1289 Note that `run-lisp' may be used either to start an inferior Lisp job
1290 or to switch back to an existing one.
1291 @end group
1292
1293 @group
1294 Entry to this mode calls the value of `lisp-mode-hook'
1295 if that value is non-nil."
1296 (lisp-mode-variables nil t)
1297 (set (make-local-variable 'find-tag-default-function)
1298 'lisp-find-tag-default)
1299 (set (make-local-variable 'comment-start-skip)
1300 "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\)\\(;+\\|#|\\) *")
1301 (setq imenu-case-fold-search t))
1302 @end group
1303 @end smallexample
1304
1305 @node Minor Modes
1306 @section Minor Modes
1307 @cindex minor mode
1308
1309 A @dfn{minor mode} provides optional features that users may enable or
1310 disable independently of the choice of major mode. Minor modes can be
1311 enabled individually or in combination.
1312
1313 Most minor modes implement features that are independent of the major
1314 mode, and can thus be used with most major modes. For example, Auto
1315 Fill mode works with any major mode that permits text insertion. A few
1316 minor modes, however, are specific to a particular major mode. For
1317 example, Diff Auto Refine mode is a minor mode that is intended to be
1318 used only with Diff mode.
1319
1320 Ideally, a minor mode should have its desired effect regardless of the
1321 other minor modes in effect. It should be possible to activate and
1322 deactivate minor modes in any order.
1323
1324 @defvar minor-mode-list
1325 The value of this variable is a list of all minor mode commands.
1326 @end defvar
1327
1328 @menu
1329 * Minor Mode Conventions:: Tips for writing a minor mode.
1330 * Keymaps and Minor Modes:: How a minor mode can have its own keymap.
1331 * Defining Minor Modes:: A convenient facility for defining minor modes.
1332 @end menu
1333
1334 @node Minor Mode Conventions
1335 @subsection Conventions for Writing Minor Modes
1336 @cindex minor mode conventions
1337 @cindex conventions for writing minor modes
1338
1339 There are conventions for writing minor modes just as there are for
1340 major modes. These conventions are described below. The easiest way to
1341 follow them is to use the macro @code{define-minor-mode}.
1342 @xref{Defining Minor Modes}.
1343
1344 @itemize @bullet
1345 @item
1346 @cindex mode variable
1347 Define a variable whose name ends in @samp{-mode}. We call this the
1348 @dfn{mode variable}. The minor mode command should set this variable.
1349 The value will be @code{nil} if the mode is disabled, and non-@code{nil}
1350 if the mode is enabled. The variable should be buffer-local if the
1351 minor mode is buffer-local.
1352
1353 This variable is used in conjunction with the @code{minor-mode-alist} to
1354 display the minor mode name in the mode line. It also determines
1355 whether the minor mode keymap is active, via @code{minor-mode-map-alist}
1356 (@pxref{Controlling Active Maps}). Individual commands or hooks can
1357 also check its value.
1358
1359 @item
1360 Define a command, called the @dfn{mode command}, whose name is the same
1361 as the mode variable. Its job is to set the value of the mode variable,
1362 plus anything else that needs to be done to actually enable or disable
1363 the mode's features.
1364
1365 The mode command should accept one optional argument. If called
1366 interactively with no prefix argument, it should toggle the mode
1367 (i.e., enable if it is disabled, and disable if it is enabled). If
1368 called interactively with a prefix argument, it should enable the mode
1369 if the argument is positive and disable it otherwise.
1370
1371 If the mode command is called from Lisp (i.e., non-interactively), it
1372 should enable the mode if the argument is omitted or @code{nil}; it
1373 should toggle the mode if the argument is the symbol @code{toggle};
1374 otherwise it should treat the argument in the same way as for an
1375 interactive call with a numeric prefix argument, as described above.
1376
1377 The following example shows how to implement this behavior (it is
1378 similar to the code generated by the @code{define-minor-mode} macro):
1379
1380 @example
1381 (interactive (list (or current-prefix-arg 'toggle)))
1382 (let ((enable (if (eq arg 'toggle)
1383 (not foo-mode) ; @r{this mode's mode variable}
1384 (> (prefix-numeric-value arg) 0))))
1385 (if enable
1386 @var{do-enable}
1387 @var{do-disable}))
1388 @end example
1389
1390 The reason for this somewhat complex behavior is that it lets users
1391 easily toggle the minor mode interactively, and also lets the minor mode
1392 be easily enabled in a mode hook, like this:
1393
1394 @example
1395 (add-hook 'text-mode-hook 'foo-mode)
1396 @end example
1397
1398 @noindent
1399 This behaves correctly whether or not @code{foo-mode} was already
1400 enabled, since the @code{foo-mode} mode command unconditionally enables
1401 the minor mode when it is called from Lisp with no argument. Disabling
1402 a minor mode in a mode hook is a little uglier:
1403
1404 @example
1405 (add-hook 'text-mode-hook (lambda () (foo-mode -1)))
1406 @end example
1407
1408 @noindent
1409 However, this is not very commonly done.
1410
1411 @item
1412 Add an element to @code{minor-mode-alist} for each minor mode
1413 (@pxref{Definition of minor-mode-alist}), if you want to indicate the
1414 minor mode in the mode line. This element should be a list of the
1415 following form:
1416
1417 @smallexample
1418 (@var{mode-variable} @var{string})
1419 @end smallexample
1420
1421 Here @var{mode-variable} is the variable that controls enabling of the
1422 minor mode, and @var{string} is a short string, starting with a space,
1423 to represent the mode in the mode line. These strings must be short so
1424 that there is room for several of them at once.
1425
1426 When you add an element to @code{minor-mode-alist}, use @code{assq} to
1427 check for an existing element, to avoid duplication. For example:
1428
1429 @smallexample
1430 @group
1431 (unless (assq 'leif-mode minor-mode-alist)
1432 (push '(leif-mode " Leif") minor-mode-alist))
1433 @end group
1434 @end smallexample
1435
1436 @noindent
1437 or like this, using @code{add-to-list} (@pxref{List Variables}):
1438
1439 @smallexample
1440 @group
1441 (add-to-list 'minor-mode-alist '(leif-mode " Leif"))
1442 @end group
1443 @end smallexample
1444 @end itemize
1445
1446 In addition, several major mode conventions apply to minor modes as
1447 well: those regarding the names of global symbols, the use of a hook at
1448 the end of the initialization function, and the use of keymaps and other
1449 tables.
1450
1451 The minor mode should, if possible, support enabling and disabling via
1452 Custom (@pxref{Customization}). To do this, the mode variable should be
1453 defined with @code{defcustom}, usually with @code{:type 'boolean}. If
1454 just setting the variable is not sufficient to enable the mode, you
1455 should also specify a @code{:set} method which enables the mode by
1456 invoking the mode command. Note in the variable's documentation string
1457 that setting the variable other than via Custom may not take effect.
1458 Also, mark the definition with an autoload cookie (@pxref{autoload
1459 cookie}), and specify a @code{:require} so that customizing the variable
1460 will load the library that defines the mode. For example:
1461
1462 @smallexample
1463 @group
1464 ;;;###autoload
1465 (defcustom msb-mode nil
1466 "Toggle msb-mode.
1467 Setting this variable directly does not take effect;
1468 use either \\[customize] or the function `msb-mode'."
1469 :set 'custom-set-minor-mode
1470 :initialize 'custom-initialize-default
1471 :version "20.4"
1472 :type 'boolean
1473 :group 'msb
1474 :require 'msb)
1475 @end group
1476 @end smallexample
1477
1478 @node Keymaps and Minor Modes
1479 @subsection Keymaps and Minor Modes
1480
1481 Each minor mode can have its own keymap, which is active when the mode
1482 is enabled. To set up a keymap for a minor mode, add an element to the
1483 alist @code{minor-mode-map-alist}. @xref{Definition of minor-mode-map-alist}.
1484
1485 @cindex @code{self-insert-command}, minor modes
1486 One use of minor mode keymaps is to modify the behavior of certain
1487 self-inserting characters so that they do something else as well as
1488 self-insert. (Another way to customize @code{self-insert-command} is
1489 through @code{post-self-insert-hook}. Apart from this, the facilities
1490 for customizing @code{self-insert-command} are limited to special cases,
1491 designed for abbrevs and Auto Fill mode. Do not try substituting your
1492 own definition of @code{self-insert-command} for the standard one. The
1493 editor command loop handles this function specially.)
1494
1495 Minor modes may bind commands to key sequences consisting of @kbd{C-c}
1496 followed by a punctuation character. However, sequences consisting of
1497 @kbd{C-c} followed by one of @kbd{@{@}<>:;}, or a control character or
1498 digit, are reserved for major modes. Also, @kbd{C-c @var{letter}} is
1499 reserved for users. @xref{Key Binding Conventions}.
1500
1501 @node Defining Minor Modes
1502 @subsection Defining Minor Modes
1503
1504 The macro @code{define-minor-mode} offers a convenient way of
1505 implementing a mode in one self-contained definition.
1506
1507 @defmac define-minor-mode mode doc [init-value [lighter [keymap]]] keyword-args@dots{} body@dots{}
1508 This macro defines a new minor mode whose name is @var{mode} (a
1509 symbol). It defines a command named @var{mode} to toggle the minor
1510 mode, with @var{doc} as its documentation string.
1511
1512 The toggle command takes one optional (prefix) argument.
1513 If called interactively with no argument it toggles the mode on or off.
1514 A positive prefix argument enables the mode, any other prefix argument
1515 disables it. From Lisp, an argument of @code{toggle} toggles the mode,
1516 whereas an omitted or @code{nil} argument enables the mode.
1517 This makes it easy to enable the minor mode in a major mode hook, for example.
1518 If @var{doc} is @code{nil}, the macro supplies a default documentation string
1519 explaining the above.
1520
1521 By default, it also defines a variable named @var{mode}, which is set to
1522 @code{t} or @code{nil} by enabling or disabling the mode. The variable
1523 is initialized to @var{init-value}. Except in unusual circumstances
1524 (see below), this value must be @code{nil}.
1525
1526 The string @var{lighter} says what to display in the mode line
1527 when the mode is enabled; if it is @code{nil}, the mode is not displayed
1528 in the mode line.
1529
1530 The optional argument @var{keymap} specifies the keymap for the minor
1531 mode. If non-@code{nil}, it should be a variable name (whose value is
1532 a keymap), a keymap, or an alist of the form
1533
1534 @example
1535 (@var{key-sequence} . @var{definition})
1536 @end example
1537
1538 @noindent
1539 where each @var{key-sequence} and @var{definition} are arguments
1540 suitable for passing to @code{define-key} (@pxref{Changing Key
1541 Bindings}). If @var{keymap} is a keymap or an alist, this also
1542 defines the variable @code{@var{mode}-map}.
1543
1544 The above three arguments @var{init-value}, @var{lighter}, and
1545 @var{keymap} can be (partially) omitted when @var{keyword-args} are
1546 used. The @var{keyword-args} consist of keywords followed by
1547 corresponding values. A few keywords have special meanings:
1548
1549 @table @code
1550 @item :group @var{group}
1551 Custom group name to use in all generated @code{defcustom} forms.
1552 Defaults to @var{mode} without the possible trailing @samp{-mode}.
1553 @strong{Warning:} don't use this default group name unless you have
1554 written a @code{defgroup} to define that group properly. @xref{Group
1555 Definitions}.
1556
1557 @item :global @var{global}
1558 If non-@code{nil}, this specifies that the minor mode should be global
1559 rather than buffer-local. It defaults to @code{nil}.
1560
1561 One of the effects of making a minor mode global is that the
1562 @var{mode} variable becomes a customization variable. Toggling it
1563 through the Customize interface turns the mode on and off, and its
1564 value can be saved for future Emacs sessions (@pxref{Saving
1565 Customizations,,, emacs, The GNU Emacs Manual}. For the saved
1566 variable to work, you should ensure that the @code{define-minor-mode}
1567 form is evaluated each time Emacs starts; for packages that are not
1568 part of Emacs, the easiest way to do this is to specify a
1569 @code{:require} keyword.
1570
1571 @item :init-value @var{init-value}
1572 This is equivalent to specifying @var{init-value} positionally.
1573
1574 @item :lighter @var{lighter}
1575 This is equivalent to specifying @var{lighter} positionally.
1576
1577 @item :keymap @var{keymap}
1578 This is equivalent to specifying @var{keymap} positionally.
1579
1580 @item :variable @var{place}
1581 This replaces the default variable @var{mode}, used to store the state
1582 of the mode. If you specify this, the @var{mode} variable is not
1583 defined, and any @var{init-value} argument is unused. @var{place}
1584 can be a different named variable (which you must define yourself), or
1585 anything that can be used with the @code{setf} function
1586 (@pxref{Generalized Variables}).
1587 @var{place} can also be a cons @code{(@var{get} . @var{set})},
1588 where @var{get} is an expression that returns the current state,
1589 and @var{set} is a function of one argument (a state) that sets it.
1590
1591 @item :after-hook @var{after-hook}
1592 This defines a single Lisp form which is evaluated after the mode hooks
1593 have run. It should not be quoted.
1594 @end table
1595
1596 Any other keyword arguments are passed directly to the
1597 @code{defcustom} generated for the variable @var{mode}.
1598
1599 The command named @var{mode} first performs the standard actions such as
1600 setting the variable named @var{mode} and then executes the @var{body}
1601 forms, if any. It then runs the mode hook variable
1602 @code{@var{mode}-hook} and finishes by evaluating any form in
1603 @code{:after-hook}.
1604 @end defmac
1605
1606 The initial value must be @code{nil} except in cases where (1) the
1607 mode is preloaded in Emacs, or (2) it is painless for loading to
1608 enable the mode even though the user did not request it. For
1609 instance, if the mode has no effect unless something else is enabled,
1610 and will always be loaded by that time, enabling it by default is
1611 harmless. But these are unusual circumstances. Normally, the
1612 initial value must be @code{nil}.
1613
1614 @findex easy-mmode-define-minor-mode
1615 The name @code{easy-mmode-define-minor-mode} is an alias
1616 for this macro.
1617
1618 Here is an example of using @code{define-minor-mode}:
1619
1620 @smallexample
1621 (define-minor-mode hungry-mode
1622 "Toggle Hungry mode.
1623 Interactively with no argument, this command toggles the mode.
1624 A positive prefix argument enables the mode, any other prefix
1625 argument disables it. From Lisp, argument omitted or nil enables
1626 the mode, `toggle' toggles the state.
1627
1628 When Hungry mode is enabled, the control delete key
1629 gobbles all preceding whitespace except the last.
1630 See the command \\[hungry-electric-delete]."
1631 ;; The initial value.
1632 nil
1633 ;; The indicator for the mode line.
1634 " Hungry"
1635 ;; The minor mode bindings.
1636 '(([C-backspace] . hungry-electric-delete))
1637 :group 'hunger)
1638 @end smallexample
1639
1640 @noindent
1641 This defines a minor mode named ``Hungry mode'', a command named
1642 @code{hungry-mode} to toggle it, a variable named @code{hungry-mode}
1643 which indicates whether the mode is enabled, and a variable named
1644 @code{hungry-mode-map} which holds the keymap that is active when the
1645 mode is enabled. It initializes the keymap with a key binding for
1646 @kbd{C-@key{DEL}}. It puts the variable @code{hungry-mode} into
1647 custom group @code{hunger}. There are no @var{body} forms---many
1648 minor modes don't need any.
1649
1650 Here's an equivalent way to write it:
1651
1652 @smallexample
1653 (define-minor-mode hungry-mode
1654 "Toggle Hungry mode.
1655 ...rest of documentation as before..."
1656 ;; The initial value.
1657 :init-value nil
1658 ;; The indicator for the mode line.
1659 :lighter " Hungry"
1660 ;; The minor mode bindings.
1661 :keymap
1662 '(([C-backspace] . hungry-electric-delete)
1663 ([C-M-backspace]
1664 . (lambda ()
1665 (interactive)
1666 (hungry-electric-delete t))))
1667 :group 'hunger)
1668 @end smallexample
1669
1670 @defmac define-globalized-minor-mode global-mode mode turn-on keyword-args@dots{}
1671 This defines a global toggle named @var{global-mode} whose meaning is
1672 to enable or disable the buffer-local minor mode @var{mode} in all
1673 buffers. To turn on the minor mode in a buffer, it uses the function
1674 @var{turn-on}; to turn off the minor mode, it calls @var{mode} with
1675 @minus{}1 as argument.
1676
1677 Globally enabling the mode also affects buffers subsequently created
1678 by visiting files, and buffers that use a major mode other than
1679 Fundamental mode; but it does not detect the creation of a new buffer
1680 in Fundamental mode.
1681
1682 This defines the customization option @var{global-mode} (@pxref{Customization}),
1683 which can be toggled in the Customize interface to turn the minor mode on
1684 and off. As with @code{define-minor-mode}, you should ensure that the
1685 @code{define-globalized-minor-mode} form is evaluated each time Emacs
1686 starts, for example by providing a @code{:require} keyword.
1687
1688 Use @code{:group @var{group}} in @var{keyword-args} to specify the
1689 custom group for the mode variable of the global minor mode.
1690
1691 Generally speaking, when you define a globalized minor mode, you should
1692 also define a non-globalized version, so that people can use (or
1693 disable) it in individual buffers. This also allows them to disable a
1694 globally enabled minor mode in a specific major mode, by using that
1695 mode's hook.
1696 @end defmac
1697
1698
1699 @node Mode Line Format
1700 @section Mode Line Format
1701 @cindex mode line
1702
1703 Each Emacs window (aside from minibuffer windows) typically has a mode
1704 line at the bottom, which displays status information about the buffer
1705 displayed in the window. The mode line contains information about the
1706 buffer, such as its name, associated file, depth of recursive editing,
1707 and major and minor modes. A window can also have a @dfn{header
1708 line}, which is much like the mode line but appears at the top of the
1709 window.
1710
1711 This section describes how to control the contents of the mode line
1712 and header line. We include it in this chapter because much of the
1713 information displayed in the mode line relates to the enabled major and
1714 minor modes.
1715
1716 @menu
1717 * Base: Mode Line Basics. Basic ideas of mode line control.
1718 * Data: Mode Line Data. The data structure that controls the mode line.
1719 * Top: Mode Line Top. The top level variable, mode-line-format.
1720 * Mode Line Variables:: Variables used in that data structure.
1721 * %-Constructs:: Putting information into a mode line.
1722 * Properties in Mode:: Using text properties in the mode line.
1723 * Header Lines:: Like a mode line, but at the top.
1724 * Emulating Mode Line:: Formatting text as the mode line would.
1725 @end menu
1726
1727 @node Mode Line Basics
1728 @subsection Mode Line Basics
1729
1730 The contents of each mode line are specified by the buffer-local
1731 variable @code{mode-line-format} (@pxref{Mode Line Top}). This variable
1732 holds a @dfn{mode line construct}: a template that controls what is
1733 displayed on the buffer's mode line. The value of
1734 @code{header-line-format} specifies the buffer's header line in the same
1735 way. All windows for the same buffer use the same
1736 @code{mode-line-format} and @code{header-line-format}.
1737
1738 For efficiency, Emacs does not continuously recompute each window's
1739 mode line and header line. It does so when circumstances appear to call
1740 for it---for instance, if you change the window configuration, switch
1741 buffers, narrow or widen the buffer, scroll, or modify the buffer. If
1742 you alter any of the variables referenced by @code{mode-line-format} or
1743 @code{header-line-format} (@pxref{Mode Line Variables}), or any other
1744 data structures that affect how text is displayed (@pxref{Display}), you
1745 should use the function @code{force-mode-line-update} to update the
1746 display.
1747
1748 @defun force-mode-line-update &optional all
1749 This function forces Emacs to update the current buffer's mode line and
1750 header line, based on the latest values of all relevant variables,
1751 during its next redisplay cycle. If the optional argument @var{all} is
1752 non-@code{nil}, it forces an update for all mode lines and header lines.
1753
1754 This function also forces an update of the menu bar and frame title.
1755 @end defun
1756
1757 The selected window's mode line is usually displayed in a different
1758 color using the face @code{mode-line}. Other windows' mode lines appear
1759 in the face @code{mode-line-inactive} instead. @xref{Faces}.
1760
1761 @node Mode Line Data
1762 @subsection The Data Structure of the Mode Line
1763 @cindex mode line construct
1764
1765 The mode line contents are controlled by a data structure called a
1766 @dfn{mode line construct}, made up of lists, strings, symbols, and
1767 numbers kept in buffer-local variables. Each data type has a specific
1768 meaning for the mode line appearance, as described below. The same data
1769 structure is used for constructing frame titles (@pxref{Frame Titles})
1770 and header lines (@pxref{Header Lines}).
1771
1772 A mode line construct may be as simple as a fixed string of text,
1773 but it usually specifies how to combine fixed strings with variables'
1774 values to construct the text. Many of these variables are themselves
1775 defined to have mode line constructs as their values.
1776
1777 Here are the meanings of various data types as mode line constructs:
1778
1779 @table @code
1780 @cindex percent symbol in mode line
1781 @item @var{string}
1782 A string as a mode line construct appears verbatim except for
1783 @dfn{@code{%}-constructs} in it. These stand for substitution of
1784 other data; see @ref{%-Constructs}.
1785
1786 If parts of the string have @code{face} properties, they control
1787 display of the text just as they would text in the buffer. Any
1788 characters which have no @code{face} properties are displayed, by
1789 default, in the face @code{mode-line} or @code{mode-line-inactive}
1790 (@pxref{Standard Faces,,, emacs, The GNU Emacs Manual}). The
1791 @code{help-echo} and @code{keymap} properties in @var{string} have
1792 special meanings. @xref{Properties in Mode}.
1793
1794 @item @var{symbol}
1795 A symbol as a mode line construct stands for its value. The value of
1796 @var{symbol} is used as a mode line construct, in place of @var{symbol}.
1797 However, the symbols @code{t} and @code{nil} are ignored, as is any
1798 symbol whose value is void.
1799
1800 There is one exception: if the value of @var{symbol} is a string, it is
1801 displayed verbatim: the @code{%}-constructs are not recognized.
1802
1803 Unless @var{symbol} is marked as risky (i.e., it has a
1804 non-@code{nil} @code{risky-local-variable} property), all text
1805 properties specified in @var{symbol}'s value are ignored. This includes
1806 the text properties of strings in @var{symbol}'s value, as well as all
1807 @code{:eval} and @code{:propertize} forms in it. (The reason for this
1808 is security: non-risky variables could be set automatically from file
1809 variables without prompting the user.)
1810
1811 @item (@var{string} @var{rest}@dots{})
1812 @itemx (@var{list} @var{rest}@dots{})
1813 A list whose first element is a string or list means to process all the
1814 elements recursively and concatenate the results. This is the most
1815 common form of mode line construct.
1816
1817 @item (:eval @var{form})
1818 A list whose first element is the symbol @code{:eval} says to evaluate
1819 @var{form}, and use the result as a string to display. Make sure this
1820 evaluation cannot load any files, as doing so could cause infinite
1821 recursion.
1822
1823 @item (:propertize @var{elt} @var{props}@dots{})
1824 A list whose first element is the symbol @code{:propertize} says to
1825 process the mode line construct @var{elt} recursively, then add the text
1826 properties specified by @var{props} to the result. The argument
1827 @var{props} should consist of zero or more pairs @var{text-property}
1828 @var{value}.
1829
1830 @item (@var{symbol} @var{then} @var{else})
1831 A list whose first element is a symbol that is not a keyword specifies
1832 a conditional. Its meaning depends on the value of @var{symbol}. If
1833 @var{symbol} has a non-@code{nil} value, the second element,
1834 @var{then}, is processed recursively as a mode line construct.
1835 Otherwise, the third element, @var{else}, is processed recursively.
1836 You may omit @var{else}; then the mode line construct displays nothing
1837 if the value of @var{symbol} is @code{nil} or void.
1838
1839 @item (@var{width} @var{rest}@dots{})
1840 A list whose first element is an integer specifies truncation or
1841 padding of the results of @var{rest}. The remaining elements
1842 @var{rest} are processed recursively as mode line constructs and
1843 concatenated together. When @var{width} is positive, the result is
1844 space filled on the right if its width is less than @var{width}. When
1845 @var{width} is negative, the result is truncated on the right to
1846 @minus{}@var{width} columns if its width exceeds @minus{}@var{width}.
1847
1848 For example, the usual way to show what percentage of a buffer is above
1849 the top of the window is to use a list like this: @code{(-3 "%p")}.
1850 @end table
1851
1852 @node Mode Line Top
1853 @subsection The Top Level of Mode Line Control
1854
1855 The variable in overall control of the mode line is
1856 @code{mode-line-format}.
1857
1858 @defopt mode-line-format
1859 The value of this variable is a mode line construct that controls the
1860 contents of the mode-line. It is always buffer-local in all buffers.
1861
1862 If you set this variable to @code{nil} in a buffer, that buffer does not
1863 have a mode line. (A window that is just one line tall also does not
1864 display a mode line.)
1865 @end defopt
1866
1867 The default value of @code{mode-line-format} is designed to use the
1868 values of other variables such as @code{mode-line-position} and
1869 @code{mode-line-modes} (which in turn incorporates the values of the
1870 variables @code{mode-name} and @code{minor-mode-alist}). Very few
1871 modes need to alter @code{mode-line-format} itself. For most
1872 purposes, it is sufficient to alter some of the variables that
1873 @code{mode-line-format} either directly or indirectly refers to.
1874
1875 If you do alter @code{mode-line-format} itself, the new value should
1876 use the same variables that appear in the default value (@pxref{Mode
1877 Line Variables}), rather than duplicating their contents or displaying
1878 the information in another fashion. This way, customizations made by
1879 the user or by Lisp programs (such as @code{display-time} and major
1880 modes) via changes to those variables remain effective.
1881
1882 Here is a hypothetical example of a @code{mode-line-format} that might
1883 be useful for Shell mode (in reality, Shell mode does not set
1884 @code{mode-line-format}):
1885
1886 @example
1887 @group
1888 (setq mode-line-format
1889 (list "-"
1890 'mode-line-mule-info
1891 'mode-line-modified
1892 'mode-line-frame-identification
1893 "%b--"
1894 @end group
1895 @group
1896 ;; @r{Note that this is evaluated while making the list.}
1897 ;; @r{It makes a mode line construct which is just a string.}
1898 (getenv "HOST")
1899 @end group
1900 ":"
1901 'default-directory
1902 " "
1903 'global-mode-string
1904 " %[("
1905 '(:eval (mode-line-mode-name))
1906 'mode-line-process
1907 'minor-mode-alist
1908 "%n"
1909 ")%]--"
1910 @group
1911 '(which-func-mode ("" which-func-format "--"))
1912 '(line-number-mode "L%l--")
1913 '(column-number-mode "C%c--")
1914 '(-3 "%p")))
1915 @end group
1916 @end example
1917
1918 @noindent
1919 (The variables @code{line-number-mode}, @code{column-number-mode}
1920 and @code{which-func-mode} enable particular minor modes; as usual,
1921 these variable names are also the minor mode command names.)
1922
1923 @node Mode Line Variables
1924 @subsection Variables Used in the Mode Line
1925
1926 This section describes variables incorporated by the standard value of
1927 @code{mode-line-format} into the text of the mode line. There is
1928 nothing inherently special about these variables; any other variables
1929 could have the same effects on the mode line if the value of
1930 @code{mode-line-format} is changed to use them. However, various parts
1931 of Emacs set these variables on the understanding that they will control
1932 parts of the mode line; therefore, practically speaking, it is essential
1933 for the mode line to use them. Also see
1934 @ref{Optional Mode Line,,, emacs, The GNU Emacs Manual}.
1935
1936 @defvar mode-line-mule-info
1937 This variable holds the value of the mode line construct that displays
1938 information about the language environment, buffer coding system, and
1939 current input method. @xref{Non-ASCII Characters}.
1940 @end defvar
1941
1942 @defvar mode-line-modified
1943 This variable holds the value of the mode line construct that displays
1944 whether the current buffer is modified. Its default value displays
1945 @samp{**} if the buffer is modified, @samp{--} if the buffer is not
1946 modified, @samp{%%} if the buffer is read only, and @samp{%*} if the
1947 buffer is read only and modified.
1948
1949 Changing this variable does not force an update of the mode line.
1950 @end defvar
1951
1952 @defvar mode-line-frame-identification
1953 This variable identifies the current frame. Its default value
1954 displays @code{" "} if you are using a window system which can show
1955 multiple frames, or @code{"-%F "} on an ordinary terminal which shows
1956 only one frame at a time.
1957 @end defvar
1958
1959 @defvar mode-line-buffer-identification
1960 This variable identifies the buffer being displayed in the window.
1961 Its default value displays the buffer name, padded with spaces to at
1962 least 12 columns.
1963 @end defvar
1964
1965 @defvar mode-line-position
1966 This variable indicates the position in the buffer. Its default value
1967 displays the buffer percentage and, optionally, the buffer size, the
1968 line number and the column number.
1969 @end defvar
1970
1971 @defvar vc-mode
1972 The variable @code{vc-mode}, buffer-local in each buffer, records
1973 whether the buffer's visited file is maintained with version control,
1974 and, if so, which kind. Its value is a string that appears in the mode
1975 line, or @code{nil} for no version control.
1976 @end defvar
1977
1978 @defvar mode-line-modes
1979 This variable displays the buffer's major and minor modes. Its
1980 default value also displays the recursive editing level, information
1981 on the process status, and whether narrowing is in effect.
1982 @end defvar
1983
1984 @defvar mode-line-remote
1985 This variable is used to show whether @code{default-directory} for the
1986 current buffer is remote.
1987 @end defvar
1988
1989 @defvar mode-line-client
1990 This variable is used to identify @code{emacsclient} frames.
1991 @end defvar
1992
1993 The following three variables are used in @code{mode-line-modes}:
1994
1995 @defvar mode-name
1996 This buffer-local variable holds the ``pretty'' name of the current
1997 buffer's major mode. Each major mode should set this variable so that
1998 the mode name will appear in the mode line. The value does not have
1999 to be a string, but can use any of the data types valid in a mode-line
2000 construct (@pxref{Mode Line Data}). To compute the string that will
2001 identify the mode name in the mode line, use @code{format-mode-line}
2002 (@pxref{Emulating Mode Line}).
2003 @end defvar
2004
2005 @defvar mode-line-process
2006 This buffer-local variable contains the mode line information on process
2007 status in modes used for communicating with subprocesses. It is
2008 displayed immediately following the major mode name, with no intervening
2009 space. For example, its value in the @file{*shell*} buffer is
2010 @code{(":%s")}, which allows the shell to display its status along
2011 with the major mode as: @samp{(Shell:run)}. Normally this variable
2012 is @code{nil}.
2013 @end defvar
2014
2015 @defvar mode-line-front-space
2016 This variable is displayed at the front of the mode line. By default,
2017 this construct is displayed right at the beginning of the mode line,
2018 except that if there is a memory-full message, it is displayed first.
2019 @end defvar
2020
2021 @defvar mode-line-end-spaces
2022 This variable is displayed at the end of the mode line.
2023 @end defvar
2024
2025 @defvar mode-line-misc-info
2026 Mode line construct for miscellaneous information. By default, this
2027 shows the information specified by @code{global-mode-string}.
2028 @end defvar
2029
2030 @defvar minor-mode-alist
2031 @anchor{Definition of minor-mode-alist}
2032 This variable holds an association list whose elements specify how the
2033 mode line should indicate that a minor mode is active. Each element of
2034 the @code{minor-mode-alist} should be a two-element list:
2035
2036 @example
2037 (@var{minor-mode-variable} @var{mode-line-string})
2038 @end example
2039
2040 More generally, @var{mode-line-string} can be any mode line construct.
2041 It appears in the mode line when the value of @var{minor-mode-variable}
2042 is non-@code{nil}, and not otherwise. These strings should begin with
2043 spaces so that they don't run together. Conventionally, the
2044 @var{minor-mode-variable} for a specific mode is set to a non-@code{nil}
2045 value when that minor mode is activated.
2046
2047 @code{minor-mode-alist} itself is not buffer-local. Each variable
2048 mentioned in the alist should be buffer-local if its minor mode can be
2049 enabled separately in each buffer.
2050 @end defvar
2051
2052 @defvar global-mode-string
2053 This variable holds a mode line construct that, by default, appears in
2054 the mode line just after the @code{which-func-mode} minor mode if set,
2055 else after @code{mode-line-modes}. The command @code{display-time} sets
2056 @code{global-mode-string} to refer to the variable
2057 @code{display-time-string}, which holds a string containing the time and
2058 load information.
2059
2060 The @samp{%M} construct substitutes the value of
2061 @code{global-mode-string}, but that is obsolete, since the variable is
2062 included in the mode line from @code{mode-line-format}.
2063 @end defvar
2064
2065 Here is a simplified version of the default value of
2066 @code{mode-line-format}. The real default value also
2067 specifies addition of text properties.
2068
2069 @example
2070 @group
2071 ("-"
2072 mode-line-mule-info
2073 mode-line-modified
2074 mode-line-frame-identification
2075 mode-line-buffer-identification
2076 @end group
2077 " "
2078 mode-line-position
2079 (vc-mode vc-mode)
2080 " "
2081 @group
2082 mode-line-modes
2083 (which-func-mode ("" which-func-format "--"))
2084 (global-mode-string ("--" global-mode-string))
2085 "-%-")
2086 @end group
2087 @end example
2088
2089 @node %-Constructs
2090 @subsection @code{%}-Constructs in the Mode Line
2091
2092 Strings used as mode line constructs can use certain
2093 @code{%}-constructs to substitute various kinds of data. The
2094 following is a list of the defined @code{%}-constructs, and what they
2095 mean.
2096
2097 In any construct except @samp{%%}, you can add a decimal integer
2098 after the @samp{%} to specify a minimum field width. If the width is
2099 less, the field is padded to that width. Purely numeric constructs
2100 (@samp{c}, @samp{i}, @samp{I}, and @samp{l}) are padded by inserting
2101 spaces to the left, and others are padded by inserting spaces to the
2102 right.
2103
2104 @table @code
2105 @item %b
2106 The current buffer name, obtained with the @code{buffer-name} function.
2107 @xref{Buffer Names}.
2108
2109 @item %c
2110 The current column number of point.
2111
2112 @item %e
2113 When Emacs is nearly out of memory for Lisp objects, a brief message
2114 saying so. Otherwise, this is empty.
2115
2116 @item %f
2117 The visited file name, obtained with the @code{buffer-file-name}
2118 function. @xref{Buffer File Name}.
2119
2120 @item %F
2121 The title (only on a window system) or the name of the selected frame.
2122 @xref{Basic Parameters}.
2123
2124 @item %i
2125 The size of the accessible part of the current buffer; basically
2126 @code{(- (point-max) (point-min))}.
2127
2128 @item %I
2129 Like @samp{%i}, but the size is printed in a more readable way by using
2130 @samp{k} for 10^3, @samp{M} for 10^6, @samp{G} for 10^9, etc., to
2131 abbreviate.
2132
2133 @item %l
2134 The current line number of point, counting within the accessible portion
2135 of the buffer.
2136
2137 @item %n
2138 @samp{Narrow} when narrowing is in effect; nothing otherwise (see
2139 @code{narrow-to-region} in @ref{Narrowing}).
2140
2141 @item %p
2142 The percentage of the buffer text above the @strong{top} of window, or
2143 @samp{Top}, @samp{Bottom} or @samp{All}. Note that the default mode
2144 line construct truncates this to three characters.
2145
2146 @item %P
2147 The percentage of the buffer text that is above the @strong{bottom} of
2148 the window (which includes the text visible in the window, as well as
2149 the text above the top), plus @samp{Top} if the top of the buffer is
2150 visible on screen; or @samp{Bottom} or @samp{All}.
2151
2152 @item %s
2153 The status of the subprocess belonging to the current buffer, obtained with
2154 @code{process-status}. @xref{Process Information}.
2155
2156 @item %z
2157 The mnemonics of keyboard, terminal, and buffer coding systems.
2158
2159 @item %Z
2160 Like @samp{%z}, but including the end-of-line format.
2161
2162 @item %*
2163 @samp{%} if the buffer is read only (see @code{buffer-read-only}); @*
2164 @samp{*} if the buffer is modified (see @code{buffer-modified-p}); @*
2165 @samp{-} otherwise. @xref{Buffer Modification}.
2166
2167 @item %+
2168 @samp{*} if the buffer is modified (see @code{buffer-modified-p}); @*
2169 @samp{%} if the buffer is read only (see @code{buffer-read-only}); @*
2170 @samp{-} otherwise. This differs from @samp{%*} only for a modified
2171 read-only buffer. @xref{Buffer Modification}.
2172
2173 @item %&
2174 @samp{*} if the buffer is modified, and @samp{-} otherwise.
2175
2176 @item %[
2177 An indication of the depth of recursive editing levels (not counting
2178 minibuffer levels): one @samp{[} for each editing level.
2179 @xref{Recursive Editing}.
2180
2181 @item %]
2182 One @samp{]} for each recursive editing level (not counting minibuffer
2183 levels).
2184
2185 @item %-
2186 Dashes sufficient to fill the remainder of the mode line.
2187
2188 @item %%
2189 The character @samp{%}---this is how to include a literal @samp{%} in a
2190 string in which @code{%}-constructs are allowed.
2191 @end table
2192
2193 The following two @code{%}-constructs are still supported, but they are
2194 obsolete, since you can get the same results with the variables
2195 @code{mode-name} and @code{global-mode-string}.
2196
2197 @table @code
2198 @item %m
2199 The value of @code{mode-name}.
2200
2201 @item %M
2202 The value of @code{global-mode-string}.
2203 @end table
2204
2205 @node Properties in Mode
2206 @subsection Properties in the Mode Line
2207 @cindex text properties in the mode line
2208
2209 Certain text properties are meaningful in the
2210 mode line. The @code{face} property affects the appearance of text; the
2211 @code{help-echo} property associates help strings with the text, and
2212 @code{keymap} can make the text mouse-sensitive.
2213
2214 There are four ways to specify text properties for text in the mode
2215 line:
2216
2217 @enumerate
2218 @item
2219 Put a string with a text property directly into the mode line data
2220 structure.
2221
2222 @item
2223 Put a text property on a mode line %-construct such as @samp{%12b}; then
2224 the expansion of the %-construct will have that same text property.
2225
2226 @item
2227 Use a @code{(:propertize @var{elt} @var{props}@dots{})} construct to
2228 give @var{elt} a text property specified by @var{props}.
2229
2230 @item
2231 Use a list containing @code{:eval @var{form}} in the mode line data
2232 structure, and make @var{form} evaluate to a string that has a text
2233 property.
2234 @end enumerate
2235
2236 You can use the @code{keymap} property to specify a keymap. This
2237 keymap only takes real effect for mouse clicks; binding character keys
2238 and function keys to it has no effect, since it is impossible to move
2239 point into the mode line.
2240
2241 When the mode line refers to a variable which does not have a
2242 non-@code{nil} @code{risky-local-variable} property, any text
2243 properties given or specified within that variable's values are
2244 ignored. This is because such properties could otherwise specify
2245 functions to be called, and those functions could come from file
2246 local variables.
2247
2248 @node Header Lines
2249 @subsection Window Header Lines
2250 @cindex header line (of a window)
2251 @cindex window header line
2252
2253 A window can have a @dfn{header line} at the top, just as it can have
2254 a mode line at the bottom. The header line feature works just like the
2255 mode line feature, except that it's controlled by
2256 @code{header-line-format}:
2257
2258 @defvar header-line-format
2259 This variable, local in every buffer, specifies how to display the
2260 header line, for windows displaying the buffer. The format of the value
2261 is the same as for @code{mode-line-format} (@pxref{Mode Line Data}).
2262 It is normally @code{nil}, so that ordinary buffers have no header line.
2263 @end defvar
2264
2265 @defun window-header-line-height &optional window
2266 This function returns the height in pixels of @var{window}'s header
2267 line. @var{window} must be a live window, and defaults to the
2268 selected window.
2269 @end defun
2270
2271 A window that is just one line tall never displays a header line. A
2272 window that is two lines tall cannot display both a mode line and a
2273 header line at once; if it has a mode line, then it does not display a
2274 header line.
2275
2276 @node Emulating Mode Line
2277 @subsection Emulating Mode Line Formatting
2278
2279 You can use the function @code{format-mode-line} to compute the text
2280 that would appear in a mode line or header line based on a certain
2281 mode line construct.
2282
2283 @defun format-mode-line format &optional face window buffer
2284 This function formats a line of text according to @var{format} as if it
2285 were generating the mode line for @var{window}, but it also returns the
2286 text as a string. The argument @var{window} defaults to the selected
2287 window. If @var{buffer} is non-@code{nil}, all the information used is
2288 taken from @var{buffer}; by default, it comes from @var{window}'s
2289 buffer.
2290
2291 The value string normally has text properties that correspond to the
2292 faces, keymaps, etc., that the mode line would have. Any character for
2293 which no @code{face} property is specified by @var{format} gets a
2294 default value determined by @var{face}. If @var{face} is @code{t}, that
2295 stands for either @code{mode-line} if @var{window} is selected,
2296 otherwise @code{mode-line-inactive}. If @var{face} is @code{nil} or
2297 omitted, that stands for the default face. If @var{face} is an integer,
2298 the value returned by this function will have no text properties.
2299
2300 You can also specify other valid faces as the value of @var{face}.
2301 If specified, that face provides the @code{face} property for characters
2302 whose face is not specified by @var{format}.
2303
2304 Note that using @code{mode-line}, @code{mode-line-inactive}, or
2305 @code{header-line} as @var{face} will actually redisplay the mode line
2306 or the header line, respectively, using the current definitions of the
2307 corresponding face, in addition to returning the formatted string.
2308 (Other faces do not cause redisplay.)
2309
2310 For example, @code{(format-mode-line header-line-format)} returns the
2311 text that would appear in the selected window's header line (@code{""}
2312 if it has no header line). @code{(format-mode-line header-line-format
2313 'header-line)} returns the same text, with each character
2314 carrying the face that it will have in the header line itself, and also
2315 redraws the header line.
2316 @end defun
2317
2318 @node Imenu
2319 @section Imenu
2320
2321 @cindex Imenu
2322 @dfn{Imenu} is a feature that lets users select a definition or
2323 section in the buffer, from a menu which lists all of them, to go
2324 directly to that location in the buffer. Imenu works by constructing
2325 a buffer index which lists the names and buffer positions of the
2326 definitions, or other named portions of the buffer; then the user can
2327 choose one of them and move point to it. Major modes can add a menu
2328 bar item to use Imenu using @code{imenu-add-to-menubar}.
2329
2330 @deffn Command imenu-add-to-menubar name
2331 This function defines a local menu bar item named @var{name}
2332 to run Imenu.
2333 @end deffn
2334
2335 The user-level commands for using Imenu are described in the Emacs
2336 Manual (@pxref{Imenu,, Imenu, emacs, the Emacs Manual}). This section
2337 explains how to customize Imenu's method of finding definitions or
2338 buffer portions for a particular major mode.
2339
2340 The usual and simplest way is to set the variable
2341 @code{imenu-generic-expression}:
2342
2343 @defvar imenu-generic-expression
2344 This variable, if non-@code{nil}, is a list that specifies regular
2345 expressions for finding definitions for Imenu. Simple elements of
2346 @code{imenu-generic-expression} look like this:
2347
2348 @example
2349 (@var{menu-title} @var{regexp} @var{index})
2350 @end example
2351
2352 Here, if @var{menu-title} is non-@code{nil}, it says that the matches
2353 for this element should go in a submenu of the buffer index;
2354 @var{menu-title} itself specifies the name for the submenu. If
2355 @var{menu-title} is @code{nil}, the matches for this element go directly
2356 in the top level of the buffer index.
2357
2358 The second item in the list, @var{regexp}, is a regular expression
2359 (@pxref{Regular Expressions}); anything in the buffer that it matches
2360 is considered a definition, something to mention in the buffer index.
2361 The third item, @var{index}, is a non-negative integer that indicates
2362 which subexpression in @var{regexp} matches the definition's name.
2363
2364 An element can also look like this:
2365
2366 @example
2367 (@var{menu-title} @var{regexp} @var{index} @var{function} @var{arguments}@dots{})
2368 @end example
2369
2370 Each match for this element creates an index item, and when the index
2371 item is selected by the user, it calls @var{function} with arguments
2372 consisting of the item name, the buffer position, and @var{arguments}.
2373
2374 For Emacs Lisp mode, @code{imenu-generic-expression} could look like
2375 this:
2376
2377 @c should probably use imenu-syntax-alist and \\sw rather than [-A-Za-z0-9+]
2378 @example
2379 @group
2380 ((nil "^\\s-*(def\\(un\\|subst\\|macro\\|advice\\)\
2381 \\s-+\\([-A-Za-z0-9+]+\\)" 2)
2382 @end group
2383 @group
2384 ("*Vars*" "^\\s-*(def\\(var\\|const\\)\
2385 \\s-+\\([-A-Za-z0-9+]+\\)" 2)
2386 @end group
2387 @group
2388 ("*Types*"
2389 "^\\s-*\
2390 (def\\(type\\|struct\\|class\\|ine-condition\\)\
2391 \\s-+\\([-A-Za-z0-9+]+\\)" 2))
2392 @end group
2393 @end example
2394
2395 Setting this variable makes it buffer-local in the current buffer.
2396 @end defvar
2397
2398 @defvar imenu-case-fold-search
2399 This variable controls whether matching against the regular
2400 expressions in the value of @code{imenu-generic-expression} is
2401 case-sensitive: @code{t}, the default, means matching should ignore
2402 case.
2403
2404 Setting this variable makes it buffer-local in the current buffer.
2405 @end defvar
2406
2407 @defvar imenu-syntax-alist
2408 This variable is an alist of syntax table modifiers to use while
2409 processing @code{imenu-generic-expression}, to override the syntax table
2410 of the current buffer. Each element should have this form:
2411
2412 @example
2413 (@var{characters} . @var{syntax-description})
2414 @end example
2415
2416 The @sc{car}, @var{characters}, can be either a character or a string.
2417 The element says to give that character or characters the syntax
2418 specified by @var{syntax-description}, which is passed to
2419 @code{modify-syntax-entry} (@pxref{Syntax Table Functions}).
2420
2421 This feature is typically used to give word syntax to characters which
2422 normally have symbol syntax, and thus to simplify
2423 @code{imenu-generic-expression} and speed up matching.
2424 For example, Fortran mode uses it this way:
2425
2426 @example
2427 (setq imenu-syntax-alist '(("_$" . "w")))
2428 @end example
2429
2430 The @code{imenu-generic-expression} regular expressions can then use
2431 @samp{\\sw+} instead of @samp{\\(\\sw\\|\\s_\\)+}. Note that this
2432 technique may be inconvenient when the mode needs to limit the initial
2433 character of a name to a smaller set of characters than are allowed in
2434 the rest of a name.
2435
2436 Setting this variable makes it buffer-local in the current buffer.
2437 @end defvar
2438
2439 Another way to customize Imenu for a major mode is to set the
2440 variables @code{imenu-prev-index-position-function} and
2441 @code{imenu-extract-index-name-function}:
2442
2443 @defvar imenu-prev-index-position-function
2444 If this variable is non-@code{nil}, its value should be a function that
2445 finds the next definition to put in the buffer index, scanning
2446 backward in the buffer from point. It should return @code{nil} if it
2447 doesn't find another definition before point. Otherwise it should
2448 leave point at the place it finds a definition and return any
2449 non-@code{nil} value.
2450
2451 Setting this variable makes it buffer-local in the current buffer.
2452 @end defvar
2453
2454 @defvar imenu-extract-index-name-function
2455 If this variable is non-@code{nil}, its value should be a function to
2456 return the name for a definition, assuming point is in that definition
2457 as the @code{imenu-prev-index-position-function} function would leave
2458 it.
2459
2460 Setting this variable makes it buffer-local in the current buffer.
2461 @end defvar
2462
2463 The last way to customize Imenu for a major mode is to set the
2464 variable @code{imenu-create-index-function}:
2465
2466 @defvar imenu-create-index-function
2467 This variable specifies the function to use for creating a buffer
2468 index. The function should take no arguments, and return an index
2469 alist for the current buffer. It is called within
2470 @code{save-excursion}, so where it leaves point makes no difference.
2471
2472 The index alist can have three types of elements. Simple elements
2473 look like this:
2474
2475 @example
2476 (@var{index-name} . @var{index-position})
2477 @end example
2478
2479 Selecting a simple element has the effect of moving to position
2480 @var{index-position} in the buffer. Special elements look like this:
2481
2482 @example
2483 (@var{index-name} @var{index-position} @var{function} @var{arguments}@dots{})
2484 @end example
2485
2486 Selecting a special element performs:
2487
2488 @example
2489 (funcall @var{function}
2490 @var{index-name} @var{index-position} @var{arguments}@dots{})
2491 @end example
2492
2493 A nested sub-alist element looks like this:
2494
2495 @example
2496 (@var{menu-title} . @var{sub-alist})
2497 @end example
2498
2499 It creates the submenu @var{menu-title} specified by @var{sub-alist}.
2500
2501 The default value of @code{imenu-create-index-function} is
2502 @code{imenu-default-create-index-function}. This function calls the
2503 value of @code{imenu-prev-index-position-function} and the value of
2504 @code{imenu-extract-index-name-function} to produce the index alist.
2505 However, if either of these two variables is @code{nil}, the default
2506 function uses @code{imenu-generic-expression} instead.
2507
2508 Setting this variable makes it buffer-local in the current buffer.
2509 @end defvar
2510
2511 @node Font Lock Mode
2512 @section Font Lock Mode
2513 @cindex Font Lock mode
2514
2515 @dfn{Font Lock mode} is a buffer-local minor mode that automatically
2516 attaches @code{face} properties to certain parts of the buffer based on
2517 their syntactic role. How it parses the buffer depends on the major
2518 mode; most major modes define syntactic criteria for which faces to use
2519 in which contexts. This section explains how to customize Font Lock for
2520 a particular major mode.
2521
2522 Font Lock mode finds text to highlight in two ways: through
2523 syntactic parsing based on the syntax table, and through searching
2524 (usually for regular expressions). Syntactic fontification happens
2525 first; it finds comments and string constants and highlights them.
2526 Search-based fontification happens second.
2527
2528 @menu
2529 * Font Lock Basics:: Overview of customizing Font Lock.
2530 * Search-based Fontification:: Fontification based on regexps.
2531 * Customizing Keywords:: Customizing search-based fontification.
2532 * Other Font Lock Variables:: Additional customization facilities.
2533 * Levels of Font Lock:: Each mode can define alternative levels
2534 so that the user can select more or less.
2535 * Precalculated Fontification:: How Lisp programs that produce the buffer
2536 contents can also specify how to fontify it.
2537 * Faces for Font Lock:: Special faces specifically for Font Lock.
2538 * Syntactic Font Lock:: Fontification based on syntax tables.
2539 * Multiline Font Lock:: How to coerce Font Lock into properly
2540 highlighting multiline constructs.
2541 @end menu
2542
2543 @node Font Lock Basics
2544 @subsection Font Lock Basics
2545
2546 The Font Lock functionality is based on several basic functions.
2547 Each of these calls the function specified by the corresponding
2548 variable. This indirection allows major and minor modes to modify the
2549 way fontification works in the buffers of that mode, and even use the
2550 Font Lock mechanisms for features that have nothing to do with
2551 fontification. (This is why the description below says ``should''
2552 when it describes what the functions do: the mode can customize the
2553 values of the corresponding variables to do something entirely
2554 different.) The variables mentioned below are described in @ref{Other
2555 Font Lock Variables}.
2556
2557 @ftable @code
2558 @item font-lock-fontify-buffer
2559 This function should fontify the current buffer's accessible portion,
2560 by calling the function specified by
2561 @code{font-lock-fontify-buffer-function}.
2562
2563 @item font-lock-unfontify-buffer
2564 Used when turning Font Lock off to remove the fontification. Calls
2565 the function specified by @code{font-lock-unfontify-buffer-function}.
2566
2567 @item font-lock-fontify-region beg end &optional loudly
2568 Should fontify the region between @var{beg} and @var{end}. If
2569 @var{loudly} is non-@code{nil}, should display status messages while
2570 fontifying. Calls the function specified by
2571 @code{font-lock-fontify-region-function}.
2572
2573 @item font-lock-unfontify-region beg end
2574 Should remove fontification from the region between @var{beg} and
2575 @var{end}. Calls the function specified by
2576 @code{font-lock-unfontify-region-function}.
2577
2578 @item font-lock-flush &optional beg end
2579 This function should mark the fontification of the region between
2580 @var{beg} and @var{end} as outdated. If not specified or @code{nil},
2581 @var{beg} and @var{end} default to the beginning and end of the
2582 buffer's accessible portion. Calls the function specified by
2583 @code{font-lock-flush-function}.
2584
2585 @item font-lock-ensure &optional beg end
2586 This function should make sure the region between @var{beg} and
2587 @var{end} has been fontified. The optional arguments @var{beg} and
2588 @var{end} default to the beginning and the end of the buffer's
2589 accessible portion. Calls the function specified by
2590 @code{font-lock-ensure-function}.
2591 @end ftable
2592
2593 There are several variables that control how Font Lock mode highlights
2594 text. But major modes should not set any of these variables directly.
2595 Instead, they should set @code{font-lock-defaults} as a buffer-local
2596 variable. The value assigned to this variable is used, if and when Font
2597 Lock mode is enabled, to set all the other variables.
2598
2599 @defvar font-lock-defaults
2600 This variable is set by modes to specify how to fontify text in that
2601 mode. It automatically becomes buffer-local when set. If its value
2602 is @code{nil}, Font Lock mode does no highlighting, and you can use
2603 the @samp{Faces} menu (under @samp{Edit} and then @samp{Text
2604 Properties} in the menu bar) to assign faces explicitly to text in the
2605 buffer.
2606
2607 If non-@code{nil}, the value should look like this:
2608
2609 @example
2610 (@var{keywords} [@var{keywords-only} [@var{case-fold}
2611 [@var{syntax-alist} @var{other-vars}@dots{}]]])
2612 @end example
2613
2614 The first element, @var{keywords}, indirectly specifies the value of
2615 @code{font-lock-keywords} which directs search-based fontification.
2616 It can be a symbol, a variable or a function whose value is the list
2617 to use for @code{font-lock-keywords}. It can also be a list of
2618 several such symbols, one for each possible level of fontification.
2619 The first symbol specifies the @samp{mode default} level of
2620 fontification, the next symbol level 1 fontification, the next level 2,
2621 and so on. The @samp{mode default} level is normally the same as level
2622 1. It is used when @code{font-lock-maximum-decoration} has a @code{nil}
2623 value. @xref{Levels of Font Lock}.
2624
2625 The second element, @var{keywords-only}, specifies the value of the
2626 variable @code{font-lock-keywords-only}. If this is omitted or
2627 @code{nil}, syntactic fontification (of strings and comments) is also
2628 performed. If this is non-@code{nil}, syntactic fontification is not
2629 performed. @xref{Syntactic Font Lock}.
2630
2631 The third element, @var{case-fold}, specifies the value of
2632 @code{font-lock-keywords-case-fold-search}. If it is non-@code{nil},
2633 Font Lock mode ignores case during search-based fontification.
2634
2635 If the fourth element, @var{syntax-alist}, is non-@code{nil}, it should
2636 be a list of cons cells of the form @code{(@var{char-or-string}
2637 . @var{string})}. These are used to set up a syntax table for syntactic
2638 fontification; the resulting syntax table is stored in
2639 @code{font-lock-syntax-table}. If @var{syntax-alist} is omitted or
2640 @code{nil}, syntactic fontification uses the syntax table returned by
2641 the @code{syntax-table} function. @xref{Syntax Table Functions}.
2642
2643 All the remaining elements (if any) are collectively called
2644 @var{other-vars}. Each of these elements should have the form
2645 @code{(@var{variable} . @var{value})}---which means, make
2646 @var{variable} buffer-local and then set it to @var{value}. You can
2647 use these @var{other-vars} to set other variables that affect
2648 fontification, aside from those you can control with the first five
2649 elements. @xref{Other Font Lock Variables}.
2650 @end defvar
2651
2652 If your mode fontifies text explicitly by adding
2653 @code{font-lock-face} properties, it can specify @code{(nil t)} for
2654 @code{font-lock-defaults} to turn off all automatic fontification.
2655 However, this is not required; it is possible to fontify some things
2656 using @code{font-lock-face} properties and set up automatic
2657 fontification for other parts of the text.
2658
2659 @node Search-based Fontification
2660 @subsection Search-based Fontification
2661
2662 The variable which directly controls search-based fontification is
2663 @code{font-lock-keywords}, which is typically specified via the
2664 @var{keywords} element in @code{font-lock-defaults}.
2665
2666 @defvar font-lock-keywords
2667 The value of this variable is a list of the keywords to highlight. Lisp
2668 programs should not set this variable directly. Normally, the value is
2669 automatically set by Font Lock mode, using the @var{keywords} element in
2670 @code{font-lock-defaults}. The value can also be altered using the
2671 functions @code{font-lock-add-keywords} and
2672 @code{font-lock-remove-keywords} (@pxref{Customizing Keywords}).
2673 @end defvar
2674
2675 Each element of @code{font-lock-keywords} specifies how to find
2676 certain cases of text, and how to highlight those cases. Font Lock mode
2677 processes the elements of @code{font-lock-keywords} one by one, and for
2678 each element, it finds and handles all matches. Ordinarily, once
2679 part of the text has been fontified already, this cannot be overridden
2680 by a subsequent match in the same text; but you can specify different
2681 behavior using the @var{override} element of a @var{subexp-highlighter}.
2682
2683 Each element of @code{font-lock-keywords} should have one of these
2684 forms:
2685
2686 @table @code
2687 @item @var{regexp}
2688 Highlight all matches for @var{regexp} using
2689 @code{font-lock-keyword-face}. For example,
2690
2691 @example
2692 ;; @r{Highlight occurrences of the word @samp{foo}}
2693 ;; @r{using @code{font-lock-keyword-face}.}
2694 "\\<foo\\>"
2695 @end example
2696
2697 Be careful when composing these regular expressions; a poorly written
2698 pattern can dramatically slow things down! The function
2699 @code{regexp-opt} (@pxref{Regexp Functions}) is useful for calculating
2700 optimal regular expressions to match several keywords.
2701
2702 @item @var{function}
2703 Find text by calling @var{function}, and highlight the matches
2704 it finds using @code{font-lock-keyword-face}.
2705
2706 When @var{function} is called, it receives one argument, the limit of
2707 the search; it should begin searching at point, and not search beyond the
2708 limit. It should return non-@code{nil} if it succeeds, and set the
2709 match data to describe the match that was found. Returning @code{nil}
2710 indicates failure of the search.
2711
2712 Fontification will call @var{function} repeatedly with the same limit,
2713 and with point where the previous invocation left it, until
2714 @var{function} fails. On failure, @var{function} need not reset point
2715 in any particular way.
2716
2717 @item (@var{matcher} . @var{subexp})
2718 In this kind of element, @var{matcher} is either a regular
2719 expression or a function, as described above. The @sc{cdr},
2720 @var{subexp}, specifies which subexpression of @var{matcher} should be
2721 highlighted (instead of the entire text that @var{matcher} matched).
2722
2723 @example
2724 ;; @r{Highlight the @samp{bar} in each occurrence of @samp{fubar},}
2725 ;; @r{using @code{font-lock-keyword-face}.}
2726 ("fu\\(bar\\)" . 1)
2727 @end example
2728
2729 If you use @code{regexp-opt} to produce the regular expression
2730 @var{matcher}, you can use @code{regexp-opt-depth} (@pxref{Regexp
2731 Functions}) to calculate the value for @var{subexp}.
2732
2733 @item (@var{matcher} . @var{facespec})
2734 In this kind of element, @var{facespec} is an expression whose value
2735 specifies the face to use for highlighting. In the simplest case,
2736 @var{facespec} is a Lisp variable (a symbol) whose value is a face
2737 name.
2738
2739 @example
2740 ;; @r{Highlight occurrences of @samp{fubar},}
2741 ;; @r{using the face which is the value of @code{fubar-face}.}
2742 ("fubar" . fubar-face)
2743 @end example
2744
2745 However, @var{facespec} can also evaluate to a list of this form:
2746
2747 @example
2748 (face @var{face} @var{prop1} @var{val1} @var{prop2} @var{val2}@dots{})
2749 @end example
2750
2751 @noindent
2752 to specify the face @var{face} and various additional text properties
2753 to put on the text that matches. If you do this, be sure to add the
2754 other text property names that you set in this way to the value of
2755 @code{font-lock-extra-managed-props} so that the properties will also
2756 be cleared out when they are no longer appropriate. Alternatively,
2757 you can set the variable @code{font-lock-unfontify-region-function} to
2758 a function that clears these properties. @xref{Other Font Lock
2759 Variables}.
2760
2761 @item (@var{matcher} . @var{subexp-highlighter})
2762 In this kind of element, @var{subexp-highlighter} is a list
2763 which specifies how to highlight matches found by @var{matcher}.
2764 It has the form:
2765
2766 @example
2767 (@var{subexp} @var{facespec} [@var{override} [@var{laxmatch}]])
2768 @end example
2769
2770 The @sc{car}, @var{subexp}, is an integer specifying which subexpression
2771 of the match to fontify (0 means the entire matching text). The second
2772 subelement, @var{facespec}, is an expression whose value specifies the
2773 face, as described above.
2774
2775 The last two values in @var{subexp-highlighter}, @var{override} and
2776 @var{laxmatch}, are optional flags. If @var{override} is @code{t},
2777 this element can override existing fontification made by previous
2778 elements of @code{font-lock-keywords}. If it is @code{keep}, then
2779 each character is fontified if it has not been fontified already by
2780 some other element. If it is @code{prepend}, the face specified by
2781 @var{facespec} is added to the beginning of the @code{font-lock-face}
2782 property. If it is @code{append}, the face is added to the end of the
2783 @code{font-lock-face} property.
2784
2785 If @var{laxmatch} is non-@code{nil}, it means there should be no error
2786 if there is no subexpression numbered @var{subexp} in @var{matcher}.
2787 Obviously, fontification of the subexpression numbered @var{subexp} will
2788 not occur. However, fontification of other subexpressions (and other
2789 regexps) will continue. If @var{laxmatch} is @code{nil}, and the
2790 specified subexpression is missing, then an error is signaled which
2791 terminates search-based fontification.
2792
2793 Here are some examples of elements of this kind, and what they do:
2794
2795 @smallexample
2796 ;; @r{Highlight occurrences of either @samp{foo} or @samp{bar}, using}
2797 ;; @r{@code{foo-bar-face}, even if they have already been highlighted.}
2798 ;; @r{@code{foo-bar-face} should be a variable whose value is a face.}
2799 ("foo\\|bar" 0 foo-bar-face t)
2800
2801 ;; @r{Highlight the first subexpression within each occurrence}
2802 ;; @r{that the function @code{fubar-match} finds,}
2803 ;; @r{using the face which is the value of @code{fubar-face}.}
2804 (fubar-match 1 fubar-face)
2805 @end smallexample
2806
2807 @item (@var{matcher} . @var{anchored-highlighter})
2808 In this kind of element, @var{anchored-highlighter} specifies how to
2809 highlight text that follows a match found by @var{matcher}. So a
2810 match found by @var{matcher} acts as the anchor for further searches
2811 specified by @var{anchored-highlighter}. @var{anchored-highlighter}
2812 is a list of the following form:
2813
2814 @example
2815 (@var{anchored-matcher} @var{pre-form} @var{post-form}
2816 @var{subexp-highlighters}@dots{})
2817 @end example
2818
2819 Here, @var{anchored-matcher}, like @var{matcher}, is either a regular
2820 expression or a function. After a match of @var{matcher} is found,
2821 point is at the end of the match. Now, Font Lock evaluates the form
2822 @var{pre-form}. Then it searches for matches of
2823 @var{anchored-matcher} and uses @var{subexp-highlighters} to highlight
2824 these. A @var{subexp-highlighter} is as described above. Finally,
2825 Font Lock evaluates @var{post-form}.
2826
2827 The forms @var{pre-form} and @var{post-form} can be used to initialize
2828 before, and cleanup after, @var{anchored-matcher} is used. Typically,
2829 @var{pre-form} is used to move point to some position relative to the
2830 match of @var{matcher}, before starting with @var{anchored-matcher}.
2831 @var{post-form} might be used to move back, before resuming with
2832 @var{matcher}.
2833
2834 After Font Lock evaluates @var{pre-form}, it does not search for
2835 @var{anchored-matcher} beyond the end of the line. However, if
2836 @var{pre-form} returns a buffer position that is greater than the
2837 position of point after @var{pre-form} is evaluated, then the position
2838 returned by @var{pre-form} is used as the limit of the search instead.
2839 It is generally a bad idea to return a position greater than the end
2840 of the line; in other words, the @var{anchored-matcher} search should
2841 not span lines.
2842
2843 For example,
2844
2845 @smallexample
2846 ;; @r{Highlight occurrences of the word @samp{item} following}
2847 ;; @r{an occurrence of the word @samp{anchor} (on the same line)}
2848 ;; @r{in the value of @code{item-face}.}
2849 ("\\<anchor\\>" "\\<item\\>" nil nil (0 item-face))
2850 @end smallexample
2851
2852 Here, @var{pre-form} and @var{post-form} are @code{nil}. Therefore
2853 searching for @samp{item} starts at the end of the match of
2854 @samp{anchor}, and searching for subsequent instances of @samp{anchor}
2855 resumes from where searching for @samp{item} concluded.
2856
2857 @item (@var{matcher} @var{highlighters}@dots{})
2858 This sort of element specifies several @var{highlighter} lists for a
2859 single @var{matcher}. A @var{highlighter} list can be of the type
2860 @var{subexp-highlighter} or @var{anchored-highlighter} as described
2861 above.
2862
2863 For example,
2864
2865 @smallexample
2866 ;; @r{Highlight occurrences of the word @samp{anchor} in the value}
2867 ;; @r{of @code{anchor-face}, and subsequent occurrences of the word}
2868 ;; @r{@samp{item} (on the same line) in the value of @code{item-face}.}
2869 ("\\<anchor\\>" (0 anchor-face)
2870 ("\\<item\\>" nil nil (0 item-face)))
2871 @end smallexample
2872
2873 @item (eval . @var{form})
2874 Here @var{form} is an expression to be evaluated the first time
2875 this value of @code{font-lock-keywords} is used in a buffer.
2876 Its value should have one of the forms described in this table.
2877 @end table
2878
2879 @strong{Warning:} Do not design an element of @code{font-lock-keywords}
2880 to match text which spans lines; this does not work reliably.
2881 For details, see @xref{Multiline Font Lock}.
2882
2883 You can use @var{case-fold} in @code{font-lock-defaults} to specify
2884 the value of @code{font-lock-keywords-case-fold-search} which says
2885 whether search-based fontification should be case-insensitive.
2886
2887 @defvar font-lock-keywords-case-fold-search
2888 Non-@code{nil} means that regular expression matching for the sake of
2889 @code{font-lock-keywords} should be case-insensitive.
2890 @end defvar
2891
2892 @node Customizing Keywords
2893 @subsection Customizing Search-Based Fontification
2894
2895 You can use @code{font-lock-add-keywords} to add additional
2896 search-based fontification rules to a major mode, and
2897 @code{font-lock-remove-keywords} to remove rules.
2898
2899 @defun font-lock-add-keywords mode keywords &optional how
2900 This function adds highlighting @var{keywords}, for the current buffer
2901 or for major mode @var{mode}. The argument @var{keywords} should be a
2902 list with the same format as the variable @code{font-lock-keywords}.
2903
2904 If @var{mode} is a symbol which is a major mode command name, such as
2905 @code{c-mode}, the effect is that enabling Font Lock mode in
2906 @var{mode} will add @var{keywords} to @code{font-lock-keywords}.
2907 Calling with a non-@code{nil} value of @var{mode} is correct only in
2908 your @file{~/.emacs} file.
2909
2910 If @var{mode} is @code{nil}, this function adds @var{keywords} to
2911 @code{font-lock-keywords} in the current buffer. This way of calling
2912 @code{font-lock-add-keywords} is usually used in mode hook functions.
2913
2914 By default, @var{keywords} are added at the beginning of
2915 @code{font-lock-keywords}. If the optional argument @var{how} is
2916 @code{set}, they are used to replace the value of
2917 @code{font-lock-keywords}. If @var{how} is any other non-@code{nil}
2918 value, they are added at the end of @code{font-lock-keywords}.
2919
2920 Some modes provide specialized support you can use in additional
2921 highlighting patterns. See the variables
2922 @code{c-font-lock-extra-types}, @code{c++-font-lock-extra-types},
2923 and @code{java-font-lock-extra-types}, for example.
2924
2925 @strong{Warning:} Major mode commands must not call
2926 @code{font-lock-add-keywords} under any circumstances, either directly
2927 or indirectly, except through their mode hooks. (Doing so would lead to
2928 incorrect behavior for some minor modes.) They should set up their
2929 rules for search-based fontification by setting
2930 @code{font-lock-keywords}.
2931 @end defun
2932
2933 @defun font-lock-remove-keywords mode keywords
2934 This function removes @var{keywords} from @code{font-lock-keywords}
2935 for the current buffer or for major mode @var{mode}. As in
2936 @code{font-lock-add-keywords}, @var{mode} should be a major mode
2937 command name or @code{nil}. All the caveats and requirements for
2938 @code{font-lock-add-keywords} apply here too.
2939 @end defun
2940
2941 For example, the following code adds two fontification patterns for C
2942 mode: one to fontify the word @samp{FIXME}, even in comments, and
2943 another to fontify the words @samp{and}, @samp{or} and @samp{not} as
2944 keywords.
2945
2946 @smallexample
2947 (font-lock-add-keywords 'c-mode
2948 '(("\\<\\(FIXME\\):" 1 font-lock-warning-face prepend)
2949 ("\\<\\(and\\|or\\|not\\)\\>" . font-lock-keyword-face)))
2950 @end smallexample
2951
2952 @noindent
2953 This example affects only C mode proper. To add the same patterns to C
2954 mode @emph{and} all modes derived from it, do this instead:
2955
2956 @smallexample
2957 (add-hook 'c-mode-hook
2958 (lambda ()
2959 (font-lock-add-keywords nil
2960 '(("\\<\\(FIXME\\):" 1 font-lock-warning-face prepend)
2961 ("\\<\\(and\\|or\\|not\\)\\>" .
2962 font-lock-keyword-face)))))
2963 @end smallexample
2964
2965 @node Other Font Lock Variables
2966 @subsection Other Font Lock Variables
2967
2968 This section describes additional variables that a major mode can
2969 set by means of @var{other-vars} in @code{font-lock-defaults}
2970 (@pxref{Font Lock Basics}).
2971
2972 @defvar font-lock-mark-block-function
2973 If this variable is non-@code{nil}, it should be a function that is
2974 called with no arguments, to choose an enclosing range of text for
2975 refontification for the command @kbd{M-o M-o}
2976 (@code{font-lock-fontify-block}).
2977
2978 The function should report its choice by placing the region around it.
2979 A good choice is a range of text large enough to give proper results,
2980 but not too large so that refontification becomes slow. Typical values
2981 are @code{mark-defun} for programming modes or @code{mark-paragraph} for
2982 textual modes.
2983 @end defvar
2984
2985 @defvar font-lock-extra-managed-props
2986 This variable specifies additional properties (other than
2987 @code{font-lock-face}) that are being managed by Font Lock mode. It
2988 is used by @code{font-lock-default-unfontify-region}, which normally
2989 only manages the @code{font-lock-face} property. If you want Font
2990 Lock to manage other properties as well, you must specify them in a
2991 @var{facespec} in @code{font-lock-keywords} as well as add them to
2992 this list. @xref{Search-based Fontification}.
2993 @end defvar
2994
2995 @defvar font-lock-fontify-buffer-function
2996 Function to use for fontifying the buffer. The default value is
2997 @code{font-lock-default-fontify-buffer}.
2998 @end defvar
2999
3000 @defvar font-lock-unfontify-buffer-function
3001 Function to use for unfontifying the buffer. This is used when
3002 turning off Font Lock mode. The default value is
3003 @code{font-lock-default-unfontify-buffer}.
3004 @end defvar
3005
3006 @defvar font-lock-fontify-region-function
3007 Function to use for fontifying a region. It should take two
3008 arguments, the beginning and end of the region, and an optional third
3009 argument @var{verbose}. If @var{verbose} is non-@code{nil}, the
3010 function should print status messages. The default value is
3011 @code{font-lock-default-fontify-region}.
3012 @end defvar
3013
3014 @defvar font-lock-unfontify-region-function
3015 Function to use for unfontifying a region. It should take two
3016 arguments, the beginning and end of the region. The default value is
3017 @code{font-lock-default-unfontify-region}.
3018 @end defvar
3019
3020 @defvar font-lock-flush-function
3021 Function to use for declaring that a region's fontification is out of
3022 date. It takes two arguments, the beginning and end of the region.
3023 The default value of this variable is
3024 @code{font-lock-after-change-function}.
3025 @end defvar
3026
3027 @defvar font-lock-ensure-function
3028 Function to use for making sure a region of the current buffer has
3029 been fontified. It is called with two arguments, the beginning and
3030 end of the region. The default value of this variable is a function
3031 that calls @code{font-lock-default-fontify-buffer} if the buffer is
3032 not fontified; the effect is to make sure the entire accessible
3033 portion of the buffer is fontified.
3034 @end defvar
3035
3036 @defun jit-lock-register function &optional contextual
3037 This function tells Font Lock mode to run the Lisp function
3038 @var{function} any time it has to fontify or refontify part of the
3039 current buffer. It calls @var{function} before calling the default
3040 fontification functions, and gives it two arguments, @var{start} and
3041 @var{end}, which specify the region to be fontified or refontified.
3042
3043 The optional argument @var{contextual}, if non-@code{nil}, forces Font
3044 Lock mode to always refontify a syntactically relevant part of the
3045 buffer, and not just the modified lines. This argument can usually be
3046 omitted.
3047 @end defun
3048
3049 @defun jit-lock-unregister function
3050 If @var{function} was previously registered as a fontification
3051 function using @code{jit-lock-register}, this function unregisters it.
3052 @end defun
3053
3054 @node Levels of Font Lock
3055 @subsection Levels of Font Lock
3056
3057 Some major modes offer three different levels of fontification. You
3058 can define multiple levels by using a list of symbols for @var{keywords}
3059 in @code{font-lock-defaults}. Each symbol specifies one level of
3060 fontification; it is up to the user to choose one of these levels,
3061 normally by setting @code{font-lock-maximum-decoration} (@pxref{Font
3062 Lock,,, emacs, the GNU Emacs Manual}). The chosen level's symbol value
3063 is used to initialize @code{font-lock-keywords}.
3064
3065 Here are the conventions for how to define the levels of
3066 fontification:
3067
3068 @itemize @bullet
3069 @item
3070 Level 1: highlight function declarations, file directives (such as include or
3071 import directives), strings and comments. The idea is speed, so only
3072 the most important and top-level components are fontified.
3073
3074 @item
3075 Level 2: in addition to level 1, highlight all language keywords,
3076 including type names that act like keywords, as well as named constant
3077 values. The idea is that all keywords (either syntactic or semantic)
3078 should be fontified appropriately.
3079
3080 @item
3081 Level 3: in addition to level 2, highlight the symbols being defined in
3082 function and variable declarations, and all builtin function names,
3083 wherever they appear.
3084 @end itemize
3085
3086 @node Precalculated Fontification
3087 @subsection Precalculated Fontification
3088
3089 Some major modes such as @code{list-buffers} and @code{occur}
3090 construct the buffer text programmatically. The easiest way for them
3091 to support Font Lock mode is to specify the faces of text when they
3092 insert the text in the buffer.
3093
3094 The way to do this is to specify the faces in the text with the
3095 special text property @code{font-lock-face} (@pxref{Special
3096 Properties}). When Font Lock mode is enabled, this property controls
3097 the display, just like the @code{face} property. When Font Lock mode
3098 is disabled, @code{font-lock-face} has no effect on the display.
3099
3100 It is ok for a mode to use @code{font-lock-face} for some text and
3101 also use the normal Font Lock machinery. But if the mode does not use
3102 the normal Font Lock machinery, it should not set the variable
3103 @code{font-lock-defaults}.
3104
3105 @node Faces for Font Lock
3106 @subsection Faces for Font Lock
3107 @cindex faces for font lock
3108 @cindex font lock faces
3109
3110 Font Lock mode can highlight using any face, but Emacs defines several
3111 faces specifically for Font Lock to use to highlight text. These
3112 @dfn{Font Lock faces} are listed below. They can also be used by major
3113 modes for syntactic highlighting outside of Font Lock mode (@pxref{Major
3114 Mode Conventions}).
3115
3116 Each of these symbols is both a face name, and a variable whose
3117 default value is the symbol itself. Thus, the default value of
3118 @code{font-lock-comment-face} is @code{font-lock-comment-face}.
3119
3120 The faces are listed with descriptions of their typical usage, and in
3121 order of greater to lesser prominence. If a mode's syntactic
3122 categories do not fit well with the usage descriptions, the faces can be
3123 assigned using the ordering as a guide.
3124
3125 @table @code
3126 @item font-lock-warning-face
3127 @vindex font-lock-warning-face
3128 for a construct that is peculiar, or that greatly changes the meaning of
3129 other text, like @samp{;;;###autoload} in Emacs Lisp and @samp{#error}
3130 in C.
3131
3132 @item font-lock-function-name-face
3133 @vindex font-lock-function-name-face
3134 for the name of a function being defined or declared.
3135
3136 @item font-lock-variable-name-face
3137 @vindex font-lock-variable-name-face
3138 for the name of a variable being defined or declared.
3139
3140 @item font-lock-keyword-face
3141 @vindex font-lock-keyword-face
3142 for a keyword with special syntactic significance, like @samp{for} and
3143 @samp{if} in C.
3144
3145 @item font-lock-comment-face
3146 @vindex font-lock-comment-face
3147 for comments.
3148
3149 @item font-lock-comment-delimiter-face
3150 @vindex font-lock-comment-delimiter-face
3151 for comments delimiters, like @samp{/*} and @samp{*/} in C@. On most
3152 terminals, this inherits from @code{font-lock-comment-face}.
3153
3154 @item font-lock-type-face
3155 @vindex font-lock-type-face
3156 for the names of user-defined data types.
3157
3158 @item font-lock-constant-face
3159 @vindex font-lock-constant-face
3160 for the names of constants, like @samp{NULL} in C.
3161
3162 @item font-lock-builtin-face
3163 @vindex font-lock-builtin-face
3164 for the names of built-in functions.
3165
3166 @item font-lock-preprocessor-face
3167 @vindex font-lock-preprocessor-face
3168 for preprocessor commands. This inherits, by default, from
3169 @code{font-lock-builtin-face}.
3170
3171 @item font-lock-string-face
3172 @vindex font-lock-string-face
3173 for string constants.
3174
3175 @item font-lock-doc-face
3176 @vindex font-lock-doc-face
3177 for documentation strings in the code. This inherits, by default, from
3178 @code{font-lock-string-face}.
3179
3180 @item font-lock-negation-char-face
3181 @vindex font-lock-negation-char-face
3182 for easily-overlooked negation characters.
3183 @end table
3184
3185 @node Syntactic Font Lock
3186 @subsection Syntactic Font Lock
3187 @cindex syntactic font lock
3188
3189 Syntactic fontification uses a syntax table (@pxref{Syntax Tables}) to
3190 find and highlight syntactically relevant text. If enabled, it runs
3191 prior to search-based fontification. The variable
3192 @code{font-lock-syntactic-face-function}, documented below, determines
3193 which syntactic constructs to highlight. There are several variables
3194 that affect syntactic fontification; you should set them by means of
3195 @code{font-lock-defaults} (@pxref{Font Lock Basics}).
3196
3197 Whenever Font Lock mode performs syntactic fontification on a stretch
3198 of text, it first calls the function specified by
3199 @code{syntax-propertize-function}. Major modes can use this to apply
3200 @code{syntax-table} text properties to override the buffer's syntax
3201 table in special cases. @xref{Syntax Properties}.
3202
3203 @defvar font-lock-keywords-only
3204 If the value of this variable is non-@code{nil}, Font Lock does not do
3205 syntactic fontification, only search-based fontification based on
3206 @code{font-lock-keywords}. It is normally set by Font Lock mode based
3207 on the @var{keywords-only} element in @code{font-lock-defaults}.
3208 @end defvar
3209
3210 @defvar font-lock-syntax-table
3211 This variable holds the syntax table to use for fontification of
3212 comments and strings. It is normally set by Font Lock mode based on the
3213 @var{syntax-alist} element in @code{font-lock-defaults}. If this value
3214 is @code{nil}, syntactic fontification uses the buffer's syntax table
3215 (the value returned by the function @code{syntax-table}; @pxref{Syntax
3216 Table Functions}).
3217 @end defvar
3218
3219 @defvar font-lock-syntactic-face-function
3220 If this variable is non-@code{nil}, it should be a function to determine
3221 which face to use for a given syntactic element (a string or a comment).
3222 The value is normally set through an @var{other-vars} element in
3223 @code{font-lock-defaults}.
3224
3225 The function is called with one argument, the parse state at point
3226 returned by @code{parse-partial-sexp}, and should return a face. The
3227 default value returns @code{font-lock-comment-face} for comments and
3228 @code{font-lock-string-face} for strings (@pxref{Faces for Font Lock}).
3229 @end defvar
3230
3231 @node Multiline Font Lock
3232 @subsection Multiline Font Lock Constructs
3233 @cindex multiline font lock
3234
3235 Normally, elements of @code{font-lock-keywords} should not match
3236 across multiple lines; that doesn't work reliably, because Font Lock
3237 usually scans just part of the buffer, and it can miss a multi-line
3238 construct that crosses the line boundary where the scan starts. (The
3239 scan normally starts at the beginning of a line.)
3240
3241 Making elements that match multiline constructs work properly has
3242 two aspects: correct @emph{identification} and correct
3243 @emph{rehighlighting}. The first means that Font Lock finds all
3244 multiline constructs. The second means that Font Lock will correctly
3245 rehighlight all the relevant text when a multiline construct is
3246 changed---for example, if some of the text that was previously part of
3247 a multiline construct ceases to be part of it. The two aspects are
3248 closely related, and often getting one of them to work will appear to
3249 make the other also work. However, for reliable results you must
3250 attend explicitly to both aspects.
3251
3252 There are three ways to ensure correct identification of multiline
3253 constructs:
3254
3255 @itemize
3256 @item
3257 Add a function to @code{font-lock-extend-region-functions} that does
3258 the @emph{identification} and extends the scan so that the scanned
3259 text never starts or ends in the middle of a multiline construct.
3260 @item
3261 Use the @code{font-lock-fontify-region-function} hook similarly to
3262 extend the scan so that the scanned text never starts or ends in the
3263 middle of a multiline construct.
3264 @item
3265 Somehow identify the multiline construct right when it gets inserted
3266 into the buffer (or at any point after that but before font-lock
3267 tries to highlight it), and mark it with a @code{font-lock-multiline}
3268 which will instruct font-lock not to start or end the scan in the
3269 middle of the construct.
3270 @end itemize
3271
3272 There are three ways to do rehighlighting of multiline constructs:
3273
3274 @itemize
3275 @item
3276 Place a @code{font-lock-multiline} property on the construct. This
3277 will rehighlight the whole construct if any part of it is changed. In
3278 some cases you can do this automatically by setting the
3279 @code{font-lock-multiline} variable, which see.
3280 @item
3281 Make sure @code{jit-lock-contextually} is set and rely on it doing its
3282 job. This will only rehighlight the part of the construct that
3283 follows the actual change, and will do it after a short delay.
3284 This only works if the highlighting of the various parts of your
3285 multiline construct never depends on text in subsequent lines.
3286 Since @code{jit-lock-contextually} is activated by default, this can
3287 be an attractive solution.
3288 @item
3289 Place a @code{jit-lock-defer-multiline} property on the construct.
3290 This works only if @code{jit-lock-contextually} is used, and with the
3291 same delay before rehighlighting, but like @code{font-lock-multiline},
3292 it also handles the case where highlighting depends on
3293 subsequent lines.
3294 @end itemize
3295
3296 @menu
3297 * Font Lock Multiline:: Marking multiline chunks with a text property.
3298 * Region to Refontify:: Controlling which region gets refontified
3299 after a buffer change.
3300 @end menu
3301
3302 @node Font Lock Multiline
3303 @subsubsection Font Lock Multiline
3304
3305 One way to ensure reliable rehighlighting of multiline Font Lock
3306 constructs is to put on them the text property @code{font-lock-multiline}.
3307 It should be present and non-@code{nil} for text that is part of a
3308 multiline construct.
3309
3310 When Font Lock is about to highlight a range of text, it first
3311 extends the boundaries of the range as necessary so that they do not
3312 fall within text marked with the @code{font-lock-multiline} property.
3313 Then it removes any @code{font-lock-multiline} properties from the
3314 range, and highlights it. The highlighting specification (mostly
3315 @code{font-lock-keywords}) must reinstall this property each time,
3316 whenever it is appropriate.
3317
3318 @strong{Warning:} don't use the @code{font-lock-multiline} property
3319 on large ranges of text, because that will make rehighlighting slow.
3320
3321 @defvar font-lock-multiline
3322 If the @code{font-lock-multiline} variable is set to @code{t}, Font
3323 Lock will try to add the @code{font-lock-multiline} property
3324 automatically on multiline constructs. This is not a universal
3325 solution, however, since it slows down Font Lock somewhat. It can
3326 miss some multiline constructs, or make the property larger or smaller
3327 than necessary.
3328
3329 For elements whose @var{matcher} is a function, the function should
3330 ensure that submatch 0 covers the whole relevant multiline construct,
3331 even if only a small subpart will be highlighted. It is often just as
3332 easy to add the @code{font-lock-multiline} property by hand.
3333 @end defvar
3334
3335 The @code{font-lock-multiline} property is meant to ensure proper
3336 refontification; it does not automatically identify new multiline
3337 constructs. Identifying the requires that Font Lock mode operate on
3338 large enough chunks at a time. This will happen by accident on many
3339 cases, which may give the impression that multiline constructs magically
3340 work. If you set the @code{font-lock-multiline} variable
3341 non-@code{nil}, this impression will be even stronger, since the
3342 highlighting of those constructs which are found will be properly
3343 updated from then on. But that does not work reliably.
3344
3345 To find multiline constructs reliably, you must either manually place
3346 the @code{font-lock-multiline} property on the text before Font Lock
3347 mode looks at it, or use @code{font-lock-fontify-region-function}.
3348
3349 @node Region to Refontify
3350 @subsubsection Region to Fontify after a Buffer Change
3351
3352 When a buffer is changed, the region that Font Lock refontifies is
3353 by default the smallest sequence of whole lines that spans the change.
3354 While this works well most of the time, sometimes it doesn't---for
3355 example, when a change alters the syntactic meaning of text on an
3356 earlier line.
3357
3358 You can enlarge (or even reduce) the region to refontify by setting
3359 the following variable:
3360
3361 @defvar font-lock-extend-after-change-region-function
3362 This buffer-local variable is either @code{nil} or a function for Font
3363 Lock mode to call to determine the region to scan and fontify.
3364
3365 The function is given three parameters, the standard @var{beg},
3366 @var{end}, and @var{old-len} from @code{after-change-functions}
3367 (@pxref{Change Hooks}). It should return either a cons of the
3368 beginning and end buffer positions (in that order) of the region to
3369 fontify, or @code{nil} (which means choose the region in the standard
3370 way). This function needs to preserve point, the match-data, and the
3371 current restriction. The region it returns may start or end in the
3372 middle of a line.
3373
3374 Since this function is called after every buffer change, it should be
3375 reasonably fast.
3376 @end defvar
3377
3378 @node Auto-Indentation
3379 @section Automatic Indentation of code
3380
3381 For programming languages, an important feature of a major mode is to
3382 provide automatic indentation. There are two parts: one is to decide what
3383 is the right indentation of a line, and the other is to decide when to
3384 reindent a line. By default, Emacs reindents a line whenever you
3385 type a character in @code{electric-indent-chars}, which by default only
3386 includes Newline. Major modes can add chars to @code{electric-indent-chars}
3387 according to the syntax of the language.
3388
3389 Deciding what is the right indentation is controlled in Emacs by
3390 @code{indent-line-function} (@pxref{Mode-Specific Indent}). For some modes,
3391 the @emph{right} indentation cannot be known reliably, typically because
3392 indentation is significant so several indentations are valid but with different
3393 meanings. In that case, the mode should set @code{electric-indent-inhibit} to
3394 make sure the line is not constantly re-indented against the user's wishes.
3395
3396 Writing a good indentation function can be difficult and to a large extent it
3397 is still a black art. Many major mode authors will start by writing a simple
3398 indentation function that works for simple cases, for example by comparing with
3399 the indentation of the previous text line. For most programming languages that
3400 are not really line-based, this tends to scale very poorly: improving
3401 such a function to let it handle more diverse situations tends to become more
3402 and more difficult, resulting in the end with a large, complex, unmaintainable
3403 indentation function which nobody dares to touch.
3404
3405 A good indentation function will usually need to actually parse the
3406 text, according to the syntax of the language. Luckily, it is not
3407 necessary to parse the text in as much detail as would be needed
3408 for a compiler, but on the other hand, the parser embedded in the
3409 indentation code will want to be somewhat friendly to syntactically
3410 incorrect code.
3411
3412 Good maintainable indentation functions usually fall into two categories:
3413 either parsing forward from some safe starting point until the
3414 position of interest, or parsing backward from the position of interest.
3415 Neither of the two is a clearly better choice than the other: parsing
3416 backward is often more difficult than parsing forward because
3417 programming languages are designed to be parsed forward, but for the
3418 purpose of indentation it has the advantage of not needing to
3419 guess a safe starting point, and it generally enjoys the property
3420 that only a minimum of text will be analyzed to decide the indentation
3421 of a line, so indentation will tend to be less affected by syntax errors in
3422 some earlier unrelated piece of code. Parsing forward on the other hand
3423 is usually easier and has the advantage of making it possible to
3424 reindent efficiently a whole region at a time, with a single parse.
3425
3426 Rather than write your own indentation function from scratch, it is
3427 often preferable to try and reuse some existing ones or to rely
3428 on a generic indentation engine. There are sadly few such
3429 engines. The CC-mode indentation code (used with C, C++, Java, Awk
3430 and a few other such modes) has been made more generic over the years,
3431 so if your language seems somewhat similar to one of those languages,
3432 you might try to use that engine. @c FIXME: documentation?
3433 Another one is SMIE which takes an approach in the spirit
3434 of Lisp sexps and adapts it to non-Lisp languages.
3435
3436 @menu
3437 * SMIE:: A simple minded indentation engine.
3438 @end menu
3439
3440 @node SMIE
3441 @subsection Simple Minded Indentation Engine
3442 @cindex SMIE
3443
3444 SMIE is a package that provides a generic navigation and indentation
3445 engine. Based on a very simple parser using an operator precedence
3446 grammar, it lets major modes extend the sexp-based navigation of Lisp
3447 to non-Lisp languages as well as provide a simple to use but reliable
3448 auto-indentation.
3449
3450 Operator precedence grammar is a very primitive technology for parsing
3451 compared to some of the more common techniques used in compilers.
3452 It has the following characteristics: its parsing power is very limited,
3453 and it is largely unable to detect syntax errors, but it has the
3454 advantage of being algorithmically efficient and able to parse forward
3455 just as well as backward. In practice that means that SMIE can use it
3456 for indentation based on backward parsing, that it can provide both
3457 @code{forward-sexp} and @code{backward-sexp} functionality, and that it
3458 will naturally work on syntactically incorrect code without any extra
3459 effort. The downside is that it also means that most programming
3460 languages cannot be parsed correctly using SMIE, at least not without
3461 resorting to some special tricks (@pxref{SMIE Tricks}).
3462
3463 @menu
3464 * SMIE setup:: SMIE setup and features.
3465 * Operator Precedence Grammars:: A very simple parsing technique.
3466 * SMIE Grammar:: Defining the grammar of a language.
3467 * SMIE Lexer:: Defining tokens.
3468 * SMIE Tricks:: Working around the parser's limitations.
3469 * SMIE Indentation:: Specifying indentation rules.
3470 * SMIE Indentation Helpers:: Helper functions for indentation rules.
3471 * SMIE Indentation Example:: Sample indentation rules.
3472 * SMIE Customization:: Customizing indentation.
3473 @end menu
3474
3475 @node SMIE setup
3476 @subsubsection SMIE Setup and Features
3477
3478 SMIE is meant to be a one-stop shop for structural navigation and
3479 various other features which rely on the syntactic structure of code, in
3480 particular automatic indentation. The main entry point is
3481 @code{smie-setup} which is a function typically called while setting
3482 up a major mode.
3483
3484 @defun smie-setup grammar rules-function &rest keywords
3485 Setup SMIE navigation and indentation.
3486 @var{grammar} is a grammar table generated by @code{smie-prec2->grammar}.
3487 @var{rules-function} is a set of indentation rules for use on
3488 @code{smie-rules-function}.
3489 @var{keywords} are additional arguments, which can include the following
3490 keywords:
3491 @itemize
3492 @item
3493 @code{:forward-token} @var{fun}: Specify the forward lexer to use.
3494 @item
3495 @code{:backward-token} @var{fun}: Specify the backward lexer to use.
3496 @end itemize
3497 @end defun
3498
3499 Calling this function is sufficient to make commands such as
3500 @code{forward-sexp}, @code{backward-sexp}, and @code{transpose-sexps} be
3501 able to properly handle structural elements other than just the paired
3502 parentheses already handled by syntax tables. For example, if the
3503 provided grammar is precise enough, @code{transpose-sexps} can correctly
3504 transpose the two arguments of a @code{+} operator, taking into account
3505 the precedence rules of the language.
3506
3507 Calling @code{smie-setup} is also sufficient to make TAB indentation work in
3508 the expected way, extends @code{blink-matching-paren} to apply to
3509 elements like @code{begin...end}, and provides some commands that you
3510 can bind in the major mode keymap.
3511
3512 @deffn Command smie-close-block
3513 This command closes the most recently opened (and not yet closed) block.
3514 @end deffn
3515
3516 @deffn Command smie-down-list &optional arg
3517 This command is like @code{down-list} but it also pays attention to
3518 nesting of tokens other than parentheses, such as @code{begin...end}.
3519 @end deffn
3520
3521 @node Operator Precedence Grammars
3522 @subsubsection Operator Precedence Grammars
3523
3524 SMIE's precedence grammars simply give to each token a pair of
3525 precedences: the left-precedence and the right-precedence. We say
3526 @code{T1 < T2} if the right-precedence of token @code{T1} is less than
3527 the left-precedence of token @code{T2}. A good way to read this
3528 @code{<} is as a kind of parenthesis: if we find @code{... T1 something
3529 T2 ...} then that should be parsed as @code{... T1 (something T2 ...}
3530 rather than as @code{... T1 something) T2 ...}. The latter
3531 interpretation would be the case if we had @code{T1 > T2}. If we have
3532 @code{T1 = T2}, it means that token T2 follows token T1 in the same
3533 syntactic construction, so typically we have @code{"begin" = "end"}.
3534 Such pairs of precedences are sufficient to express left-associativity
3535 or right-associativity of infix operators, nesting of tokens like
3536 parentheses and many other cases.
3537
3538 @c Let's leave this undocumented to leave it more open for change!
3539 @c @defvar smie-grammar
3540 @c The value of this variable is an alist specifying the left and right
3541 @c precedence of each token. It is meant to be initialized by using one of
3542 @c the functions below.
3543 @c @end defvar
3544
3545 @defun smie-prec2->grammar table
3546 This function takes a @emph{prec2} grammar @var{table} and returns an
3547 alist suitable for use in @code{smie-setup}. The @emph{prec2}
3548 @var{table} is itself meant to be built by one of the functions below.
3549 @end defun
3550
3551 @defun smie-merge-prec2s &rest tables
3552 This function takes several @emph{prec2} @var{tables} and merges them
3553 into a new @emph{prec2} table.
3554 @end defun
3555
3556 @defun smie-precs->prec2 precs
3557 This function builds a @emph{prec2} table from a table of precedences
3558 @var{precs}. @var{precs} should be a list, sorted by precedence (for
3559 example @code{"+"} will come before @code{"*"}), of elements of the form
3560 @code{(@var{assoc} @var{op} ...)}, where each @var{op} is a token that
3561 acts as an operator; @var{assoc} is their associativity, which can be
3562 either @code{left}, @code{right}, @code{assoc}, or @code{nonassoc}.
3563 All operators in a given element share the same precedence level
3564 and associativity.
3565 @end defun
3566
3567 @defun smie-bnf->prec2 bnf &rest resolvers
3568 This function lets you specify the grammar using a BNF notation.
3569 It accepts a @var{bnf} description of the grammar along with a set of
3570 conflict resolution rules @var{resolvers}, and
3571 returns a @emph{prec2} table.
3572
3573 @var{bnf} is a list of nonterminal definitions of the form
3574 @code{(@var{nonterm} @var{rhs1} @var{rhs2} ...)} where each @var{rhs}
3575 is a (non-empty) list of terminals (aka tokens) or non-terminals.
3576
3577 Not all grammars are accepted:
3578 @itemize
3579 @item
3580 An @var{rhs} cannot be an empty list (an empty list is never needed,
3581 since SMIE allows all non-terminals to match the empty string anyway).
3582 @item
3583 An @var{rhs} cannot have 2 consecutive non-terminals: each pair of
3584 non-terminals needs to be separated by a terminal (aka token).
3585 This is a fundamental limitation of operator precedence grammars.
3586 @end itemize
3587
3588 Additionally, conflicts can occur:
3589 @itemize
3590 @item
3591 The returned @emph{prec2} table holds constraints between pairs of tokens, and
3592 for any given pair only one constraint can be present: T1 < T2,
3593 T1 = T2, or T1 > T2.
3594 @item
3595 A token can be an @code{opener} (something similar to an open-paren),
3596 a @code{closer} (like a close-paren), or @code{neither} of the two
3597 (e.g., an infix operator, or an inner token like @code{"else"}).
3598 @end itemize
3599
3600 Precedence conflicts can be resolved via @var{resolvers}, which
3601 is a list of @emph{precs} tables (see @code{smie-precs->prec2}): for
3602 each precedence conflict, if those @code{precs} tables
3603 specify a particular constraint, then the conflict is resolved by using
3604 this constraint instead, else a conflict is reported and one of the
3605 conflicting constraints is picked arbitrarily and the others are
3606 simply ignored.
3607 @end defun
3608
3609 @node SMIE Grammar
3610 @subsubsection Defining the Grammar of a Language
3611 @cindex SMIE grammar
3612 @cindex grammar, SMIE
3613
3614 The usual way to define the SMIE grammar of a language is by
3615 defining a new global variable that holds the precedence table by
3616 giving a set of BNF rules.
3617 For example, the grammar definition for a small Pascal-like language
3618 could look like:
3619 @example
3620 @group
3621 (require 'smie)
3622 (defvar sample-smie-grammar
3623 (smie-prec2->grammar
3624 (smie-bnf->prec2
3625 @end group
3626 @group
3627 '((id)
3628 (inst ("begin" insts "end")
3629 ("if" exp "then" inst "else" inst)
3630 (id ":=" exp)
3631 (exp))
3632 (insts (insts ";" insts) (inst))
3633 (exp (exp "+" exp)
3634 (exp "*" exp)
3635 ("(" exps ")"))
3636 (exps (exps "," exps) (exp)))
3637 @end group
3638 @group
3639 '((assoc ";"))
3640 '((assoc ","))
3641 '((assoc "+") (assoc "*")))))
3642 @end group
3643 @end example
3644
3645 @noindent
3646 A few things to note:
3647
3648 @itemize
3649 @item
3650 The above grammar does not explicitly mention the syntax of function
3651 calls: SMIE will automatically allow any sequence of sexps, such as
3652 identifiers, balanced parentheses, or @code{begin ... end} blocks
3653 to appear anywhere anyway.
3654 @item
3655 The grammar category @code{id} has no right hand side: this does not
3656 mean that it can match only the empty string, since as mentioned any
3657 sequence of sexps can appear anywhere anyway.
3658 @item
3659 Because non terminals cannot appear consecutively in the BNF grammar, it
3660 is difficult to correctly handle tokens that act as terminators, so the
3661 above grammar treats @code{";"} as a statement @emph{separator} instead,
3662 which SMIE can handle very well.
3663 @item
3664 Separators used in sequences (such as @code{","} and @code{";"} above)
3665 are best defined with BNF rules such as @code{(foo (foo "separator" foo) ...)}
3666 which generate precedence conflicts which are then resolved by giving
3667 them an explicit @code{(assoc "separator")}.
3668 @item
3669 The @code{("(" exps ")")} rule was not needed to pair up parens, since
3670 SMIE will pair up any characters that are marked as having paren syntax
3671 in the syntax table. What this rule does instead (together with the
3672 definition of @code{exps}) is to make it clear that @code{","} should
3673 not appear outside of parentheses.
3674 @item
3675 Rather than have a single @emph{precs} table to resolve conflicts, it is
3676 preferable to have several tables, so as to let the BNF part of the
3677 grammar specify relative precedences where possible.
3678 @item
3679 Unless there is a very good reason to prefer @code{left} or
3680 @code{right}, it is usually preferable to mark operators as associative,
3681 using @code{assoc}. For that reason @code{"+"} and @code{"*"} are
3682 defined above as @code{assoc}, although the language defines them
3683 formally as left associative.
3684 @end itemize
3685
3686 @node SMIE Lexer
3687 @subsubsection Defining Tokens
3688 @cindex SMIE lexer
3689 @cindex defining tokens, SMIE
3690
3691 SMIE comes with a predefined lexical analyzer which uses syntax tables
3692 in the following way: any sequence of characters that have word or
3693 symbol syntax is considered a token, and so is any sequence of
3694 characters that have punctuation syntax. This default lexer is
3695 often a good starting point but is rarely actually correct for any given
3696 language. For example, it will consider @code{"2,+3"} to be composed
3697 of 3 tokens: @code{"2"}, @code{",+"}, and @code{"3"}.
3698
3699 To describe the lexing rules of your language to SMIE, you need
3700 2 functions, one to fetch the next token, and another to fetch the
3701 previous token. Those functions will usually first skip whitespace and
3702 comments and then look at the next chunk of text to see if it
3703 is a special token. If so it should skip the token and
3704 return a description of this token. Usually this is simply the string
3705 extracted from the buffer, but it can be anything you want.
3706 For example:
3707 @example
3708 @group
3709 (defvar sample-keywords-regexp
3710 (regexp-opt '("+" "*" "," ";" ">" ">=" "<" "<=" ":=" "=")))
3711 @end group
3712 @group
3713 (defun sample-smie-forward-token ()
3714 (forward-comment (point-max))
3715 (cond
3716 ((looking-at sample-keywords-regexp)
3717 (goto-char (match-end 0))
3718 (match-string-no-properties 0))
3719 (t (buffer-substring-no-properties
3720 (point)
3721 (progn (skip-syntax-forward "w_")
3722 (point))))))
3723 @end group
3724 @group
3725 (defun sample-smie-backward-token ()
3726 (forward-comment (- (point)))
3727 (cond
3728 ((looking-back sample-keywords-regexp (- (point) 2) t)
3729 (goto-char (match-beginning 0))
3730 (match-string-no-properties 0))
3731 (t (buffer-substring-no-properties
3732 (point)
3733 (progn (skip-syntax-backward "w_")
3734 (point))))))
3735 @end group
3736 @end example
3737
3738 Notice how those lexers return the empty string when in front of
3739 parentheses. This is because SMIE automatically takes care of the
3740 parentheses defined in the syntax table. More specifically if the lexer
3741 returns @code{nil} or an empty string, SMIE tries to handle the corresponding
3742 text as a sexp according to syntax tables.
3743
3744 @node SMIE Tricks
3745 @subsubsection Living With a Weak Parser
3746
3747 The parsing technique used by SMIE does not allow tokens to behave
3748 differently in different contexts. For most programming languages, this
3749 manifests itself by precedence conflicts when converting the
3750 BNF grammar.
3751
3752 Sometimes, those conflicts can be worked around by expressing the
3753 grammar slightly differently. For example, for Modula-2 it might seem
3754 natural to have a BNF grammar that looks like this:
3755
3756 @example
3757 ...
3758 (inst ("IF" exp "THEN" insts "ELSE" insts "END")
3759 ("CASE" exp "OF" cases "END")
3760 ...)
3761 (cases (cases "|" cases)
3762 (caselabel ":" insts)
3763 ("ELSE" insts))
3764 ...
3765 @end example
3766
3767 But this will create conflicts for @code{"ELSE"}: on the one hand, the
3768 IF rule implies (among many other things) that @code{"ELSE" = "END"};
3769 but on the other hand, since @code{"ELSE"} appears within @code{cases},
3770 which appears left of @code{"END"}, we also have @code{"ELSE" > "END"}.
3771 We can solve the conflict either by using:
3772 @example
3773 ...
3774 (inst ("IF" exp "THEN" insts "ELSE" insts "END")
3775 ("CASE" exp "OF" cases "END")
3776 ("CASE" exp "OF" cases "ELSE" insts "END")
3777 ...)
3778 (cases (cases "|" cases) (caselabel ":" insts))
3779 ...
3780 @end example
3781 or
3782 @example
3783 ...
3784 (inst ("IF" exp "THEN" else "END")
3785 ("CASE" exp "OF" cases "END")
3786 ...)
3787 (else (insts "ELSE" insts))
3788 (cases (cases "|" cases) (caselabel ":" insts) (else))
3789 ...
3790 @end example
3791
3792 Reworking the grammar to try and solve conflicts has its downsides, tho,
3793 because SMIE assumes that the grammar reflects the logical structure of
3794 the code, so it is preferable to keep the BNF closer to the intended
3795 abstract syntax tree.
3796
3797 Other times, after careful consideration you may conclude that those
3798 conflicts are not serious and simply resolve them via the
3799 @var{resolvers} argument of @code{smie-bnf->prec2}. Usually this is
3800 because the grammar is simply ambiguous: the conflict does not affect
3801 the set of programs described by the grammar, but only the way those
3802 programs are parsed. This is typically the case for separators and
3803 associative infix operators, where you want to add a resolver like
3804 @code{'((assoc "|"))}. Another case where this can happen is for the
3805 classic @emph{dangling else} problem, where you will use @code{'((assoc
3806 "else" "then"))}. It can also happen for cases where the conflict is
3807 real and cannot really be resolved, but it is unlikely to pose a problem
3808 in practice.
3809
3810 Finally, in many cases some conflicts will remain despite all efforts to
3811 restructure the grammar. Do not despair: while the parser cannot be
3812 made more clever, you can make the lexer as smart as you want. So, the
3813 solution is then to look at the tokens involved in the conflict and to
3814 split one of those tokens into 2 (or more) different tokens. E.g., if
3815 the grammar needs to distinguish between two incompatible uses of the
3816 token @code{"begin"}, make the lexer return different tokens (say
3817 @code{"begin-fun"} and @code{"begin-plain"}) depending on which kind of
3818 @code{"begin"} it finds. This pushes the work of distinguishing the
3819 different cases to the lexer, which will thus have to look at the
3820 surrounding text to find ad-hoc clues.
3821
3822 @node SMIE Indentation
3823 @subsubsection Specifying Indentation Rules
3824 @cindex indentation rules, SMIE
3825
3826 Based on the provided grammar, SMIE will be able to provide automatic
3827 indentation without any extra effort. But in practice, this default
3828 indentation style will probably not be good enough. You will want to
3829 tweak it in many different cases.
3830
3831 SMIE indentation is based on the idea that indentation rules should be
3832 as local as possible. To this end, it relies on the idea of
3833 @emph{virtual} indentation, which is the indentation that a particular
3834 program point would have if it were at the beginning of a line.
3835 Of course, if that program point is indeed at the beginning of a line,
3836 its virtual indentation is its current indentation. But if not, then
3837 SMIE uses the indentation algorithm to compute the virtual indentation
3838 of that point. Now in practice, the virtual indentation of a program
3839 point does not have to be identical to the indentation it would have if
3840 we inserted a newline before it. To see how this works, the SMIE rule
3841 for indentation after a @code{@{} in C does not care whether the
3842 @code{@{} is standing on a line of its own or is at the end of the
3843 preceding line. Instead, these different cases are handled in the
3844 indentation rule that decides how to indent before a @code{@{}.
3845
3846 Another important concept is the notion of @emph{parent}: The
3847 @emph{parent} of a token, is the head token of the nearest enclosing
3848 syntactic construct. For example, the parent of an @code{else} is the
3849 @code{if} to which it belongs, and the parent of an @code{if}, in turn,
3850 is the lead token of the surrounding construct. The command
3851 @code{backward-sexp} jumps from a token to its parent, but there are
3852 some caveats: for @emph{openers} (tokens which start a construct, like
3853 @code{if}), you need to start with point before the token, while for
3854 others you need to start with point after the token.
3855 @code{backward-sexp} stops with point before the parent token if that is
3856 the @emph{opener} of the token of interest, and otherwise it stops with
3857 point after the parent token.
3858
3859 SMIE indentation rules are specified using a function that takes two
3860 arguments @var{method} and @var{arg} where the meaning of @var{arg} and the
3861 expected return value depend on @var{method}.
3862
3863 @var{method} can be:
3864 @itemize
3865 @item
3866 @code{:after}, in which case @var{arg} is a token and the function
3867 should return the @var{offset} to use for indentation after @var{arg}.
3868 @item
3869 @code{:before}, in which case @var{arg} is a token and the function
3870 should return the @var{offset} to use to indent @var{arg} itself.
3871 @item
3872 @code{:elem}, in which case the function should return either the offset
3873 to use to indent function arguments (if @var{arg} is the symbol
3874 @code{arg}) or the basic indentation step (if @var{arg} is the symbol
3875 @code{basic}).
3876 @item
3877 @code{:list-intro}, in which case @var{arg} is a token and the function
3878 should return non-@code{nil} if the token is followed by a list of
3879 expressions (not separated by any token) rather than an expression.
3880 @end itemize
3881
3882 When @var{arg} is a token, the function is called with point just before
3883 that token. A return value of @code{nil} always means to fallback on the
3884 default behavior, so the function should return @code{nil} for arguments it
3885 does not expect.
3886
3887 @var{offset} can be:
3888 @itemize
3889 @item
3890 @code{nil}: use the default indentation rule.
3891 @item
3892 @code{(column . @var{column})}: indent to column @var{column}.
3893 @item
3894 @var{number}: offset by @var{number}, relative to a base token which is
3895 the current token for @code{:after} and its parent for @code{:before}.
3896 @end itemize
3897
3898 @node SMIE Indentation Helpers
3899 @subsubsection Helper Functions for Indentation Rules
3900
3901 SMIE provides various functions designed specifically for use in the
3902 indentation rules function (several of those functions break if used in
3903 another context). These functions all start with the prefix
3904 @code{smie-rule-}.
3905
3906 @defun smie-rule-bolp
3907 Return non-@code{nil} if the current token is the first on the line.
3908 @end defun
3909
3910 @defun smie-rule-hanging-p
3911 Return non-@code{nil} if the current token is @emph{hanging}.
3912 A token is @emph{hanging} if it is the last token on the line
3913 and if it is preceded by other tokens: a lone token on a line is not
3914 hanging.
3915 @end defun
3916
3917 @defun smie-rule-next-p &rest tokens
3918 Return non-@code{nil} if the next token is among @var{tokens}.
3919 @end defun
3920
3921 @defun smie-rule-prev-p &rest tokens
3922 Return non-@code{nil} if the previous token is among @var{tokens}.
3923 @end defun
3924
3925 @defun smie-rule-parent-p &rest parents
3926 Return non-@code{nil} if the current token's parent is among @var{parents}.
3927 @end defun
3928
3929 @defun smie-rule-sibling-p
3930 Return non-@code{nil} if the current token's parent is actually a
3931 sibling. This is the case for example when the parent of a @code{","}
3932 is just the previous @code{","}.
3933 @end defun
3934
3935 @defun smie-rule-parent &optional offset
3936 Return the proper offset to align the current token with the parent.
3937 If non-@code{nil}, @var{offset} should be an integer giving an
3938 additional offset to apply.
3939 @end defun
3940
3941 @defun smie-rule-separator method
3942 Indent current token as a @emph{separator}.
3943
3944 By @emph{separator}, we mean here a token whose sole purpose is to
3945 separate various elements within some enclosing syntactic construct, and
3946 which does not have any semantic significance in itself (i.e., it would
3947 typically not exist as a node in an abstract syntax tree).
3948
3949 Such a token is expected to have an associative syntax and be closely
3950 tied to its syntactic parent. Typical examples are @code{","} in lists
3951 of arguments (enclosed inside parentheses), or @code{";"} in sequences
3952 of instructions (enclosed in a @code{@{...@}} or @code{begin...end}
3953 block).
3954
3955 @var{method} should be the method name that was passed to
3956 @code{smie-rules-function}.
3957 @end defun
3958
3959 @node SMIE Indentation Example
3960 @subsubsection Sample Indentation Rules
3961
3962 Here is an example of an indentation function:
3963
3964 @example
3965 (defun sample-smie-rules (kind token)
3966 (pcase (cons kind token)
3967 (`(:elem . basic) sample-indent-basic)
3968 (`(,_ . ",") (smie-rule-separator kind))
3969 (`(:after . ":=") sample-indent-basic)
3970 (`(:before . ,(or `"begin" `"(" `"@{")))
3971 (if (smie-rule-hanging-p) (smie-rule-parent)))
3972 (`(:before . "if")
3973 (and (not (smie-rule-bolp)) (smie-rule-prev-p "else")
3974 (smie-rule-parent)))))
3975 @end example
3976
3977 @noindent
3978 A few things to note:
3979
3980 @itemize
3981 @item
3982 The first case indicates the basic indentation increment to use.
3983 If @code{sample-indent-basic} is @code{nil}, then SMIE uses the global
3984 setting @code{smie-indent-basic}. The major mode could have set
3985 @code{smie-indent-basic} buffer-locally instead, but that
3986 is discouraged.
3987
3988 @item
3989 The rule for the token @code{","} make SMIE try to be more clever when
3990 the comma separator is placed at the beginning of lines. It tries to
3991 outdent the separator so as to align the code after the comma; for
3992 example:
3993
3994 @example
3995 x = longfunctionname (
3996 arg1
3997 , arg2
3998 );
3999 @end example
4000
4001 @item
4002 The rule for indentation after @code{":="} exists because otherwise
4003 SMIE would treat @code{":="} as an infix operator and would align the
4004 right argument with the left one.
4005
4006 @item
4007 The rule for indentation before @code{"begin"} is an example of the use
4008 of virtual indentation: This rule is used only when @code{"begin"} is
4009 hanging, which can happen only when @code{"begin"} is not at the
4010 beginning of a line. So this is not used when indenting
4011 @code{"begin"} itself but only when indenting something relative to this
4012 @code{"begin"}. Concretely, this rule changes the indentation from:
4013
4014 @example
4015 if x > 0 then begin
4016 dosomething(x);
4017 end
4018 @end example
4019 to
4020 @example
4021 if x > 0 then begin
4022 dosomething(x);
4023 end
4024 @end example
4025
4026 @item
4027 The rule for indentation before @code{"if"} is similar to the one for
4028 @code{"begin"}, but where the purpose is to treat @code{"else if"}
4029 as a single unit, so as to align a sequence of tests rather than indent
4030 each test further to the right. This function does this only in the
4031 case where the @code{"if"} is not placed on a separate line, hence the
4032 @code{smie-rule-bolp} test.
4033
4034 If we know that the @code{"else"} is always aligned with its @code{"if"}
4035 and is always at the beginning of a line, we can use a more efficient
4036 rule:
4037 @example
4038 ((equal token "if")
4039 (and (not (smie-rule-bolp))
4040 (smie-rule-prev-p "else")
4041 (save-excursion
4042 (sample-smie-backward-token)
4043 (cons 'column (current-column)))))
4044 @end example
4045
4046 The advantage of this formulation is that it reuses the indentation of
4047 the previous @code{"else"}, rather than going all the way back to the
4048 first @code{"if"} of the sequence.
4049 @end itemize
4050
4051 @c In some sense this belongs more in the Emacs manual.
4052 @node SMIE Customization
4053 @subsubsection Customizing Indentation
4054
4055 If you are using a mode whose indentation is provided by SMIE, you can
4056 customize the indentation to suit your preferences. You can do this
4057 on a per-mode basis (using the option @code{smie-config}), or a
4058 per-file basis (using the function @code{smie-config-local} in a
4059 file-local variable specification).
4060
4061 @defopt smie-config
4062 This option lets you customize indentation on a per-mode basis.
4063 It is an alist with elements of the form @code{(@var{mode} . @var{rules})}.
4064 For the precise form of rules, see the variable's documentation; but
4065 you may find it easier to use the command @code{smie-config-guess}.
4066 @end defopt
4067
4068 @deffn Command smie-config-guess
4069 This command tries to work out appropriate settings to produce
4070 your preferred style of indentation. Simply call the command while
4071 visiting a file that is indented with your style.
4072 @end deffn
4073
4074 @deffn Command smie-config-save
4075 Call this command after using @code{smie-config-guess}, to save your
4076 settings for future sessions.
4077 @end deffn
4078
4079 @deffn Command smie-config-show-indent &optional move
4080 This command displays the rules that are used to indent the current
4081 line.
4082 @end deffn
4083
4084 @deffn Command smie-config-set-indent
4085 This command adds a local rule to adjust the indentation of the current line.
4086 @end deffn
4087
4088 @defun smie-config-local rules
4089 This function adds @var{rules} as indentation rules for the current buffer.
4090 These add to any mode-specific rules defined by the @code{smie-config} option.
4091 To specify custom indentation rules for a specific file, add an entry
4092 to the file's local variables of the form:
4093 @code{eval: (smie-config-local '(@var{rules}))}.
4094 @end defun
4095
4096
4097 @node Desktop Save Mode
4098 @section Desktop Save Mode
4099 @cindex desktop save mode
4100
4101 @dfn{Desktop Save Mode} is a feature to save the state of Emacs from
4102 one session to another. The user-level commands for using Desktop
4103 Save Mode are described in the GNU Emacs Manual (@pxref{Saving Emacs
4104 Sessions,,, emacs, the GNU Emacs Manual}). Modes whose buffers visit
4105 a file, don't have to do anything to use this feature.
4106
4107 For buffers not visiting a file to have their state saved, the major
4108 mode must bind the buffer local variable @code{desktop-save-buffer} to
4109 a non-@code{nil} value.
4110
4111 @defvar desktop-save-buffer
4112 If this buffer-local variable is non-@code{nil}, the buffer will have
4113 its state saved in the desktop file at desktop save. If the value is
4114 a function, it is called at desktop save with argument
4115 @var{desktop-dirname}, and its value is saved in the desktop file along
4116 with the state of the buffer for which it was called. When file names
4117 are returned as part of the auxiliary information, they should be
4118 formatted using the call
4119
4120 @example
4121 (desktop-file-name @var{file-name} @var{desktop-dirname})
4122 @end example
4123
4124 @end defvar
4125
4126 For buffers not visiting a file to be restored, the major mode must
4127 define a function to do the job, and that function must be listed in
4128 the alist @code{desktop-buffer-mode-handlers}.
4129
4130 @defvar desktop-buffer-mode-handlers
4131 Alist with elements
4132
4133 @example
4134 (@var{major-mode} . @var{restore-buffer-function})
4135 @end example
4136
4137 The function @var{restore-buffer-function} will be called with
4138 argument list
4139
4140 @example
4141 (@var{buffer-file-name} @var{buffer-name} @var{desktop-buffer-misc})
4142 @end example
4143
4144 and it should return the restored buffer.
4145 Here @var{desktop-buffer-misc} is the value returned by the function
4146 optionally bound to @code{desktop-save-buffer}.
4147 @end defvar