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