]> code.delx.au - gnu-emacs/blob - lispref/display.texi
(Window Start): Minor cleanups.
[gnu-emacs] / lispref / display.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, 2000, 2001,
4 @c 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @setfilename ../info/display
7 @node Display, System Interface, Processes, Top
8 @chapter Emacs Display
9
10 This chapter describes a number of features related to the display
11 that Emacs presents to the user.
12
13 @menu
14 * Refresh Screen:: Clearing the screen and redrawing everything on it.
15 * Forcing Redisplay:: Forcing redisplay.
16 * Truncation:: Folding or wrapping long text lines.
17 * The Echo Area:: Displaying messages at the bottom of the screen.
18 * Warnings:: Displaying warning messages for the user.
19 * Invisible Text:: Hiding part of the buffer text.
20 * Selective Display:: Hiding part of the buffer text (the old way).
21 * Temporary Displays:: Displays that go away automatically.
22 * Overlays:: Use overlays to highlight parts of the buffer.
23 * Width:: How wide a character or string is on the screen.
24 * Line Height:: Controlling the height of lines.
25 * Faces:: A face defines a graphics style for text characters:
26 font, colors, etc.
27 * Fringes:: Controlling window fringes.
28 * Scroll Bars:: Controlling vertical scroll bars.
29 * Display Property:: Enabling special display features.
30 * Images:: Displaying images in Emacs buffers.
31 * Buttons:: Adding clickable buttons to Emacs buffers.
32 * Abstract Display:: Emacs' Widget for Object Collections.
33 * Blinking:: How Emacs shows the matching open parenthesis.
34 * Usual Display:: The usual conventions for displaying nonprinting chars.
35 * Display Tables:: How to specify other conventions.
36 * Beeping:: Audible signal to the user.
37 * Window Systems:: Which window system is being used.
38 @end menu
39
40 @node Refresh Screen
41 @section Refreshing the Screen
42
43 The function @code{redraw-frame} clears and redisplays the entire
44 contents of a given frame (@pxref{Frames}). This is useful if the
45 screen is corrupted.
46
47 @c Emacs 19 feature
48 @defun redraw-frame frame
49 This function clears and redisplays frame @var{frame}.
50 @end defun
51
52 Even more powerful is @code{redraw-display}:
53
54 @deffn Command redraw-display
55 This function clears and redisplays all visible frames.
56 @end deffn
57
58 This function calls for redisplay of certain windows, the next time
59 redisplay is done, but does not clear them first.
60
61 @defun force-window-update &optional object
62 This function forces some or all windows to be updated on next redisplay.
63 If @var{object} is a window, it forces redisplay of that window. If
64 @var{object} is a buffer or buffer name, it forces redisplay of all
65 windows displaying that buffer. If @var{object} is @code{nil} (or
66 omitted), it forces redisplay of all windows.
67 @end defun
68
69 Processing user input takes absolute priority over redisplay. If you
70 call these functions when input is available, they do nothing
71 immediately, but a full redisplay does happen eventually---after all the
72 input has been processed.
73
74 Normally, suspending and resuming Emacs also refreshes the screen.
75 Some terminal emulators record separate contents for display-oriented
76 programs such as Emacs and for ordinary sequential display. If you are
77 using such a terminal, you might want to inhibit the redisplay on
78 resumption.
79
80 @defvar no-redraw-on-reenter
81 @cindex suspend (cf. @code{no-redraw-on-reenter})
82 @cindex resume (cf. @code{no-redraw-on-reenter})
83 This variable controls whether Emacs redraws the entire screen after it
84 has been suspended and resumed. Non-@code{nil} means there is no need
85 to redraw, @code{nil} means redrawing is needed. The default is @code{nil}.
86 @end defvar
87
88 @node Forcing Redisplay
89 @section Forcing Redisplay
90 @cindex forcing redisplay
91
92 Emacs redisplay normally stops if input arrives, and does not happen
93 at all if input is available before it starts. Most of the time, this
94 is exactly what you want. However, you can prevent preemption by
95 binding @code{redisplay-dont-pause} to a non-@code{nil} value.
96
97 @defvar redisplay-preemption-period
98 This variable specifies how many seconds Emacs waits between checks
99 for new input during redisplay. (The default is 0.1 seconds.) If
100 input has arrived when Emacs checks, it pre-empts redisplay and
101 processes the available input before trying again to redisplay.
102
103 If this variable is @code{nil}, Emacs does not check for input during
104 redisplay, and redisplay cannot be preempted by input.
105
106 This variable is only obeyed on graphical terminals. For
107 text terminals, see @ref{Terminal Output}.
108 @end defvar
109
110 @defvar redisplay-dont-pause
111 If this variable is non-@code{nil}, pending input does not
112 prevent or halt redisplay; redisplay occurs, and finishes,
113 regardless of whether input is available.
114 @end defvar
115
116 @defun redisplay &optional force
117 This function performs an immediate redisplay provided there are no
118 pending input events. This is equivalent to @code{(sit-for 0)}.
119
120 If the optional argument @var{force} is non-@code{nil}, it forces an
121 immediate and complete redisplay even if input is available.
122
123 Returns @code{t} if redisplay was performed, or @code{nil} otherwise.
124 @end defun
125
126 @node Truncation
127 @section Truncation
128 @cindex line wrapping
129 @cindex continuation lines
130 @cindex @samp{$} in display
131 @cindex @samp{\} in display
132
133 When a line of text extends beyond the right edge of a window, Emacs
134 can @dfn{continue} the line (make it ``wrap'' to the next screen
135 line), or @dfn{truncate} the line (limit it to one screen line). The
136 additional screen lines used to display a long text line are called
137 @dfn{continuation} lines. Continuation is not the same as filling;
138 continuation happens on the screen only, not in the buffer contents,
139 and it breaks a line precisely at the right margin, not at a word
140 boundary. @xref{Filling}.
141
142 On a graphical display, tiny arrow images in the window fringes
143 indicate truncated and continued lines (@pxref{Fringes}). On a text
144 terminal, a @samp{$} in the rightmost column of the window indicates
145 truncation; a @samp{\} on the rightmost column indicates a line that
146 ``wraps.'' (The display table can specify alternate characters to use
147 for this; @pxref{Display Tables}).
148
149 @defopt truncate-lines
150 This buffer-local variable controls how Emacs displays lines that extend
151 beyond the right edge of the window. The default is @code{nil}, which
152 specifies continuation. If the value is non-@code{nil}, then these
153 lines are truncated.
154
155 If the variable @code{truncate-partial-width-windows} is non-@code{nil},
156 then truncation is always used for side-by-side windows (within one
157 frame) regardless of the value of @code{truncate-lines}.
158 @end defopt
159
160 @defopt default-truncate-lines
161 This variable is the default value for @code{truncate-lines}, for
162 buffers that do not have buffer-local values for it.
163 @end defopt
164
165 @defopt truncate-partial-width-windows
166 This variable controls display of lines that extend beyond the right
167 edge of the window, in side-by-side windows (@pxref{Splitting Windows}).
168 If it is non-@code{nil}, these lines are truncated; otherwise,
169 @code{truncate-lines} says what to do with them.
170 @end defopt
171
172 When horizontal scrolling (@pxref{Horizontal Scrolling}) is in use in
173 a window, that forces truncation.
174
175 If your buffer contains @emph{very} long lines, and you use
176 continuation to display them, just thinking about them can make Emacs
177 redisplay slow. The column computation and indentation functions also
178 become slow. Then you might find it advisable to set
179 @code{cache-long-line-scans} to @code{t}.
180
181 @defvar cache-long-line-scans
182 If this variable is non-@code{nil}, various indentation and motion
183 functions, and Emacs redisplay, cache the results of scanning the
184 buffer, and consult the cache to avoid rescanning regions of the buffer
185 unless they are modified.
186
187 Turning on the cache slows down processing of short lines somewhat.
188
189 This variable is automatically buffer-local in every buffer.
190 @end defvar
191
192 @node The Echo Area
193 @section The Echo Area
194 @cindex error display
195 @cindex echo area
196
197 The @dfn{echo area} is used for displaying error messages
198 (@pxref{Errors}), for messages made with the @code{message} primitive,
199 and for echoing keystrokes. It is not the same as the minibuffer,
200 despite the fact that the minibuffer appears (when active) in the same
201 place on the screen as the echo area. The @cite{GNU Emacs Manual}
202 specifies the rules for resolving conflicts between the echo area and
203 the minibuffer for use of that screen space (@pxref{Minibuffer,, The
204 Minibuffer, emacs, The GNU Emacs Manual}).
205
206 You can write output in the echo area by using the Lisp printing
207 functions with @code{t} as the stream (@pxref{Output Functions}), or
208 explicitly.
209
210 @menu
211 * Displaying Messages:: Explicitly displaying text in the echo area.
212 * Progress:: Informing user about progress of a long operation.
213 * Logging Messages:: Echo area messages are logged for the user.
214 * Echo Area Customization:: Controlling the echo area.
215 @end menu
216
217 @node Displaying Messages
218 @subsection Displaying Messages in the Echo Area
219
220 This section describes the functions for explicitly producing echo
221 area messages. Many other Emacs features display messages there, too.
222
223 @defun message format-string &rest arguments
224 This function displays a message in the echo area. The argument
225 @var{format-string} is similar to a C language @code{printf} format
226 string. See @code{format} in @ref{Formatting Strings}, for the details
227 on the conversion specifications. @code{message} returns the
228 constructed string.
229
230 In batch mode, @code{message} prints the message text on the standard
231 error stream, followed by a newline.
232
233 If @var{format-string}, or strings among the @var{arguments}, have
234 @code{face} text properties, these affect the way the message is displayed.
235
236 @c Emacs 19 feature
237 If @var{format-string} is @code{nil} or the empty string,
238 @code{message} clears the echo area; if the echo area has been
239 expanded automatically, this brings it back to its normal size.
240 If the minibuffer is active, this brings the minibuffer contents back
241 onto the screen immediately.
242
243 @example
244 @group
245 (message "Minibuffer depth is %d."
246 (minibuffer-depth))
247 @print{} Minibuffer depth is 0.
248 @result{} "Minibuffer depth is 0."
249 @end group
250
251 @group
252 ---------- Echo Area ----------
253 Minibuffer depth is 0.
254 ---------- Echo Area ----------
255 @end group
256 @end example
257
258 To automatically display a message in the echo area or in a pop-buffer,
259 depending on its size, use @code{display-message-or-buffer} (see below).
260 @end defun
261
262 @defmac with-temp-message message &rest body
263 This construct displays a message in the echo area temporarily, during
264 the execution of @var{body}. It displays @var{message}, executes
265 @var{body}, then returns the value of the last body form while restoring
266 the previous echo area contents.
267 @end defmac
268
269 @defun message-or-box format-string &rest arguments
270 This function displays a message like @code{message}, but may display it
271 in a dialog box instead of the echo area. If this function is called in
272 a command that was invoked using the mouse---more precisely, if
273 @code{last-nonmenu-event} (@pxref{Command Loop Info}) is either
274 @code{nil} or a list---then it uses a dialog box or pop-up menu to
275 display the message. Otherwise, it uses the echo area. (This is the
276 same criterion that @code{y-or-n-p} uses to make a similar decision; see
277 @ref{Yes-or-No Queries}.)
278
279 You can force use of the mouse or of the echo area by binding
280 @code{last-nonmenu-event} to a suitable value around the call.
281 @end defun
282
283 @defun message-box format-string &rest arguments
284 @anchor{message-box}
285 This function displays a message like @code{message}, but uses a dialog
286 box (or a pop-up menu) whenever that is possible. If it is impossible
287 to use a dialog box or pop-up menu, because the terminal does not
288 support them, then @code{message-box} uses the echo area, like
289 @code{message}.
290 @end defun
291
292 @defun display-message-or-buffer message &optional buffer-name not-this-window frame
293 This function displays the message @var{message}, which may be either a
294 string or a buffer. If it is shorter than the maximum height of the
295 echo area, as defined by @code{max-mini-window-height}, it is displayed
296 in the echo area, using @code{message}. Otherwise,
297 @code{display-buffer} is used to show it in a pop-up buffer.
298
299 Returns either the string shown in the echo area, or when a pop-up
300 buffer is used, the window used to display it.
301
302 If @var{message} is a string, then the optional argument
303 @var{buffer-name} is the name of the buffer used to display it when a
304 pop-up buffer is used, defaulting to @samp{*Message*}. In the case
305 where @var{message} is a string and displayed in the echo area, it is
306 not specified whether the contents are inserted into the buffer anyway.
307
308 The optional arguments @var{not-this-window} and @var{frame} are as for
309 @code{display-buffer}, and only used if a buffer is displayed.
310 @end defun
311
312 @defun current-message
313 This function returns the message currently being displayed in the
314 echo area, or @code{nil} if there is none.
315 @end defun
316
317 @node Progress
318 @subsection Reporting Operation Progress
319 @cindex progress reporting
320
321 When an operation can take a while to finish, you should inform the
322 user about the progress it makes. This way the user can estimate
323 remaining time and clearly see that Emacs is busy working, not hung.
324
325 Functions listed in this section provide simple and efficient way of
326 reporting operation progress. Here is a working example that does
327 nothing useful:
328
329 @smallexample
330 (let ((progress-reporter
331 (make-progress-reporter "Collecting mana for Emacs..."
332 0 500)))
333 (dotimes (k 500)
334 (sit-for 0.01)
335 (progress-reporter-update progress-reporter k))
336 (progress-reporter-done progress-reporter))
337 @end smallexample
338
339 @defun make-progress-reporter message min-value max-value &optional current-value min-change min-time
340 This function creates and returns a @dfn{progress reporter}---an
341 object you will use as an argument for all other functions listed
342 here. The idea is to precompute as much data as possible to make
343 progress reporting very fast.
344
345 When this progress reporter is subsequently used, it will display
346 @var{message} in the echo area, followed by progress percentage.
347 @var{message} is treated as a simple string. If you need it to depend
348 on a filename, for instance, use @code{format} before calling this
349 function.
350
351 @var{min-value} and @var{max-value} arguments stand for starting and
352 final states of your operation. For instance, if you scan a buffer,
353 they should be the results of @code{point-min} and @code{point-max}
354 correspondingly. It is required that @var{max-value} is greater than
355 @var{min-value}. If you create progress reporter when some part of
356 the operation has already been completed, then specify
357 @var{current-value} argument. But normally you should omit it or set
358 it to @code{nil}---it will default to @var{min-value} then.
359
360 Remaining arguments control the rate of echo area updates. Progress
361 reporter will wait for at least @var{min-change} more percents of the
362 operation to be completed before printing next message.
363 @var{min-time} specifies the minimum time in seconds to pass between
364 successive prints. It can be fractional. Depending on Emacs and
365 system capabilities, progress reporter may or may not respect this
366 last argument or do it with varying precision. Default value for
367 @var{min-change} is 1 (one percent), for @var{min-time}---0.2
368 (seconds.)
369
370 This function calls @code{progress-reporter-update}, so the first
371 message is printed immediately.
372 @end defun
373
374 @defun progress-reporter-update reporter value
375 This function does the main work of reporting progress of your
376 operation. It displays the message of @var{reporter}, followed by
377 progress percentage determined by @var{value}. If percentage is zero,
378 or close enough according to the @var{min-change} and @var{min-time}
379 arguments, then it is omitted from the output.
380
381 @var{reporter} must be the result of a call to
382 @code{make-progress-reporter}. @var{value} specifies the current
383 state of your operation and must be between @var{min-value} and
384 @var{max-value} (inclusive) as passed to
385 @code{make-progress-reporter}. For instance, if you scan a buffer,
386 then @var{value} should be the result of a call to @code{point}.
387
388 This function respects @var{min-change} and @var{min-time} as passed
389 to @code{make-progress-reporter} and so does not output new messages
390 on every invocation. It is thus very fast and normally you should not
391 try to reduce the number of calls to it: resulting overhead will most
392 likely negate your effort.
393 @end defun
394
395 @defun progress-reporter-force-update reporter value &optional new-message
396 This function is similar to @code{progress-reporter-update} except
397 that it prints a message in the echo area unconditionally.
398
399 The first two arguments have the same meaning as for
400 @code{progress-reporter-update}. Optional @var{new-message} allows
401 you to change the message of the @var{reporter}. Since this functions
402 always updates the echo area, such a change will be immediately
403 presented to the user.
404 @end defun
405
406 @defun progress-reporter-done reporter
407 This function should be called when the operation is finished. It
408 prints the message of @var{reporter} followed by word ``done'' in the
409 echo area.
410
411 You should always call this function and not hope for
412 @code{progress-reporter-update} to print ``100%.'' Firstly, it may
413 never print it, there are many good reasons for this not to happen.
414 Secondly, ``done'' is more explicit.
415 @end defun
416
417 @defmac dotimes-with-progress-reporter (var count [result]) message body@dots{}
418 This is a convenience macro that works the same way as @code{dotimes}
419 does, but also reports loop progress using the functions described
420 above. It allows you to save some typing.
421
422 You can rewrite the example in the beginning of this node using
423 this macro this way:
424
425 @example
426 (dotimes-with-progress-reporter
427 (k 500)
428 "Collecting some mana for Emacs..."
429 (sit-for 0.01))
430 @end example
431 @end defmac
432
433 @node Logging Messages
434 @subsection Logging Messages in @samp{*Messages*}
435 @cindex logging echo-area messages
436
437 Almost all the messages displayed in the echo area are also recorded
438 in the @samp{*Messages*} buffer so that the user can refer back to
439 them. This includes all the messages that are output with
440 @code{message}.
441
442 @defopt message-log-max
443 This variable specifies how many lines to keep in the @samp{*Messages*}
444 buffer. The value @code{t} means there is no limit on how many lines to
445 keep. The value @code{nil} disables message logging entirely. Here's
446 how to display a message and prevent it from being logged:
447
448 @example
449 (let (message-log-max)
450 (message @dots{}))
451 @end example
452 @end defopt
453
454 To make @samp{*Messages*} more convenient for the user, the logging
455 facility combines successive identical messages. It also combines
456 successive related messages for the sake of two cases: question
457 followed by answer, and a series of progress messages.
458
459 A ``question followed by an answer'' means two messages like the
460 ones produced by @code{y-or-n-p}: the first is @samp{@var{question}},
461 and the second is @samp{@var{question}...@var{answer}}. The first
462 message conveys no additional information beyond what's in the second,
463 so logging the second message discards the first from the log.
464
465 A ``series of progress messages'' means successive messages like
466 those produced by @code{make-progress-reporter}. They have the form
467 @samp{@var{base}...@var{how-far}}, where @var{base} is the same each
468 time, while @var{how-far} varies. Logging each message in the series
469 discards the previous one, provided they are consecutive.
470
471 The functions @code{make-progress-reporter} and @code{y-or-n-p}
472 don't have to do anything special to activate the message log
473 combination feature. It operates whenever two consecutive messages
474 are logged that share a common prefix ending in @samp{...}.
475
476 @node Echo Area Customization
477 @subsection Echo Area Customization
478
479 These variables control details of how the echo area works.
480
481 @defvar cursor-in-echo-area
482 This variable controls where the cursor appears when a message is
483 displayed in the echo area. If it is non-@code{nil}, then the cursor
484 appears at the end of the message. Otherwise, the cursor appears at
485 point---not in the echo area at all.
486
487 The value is normally @code{nil}; Lisp programs bind it to @code{t}
488 for brief periods of time.
489 @end defvar
490
491 @defvar echo-area-clear-hook
492 This normal hook is run whenever the echo area is cleared---either by
493 @code{(message nil)} or for any other reason.
494 @end defvar
495
496 @defvar echo-keystrokes
497 This variable determines how much time should elapse before command
498 characters echo. Its value must be an integer or floating point number,
499 which specifies the
500 number of seconds to wait before echoing. If the user types a prefix
501 key (such as @kbd{C-x}) and then delays this many seconds before
502 continuing, the prefix key is echoed in the echo area. (Once echoing
503 begins in a key sequence, all subsequent characters in the same key
504 sequence are echoed immediately.)
505
506 If the value is zero, then command input is not echoed.
507 @end defvar
508
509 @defvar message-truncate-lines
510 Normally, displaying a long message resizes the echo area to display
511 the entire message. But if the variable @code{message-truncate-lines}
512 is non-@code{nil}, the echo area does not resize, and the message is
513 truncated to fit it, as in Emacs 20 and before.
514 @end defvar
515
516 The variable @code{max-mini-window-height}, which specifies the
517 maximum height for resizing minibuffer windows, also applies to the
518 echo area (which is really a special use of the minibuffer window.
519 @xref{Minibuffer Misc}.
520
521 @node Warnings
522 @section Reporting Warnings
523 @cindex warnings
524
525 @dfn{Warnings} are a facility for a program to inform the user of a
526 possible problem, but continue running.
527
528 @menu
529 * Warning Basics:: Warnings concepts and functions to report them.
530 * Warning Variables:: Variables programs bind to customize their warnings.
531 * Warning Options:: Variables users set to control display of warnings.
532 @end menu
533
534 @node Warning Basics
535 @subsection Warning Basics
536 @cindex severity level
537
538 Every warning has a textual message, which explains the problem for
539 the user, and a @dfn{severity level} which is a symbol. Here are the
540 possible severity levels, in order of decreasing severity, and their
541 meanings:
542
543 @table @code
544 @item :emergency
545 A problem that will seriously impair Emacs operation soon
546 if you do not attend to it promptly.
547 @item :error
548 A report of data or circumstances that are inherently wrong.
549 @item :warning
550 A report of data or circumstances that are not inherently wrong, but
551 raise suspicion of a possible problem.
552 @item :debug
553 A report of information that may be useful if you are debugging.
554 @end table
555
556 When your program encounters invalid input data, it can either
557 signal a Lisp error by calling @code{error} or @code{signal} or report
558 a warning with severity @code{:error}. Signaling a Lisp error is the
559 easiest thing to do, but it means the program cannot continue
560 processing. If you want to take the trouble to implement a way to
561 continue processing despite the bad data, then reporting a warning of
562 severity @code{:error} is the right way to inform the user of the
563 problem. For instance, the Emacs Lisp byte compiler can report an
564 error that way and continue compiling other functions. (If the
565 program signals a Lisp error and then handles it with
566 @code{condition-case}, the user won't see the error message; it could
567 show the message to the user by reporting it as a warning.)
568
569 @cindex warning type
570 Each warning has a @dfn{warning type} to classify it. The type is a
571 list of symbols. The first symbol should be the custom group that you
572 use for the program's user options. For example, byte compiler
573 warnings use the warning type @code{(bytecomp)}. You can also
574 subcategorize the warnings, if you wish, by using more symbols in the
575 list.
576
577 @defun display-warning type message &optional level buffer-name
578 This function reports a warning, using @var{message} as the message
579 and @var{type} as the warning type. @var{level} should be the
580 severity level, with @code{:warning} being the default.
581
582 @var{buffer-name}, if non-@code{nil}, specifies the name of the buffer
583 for logging the warning. By default, it is @samp{*Warnings*}.
584 @end defun
585
586 @defun lwarn type level message &rest args
587 This function reports a warning using the value of @code{(format
588 @var{message} @var{args}...)} as the message. In other respects it is
589 equivalent to @code{display-warning}.
590 @end defun
591
592 @defun warn message &rest args
593 This function reports a warning using the value of @code{(format
594 @var{message} @var{args}...)} as the message, @code{(emacs)} as the
595 type, and @code{:warning} as the severity level. It exists for
596 compatibility only; we recommend not using it, because you should
597 specify a specific warning type.
598 @end defun
599
600 @node Warning Variables
601 @subsection Warning Variables
602
603 Programs can customize how their warnings appear by binding
604 the variables described in this section.
605
606 @defvar warning-levels
607 This list defines the meaning and severity order of the warning
608 severity levels. Each element defines one severity level,
609 and they are arranged in order of decreasing severity.
610
611 Each element has the form @code{(@var{level} @var{string}
612 @var{function})}, where @var{level} is the severity level it defines.
613 @var{string} specifies the textual description of this level.
614 @var{string} should use @samp{%s} to specify where to put the warning
615 type information, or it can omit the @samp{%s} so as not to include
616 that information.
617
618 The optional @var{function}, if non-@code{nil}, is a function to call
619 with no arguments, to get the user's attention.
620
621 Normally you should not change the value of this variable.
622 @end defvar
623
624 @defvar warning-prefix-function
625 If non-@code{nil}, the value is a function to generate prefix text for
626 warnings. Programs can bind the variable to a suitable function.
627 @code{display-warning} calls this function with the warnings buffer
628 current, and the function can insert text in it. That text becomes
629 the beginning of the warning message.
630
631 The function is called with two arguments, the severity level and its
632 entry in @code{warning-levels}. It should return a list to use as the
633 entry (this value need not be an actual member of
634 @code{warning-levels}). By constructing this value, the function can
635 change the severity of the warning, or specify different handling for
636 a given severity level.
637
638 If the variable's value is @code{nil} then there is no function
639 to call.
640 @end defvar
641
642 @defvar warning-series
643 Programs can bind this variable to @code{t} to say that the next
644 warning should begin a series. When several warnings form a series,
645 that means to leave point on the first warning of the series, rather
646 than keep moving it for each warning so that it appears on the last one.
647 The series ends when the local binding is unbound and
648 @code{warning-series} becomes @code{nil} again.
649
650 The value can also be a symbol with a function definition. That is
651 equivalent to @code{t}, except that the next warning will also call
652 the function with no arguments with the warnings buffer current. The
653 function can insert text which will serve as a header for the series
654 of warnings.
655
656 Once a series has begun, the value is a marker which points to the
657 buffer position in the warnings buffer of the start of the series.
658
659 The variable's normal value is @code{nil}, which means to handle
660 each warning separately.
661 @end defvar
662
663 @defvar warning-fill-prefix
664 When this variable is non-@code{nil}, it specifies a fill prefix to
665 use for filling each warning's text.
666 @end defvar
667
668 @defvar warning-type-format
669 This variable specifies the format for displaying the warning type
670 in the warning message. The result of formatting the type this way
671 gets included in the message under the control of the string in the
672 entry in @code{warning-levels}. The default value is @code{" (%s)"}.
673 If you bind it to @code{""} then the warning type won't appear at
674 all.
675 @end defvar
676
677 @node Warning Options
678 @subsection Warning Options
679
680 These variables are used by users to control what happens
681 when a Lisp program reports a warning.
682
683 @defopt warning-minimum-level
684 This user option specifies the minimum severity level that should be
685 shown immediately to the user. The default is @code{:warning}, which
686 means to immediately display all warnings except @code{:debug}
687 warnings.
688 @end defopt
689
690 @defopt warning-minimum-log-level
691 This user option specifies the minimum severity level that should be
692 logged in the warnings buffer. The default is @code{:warning}, which
693 means to log all warnings except @code{:debug} warnings.
694 @end defopt
695
696 @defopt warning-suppress-types
697 This list specifies which warning types should not be displayed
698 immediately for the user. Each element of the list should be a list
699 of symbols. If its elements match the first elements in a warning
700 type, then that warning is not displayed immediately.
701 @end defopt
702
703 @defopt warning-suppress-log-types
704 This list specifies which warning types should not be logged in the
705 warnings buffer. Each element of the list should be a list of
706 symbols. If it matches the first few elements in a warning type, then
707 that warning is not logged.
708 @end defopt
709
710 @node Invisible Text
711 @section Invisible Text
712
713 @cindex invisible text
714 You can make characters @dfn{invisible}, so that they do not appear on
715 the screen, with the @code{invisible} property. This can be either a
716 text property (@pxref{Text Properties}) or a property of an overlay
717 (@pxref{Overlays}). Cursor motion also partly ignores these
718 characters; if the command loop finds point within them, it moves
719 point to the other side of them.
720
721 In the simplest case, any non-@code{nil} @code{invisible} property makes
722 a character invisible. This is the default case---if you don't alter
723 the default value of @code{buffer-invisibility-spec}, this is how the
724 @code{invisible} property works. You should normally use @code{t}
725 as the value of the @code{invisible} property if you don't plan
726 to set @code{buffer-invisibility-spec} yourself.
727
728 More generally, you can use the variable @code{buffer-invisibility-spec}
729 to control which values of the @code{invisible} property make text
730 invisible. This permits you to classify the text into different subsets
731 in advance, by giving them different @code{invisible} values, and
732 subsequently make various subsets visible or invisible by changing the
733 value of @code{buffer-invisibility-spec}.
734
735 Controlling visibility with @code{buffer-invisibility-spec} is
736 especially useful in a program to display the list of entries in a
737 database. It permits the implementation of convenient filtering
738 commands to view just a part of the entries in the database. Setting
739 this variable is very fast, much faster than scanning all the text in
740 the buffer looking for properties to change.
741
742 @defvar buffer-invisibility-spec
743 This variable specifies which kinds of @code{invisible} properties
744 actually make a character invisible. Setting this variable makes it
745 buffer-local.
746
747 @table @asis
748 @item @code{t}
749 A character is invisible if its @code{invisible} property is
750 non-@code{nil}. This is the default.
751
752 @item a list
753 Each element of the list specifies a criterion for invisibility; if a
754 character's @code{invisible} property fits any one of these criteria,
755 the character is invisible. The list can have two kinds of elements:
756
757 @table @code
758 @item @var{atom}
759 A character is invisible if its @code{invisible} property value
760 is @var{atom} or if it is a list with @var{atom} as a member.
761
762 @item (@var{atom} . t)
763 A character is invisible if its @code{invisible} property value
764 is @var{atom} or if it is a list with @var{atom} as a member.
765 Moreover, if this character is at the end of a line and is followed
766 by a visible newline, it displays an ellipsis.
767 @end table
768 @end table
769 @end defvar
770
771 Two functions are specifically provided for adding elements to
772 @code{buffer-invisibility-spec} and removing elements from it.
773
774 @defun add-to-invisibility-spec element
775 This function adds the element @var{element} to
776 @code{buffer-invisibility-spec}. If @code{buffer-invisibility-spec}
777 was @code{t}, it changes to a list, @code{(t)}, so that text whose
778 @code{invisible} property is @code{t} remains invisible.
779 @end defun
780
781 @defun remove-from-invisibility-spec element
782 This removes the element @var{element} from
783 @code{buffer-invisibility-spec}. This does nothing if @var{element}
784 is not in the list.
785 @end defun
786
787 A convention for use of @code{buffer-invisibility-spec} is that a
788 major mode should use the mode's own name as an element of
789 @code{buffer-invisibility-spec} and as the value of the
790 @code{invisible} property:
791
792 @example
793 ;; @r{If you want to display an ellipsis:}
794 (add-to-invisibility-spec '(my-symbol . t))
795 ;; @r{If you don't want ellipsis:}
796 (add-to-invisibility-spec 'my-symbol)
797
798 (overlay-put (make-overlay beginning end)
799 'invisible 'my-symbol)
800
801 ;; @r{When done with the overlays:}
802 (remove-from-invisibility-spec '(my-symbol . t))
803 ;; @r{Or respectively:}
804 (remove-from-invisibility-spec 'my-symbol)
805 @end example
806
807 @vindex line-move-ignore-invisible
808 Ordinarily, functions that operate on text or move point do not care
809 whether the text is invisible. The user-level line motion commands
810 explicitly ignore invisible newlines if
811 @code{line-move-ignore-invisible} is non-@code{nil} (the default), but
812 only because they are explicitly programmed to do so.
813
814 However, if a command ends with point inside or immediately before
815 invisible text, the main editing loop moves point further forward or
816 further backward (in the same direction that the command already moved
817 it) until that condition is no longer true. Thus, if the command
818 moved point back into an invisible range, Emacs moves point back to
819 the beginning of that range, and then back one more character. If the
820 command moved point forward into an invisible range, Emacs moves point
821 forward up to the first visible character that follows the invisible
822 text.
823
824 Incremental search can make invisible overlays visible temporarily
825 and/or permanently when a match includes invisible text. To enable
826 this, the overlay should have a non-@code{nil}
827 @code{isearch-open-invisible} property. The property value should be a
828 function to be called with the overlay as an argument. This function
829 should make the overlay visible permanently; it is used when the match
830 overlaps the overlay on exit from the search.
831
832 During the search, such overlays are made temporarily visible by
833 temporarily modifying their invisible and intangible properties. If you
834 want this to be done differently for a certain overlay, give it an
835 @code{isearch-open-invisible-temporary} property which is a function.
836 The function is called with two arguments: the first is the overlay, and
837 the second is @code{nil} to make the overlay visible, or @code{t} to
838 make it invisible again.
839
840 @node Selective Display
841 @section Selective Display
842 @cindex selective display
843
844 @dfn{Selective display} refers to a pair of related features for
845 hiding certain lines on the screen.
846
847 The first variant, explicit selective display, is designed for use
848 in a Lisp program: it controls which lines are hidden by altering the
849 text. This kind of hiding in some ways resembles the effect of the
850 @code{invisible} property (@pxref{Invisible Text}), but the two
851 features are different and do not work the same way.
852
853 In the second variant, the choice of lines to hide is made
854 automatically based on indentation. This variant is designed to be a
855 user-level feature.
856
857 The way you control explicit selective display is by replacing a
858 newline (control-j) with a carriage return (control-m). The text that
859 was formerly a line following that newline is now hidden. Strictly
860 speaking, it is temporarily no longer a line at all, since only
861 newlines can separate lines; it is now part of the previous line.
862
863 Selective display does not directly affect editing commands. For
864 example, @kbd{C-f} (@code{forward-char}) moves point unhesitatingly
865 into hidden text. However, the replacement of newline characters with
866 carriage return characters affects some editing commands. For
867 example, @code{next-line} skips hidden lines, since it searches only
868 for newlines. Modes that use selective display can also define
869 commands that take account of the newlines, or that control which
870 parts of the text are hidden.
871
872 When you write a selectively displayed buffer into a file, all the
873 control-m's are output as newlines. This means that when you next read
874 in the file, it looks OK, with nothing hidden. The selective display
875 effect is seen only within Emacs.
876
877 @defvar selective-display
878 This buffer-local variable enables selective display. This means that
879 lines, or portions of lines, may be made hidden.
880
881 @itemize @bullet
882 @item
883 If the value of @code{selective-display} is @code{t}, then the character
884 control-m marks the start of hidden text; the control-m, and the rest
885 of the line following it, are not displayed. This is explicit selective
886 display.
887
888 @item
889 If the value of @code{selective-display} is a positive integer, then
890 lines that start with more than that many columns of indentation are not
891 displayed.
892 @end itemize
893
894 When some portion of a buffer is hidden, the vertical movement
895 commands operate as if that portion did not exist, allowing a single
896 @code{next-line} command to skip any number of hidden lines.
897 However, character movement commands (such as @code{forward-char}) do
898 not skip the hidden portion, and it is possible (if tricky) to insert
899 or delete text in an hidden portion.
900
901 In the examples below, we show the @emph{display appearance} of the
902 buffer @code{foo}, which changes with the value of
903 @code{selective-display}. The @emph{contents} of the buffer do not
904 change.
905
906 @example
907 @group
908 (setq selective-display nil)
909 @result{} nil
910
911 ---------- Buffer: foo ----------
912 1 on this column
913 2on this column
914 3n this column
915 3n this column
916 2on this column
917 1 on this column
918 ---------- Buffer: foo ----------
919 @end group
920
921 @group
922 (setq selective-display 2)
923 @result{} 2
924
925 ---------- Buffer: foo ----------
926 1 on this column
927 2on this column
928 2on this column
929 1 on this column
930 ---------- Buffer: foo ----------
931 @end group
932 @end example
933 @end defvar
934
935 @defvar selective-display-ellipses
936 If this buffer-local variable is non-@code{nil}, then Emacs displays
937 @samp{@dots{}} at the end of a line that is followed by hidden text.
938 This example is a continuation of the previous one.
939
940 @example
941 @group
942 (setq selective-display-ellipses t)
943 @result{} t
944
945 ---------- Buffer: foo ----------
946 1 on this column
947 2on this column ...
948 2on this column
949 1 on this column
950 ---------- Buffer: foo ----------
951 @end group
952 @end example
953
954 You can use a display table to substitute other text for the ellipsis
955 (@samp{@dots{}}). @xref{Display Tables}.
956 @end defvar
957
958 @node Temporary Displays
959 @section Temporary Displays
960
961 Temporary displays are used by Lisp programs to put output into a
962 buffer and then present it to the user for perusal rather than for
963 editing. Many help commands use this feature.
964
965 @defspec with-output-to-temp-buffer buffer-name forms@dots{}
966 This function executes @var{forms} while arranging to insert any output
967 they print into the buffer named @var{buffer-name}, which is first
968 created if necessary, and put into Help mode. Finally, the buffer is
969 displayed in some window, but not selected.
970
971 If the @var{forms} do not change the major mode in the output buffer,
972 so that it is still Help mode at the end of their execution, then
973 @code{with-output-to-temp-buffer} makes this buffer read-only at the
974 end, and also scans it for function and variable names to make them
975 into clickable cross-references. @xref{Docstring hyperlinks, , Tips
976 for Documentation Strings}, in particular the item on hyperlinks in
977 documentation strings, for more details.
978
979 The string @var{buffer-name} specifies the temporary buffer, which
980 need not already exist. The argument must be a string, not a buffer.
981 The buffer is erased initially (with no questions asked), and it is
982 marked as unmodified after @code{with-output-to-temp-buffer} exits.
983
984 @code{with-output-to-temp-buffer} binds @code{standard-output} to the
985 temporary buffer, then it evaluates the forms in @var{forms}. Output
986 using the Lisp output functions within @var{forms} goes by default to
987 that buffer (but screen display and messages in the echo area, although
988 they are ``output'' in the general sense of the word, are not affected).
989 @xref{Output Functions}.
990
991 Several hooks are available for customizing the behavior
992 of this construct; they are listed below.
993
994 The value of the last form in @var{forms} is returned.
995
996 @example
997 @group
998 ---------- Buffer: foo ----------
999 This is the contents of foo.
1000 ---------- Buffer: foo ----------
1001 @end group
1002
1003 @group
1004 (with-output-to-temp-buffer "foo"
1005 (print 20)
1006 (print standard-output))
1007 @result{} #<buffer foo>
1008
1009 ---------- Buffer: foo ----------
1010 20
1011
1012 #<buffer foo>
1013
1014 ---------- Buffer: foo ----------
1015 @end group
1016 @end example
1017 @end defspec
1018
1019 @defvar temp-buffer-show-function
1020 If this variable is non-@code{nil}, @code{with-output-to-temp-buffer}
1021 calls it as a function to do the job of displaying a help buffer. The
1022 function gets one argument, which is the buffer it should display.
1023
1024 It is a good idea for this function to run @code{temp-buffer-show-hook}
1025 just as @code{with-output-to-temp-buffer} normally would, inside of
1026 @code{save-selected-window} and with the chosen window and buffer
1027 selected.
1028 @end defvar
1029
1030 @defvar temp-buffer-setup-hook
1031 This normal hook is run by @code{with-output-to-temp-buffer} before
1032 evaluating @var{body}. When the hook runs, the temporary buffer is
1033 current. This hook is normally set up with a function to put the
1034 buffer in Help mode.
1035 @end defvar
1036
1037 @defvar temp-buffer-show-hook
1038 This normal hook is run by @code{with-output-to-temp-buffer} after
1039 displaying the temporary buffer. When the hook runs, the temporary buffer
1040 is current, and the window it was displayed in is selected. This hook
1041 is normally set up with a function to make the buffer read only, and
1042 find function names and variable names in it, provided the major mode
1043 is Help mode.
1044 @end defvar
1045
1046 @defun momentary-string-display string position &optional char message
1047 This function momentarily displays @var{string} in the current buffer at
1048 @var{position}. It has no effect on the undo list or on the buffer's
1049 modification status.
1050
1051 The momentary display remains until the next input event. If the next
1052 input event is @var{char}, @code{momentary-string-display} ignores it
1053 and returns. Otherwise, that event remains buffered for subsequent use
1054 as input. Thus, typing @var{char} will simply remove the string from
1055 the display, while typing (say) @kbd{C-f} will remove the string from
1056 the display and later (presumably) move point forward. The argument
1057 @var{char} is a space by default.
1058
1059 The return value of @code{momentary-string-display} is not meaningful.
1060
1061 If the string @var{string} does not contain control characters, you can
1062 do the same job in a more general way by creating (and then subsequently
1063 deleting) an overlay with a @code{before-string} property.
1064 @xref{Overlay Properties}.
1065
1066 If @var{message} is non-@code{nil}, it is displayed in the echo area
1067 while @var{string} is displayed in the buffer. If it is @code{nil}, a
1068 default message says to type @var{char} to continue.
1069
1070 In this example, point is initially located at the beginning of the
1071 second line:
1072
1073 @example
1074 @group
1075 ---------- Buffer: foo ----------
1076 This is the contents of foo.
1077 @point{}Second line.
1078 ---------- Buffer: foo ----------
1079 @end group
1080
1081 @group
1082 (momentary-string-display
1083 "**** Important Message! ****"
1084 (point) ?\r
1085 "Type RET when done reading")
1086 @result{} t
1087 @end group
1088
1089 @group
1090 ---------- Buffer: foo ----------
1091 This is the contents of foo.
1092 **** Important Message! ****Second line.
1093 ---------- Buffer: foo ----------
1094
1095 ---------- Echo Area ----------
1096 Type RET when done reading
1097 ---------- Echo Area ----------
1098 @end group
1099 @end example
1100 @end defun
1101
1102 @node Overlays
1103 @section Overlays
1104 @cindex overlays
1105
1106 You can use @dfn{overlays} to alter the appearance of a buffer's text on
1107 the screen, for the sake of presentation features. An overlay is an
1108 object that belongs to a particular buffer, and has a specified
1109 beginning and end. It also has properties that you can examine and set;
1110 these affect the display of the text within the overlay.
1111
1112 An overlay uses markers to record its beginning and end; thus,
1113 editing the text of the buffer adjusts the beginning and end of each
1114 overlay so that it stays with the text. When you create the overlay,
1115 you can specify whether text inserted at the beginning should be
1116 inside the overlay or outside, and likewise for the end of the overlay.
1117
1118 @menu
1119 * Managing Overlays:: Creating and moving overlays.
1120 * Overlay Properties:: How to read and set properties.
1121 What properties do to the screen display.
1122 * Finding Overlays:: Searching for overlays.
1123 @end menu
1124
1125 @node Managing Overlays
1126 @subsection Managing Overlays
1127
1128 This section describes the functions to create, delete and move
1129 overlays, and to examine their contents. Overlay changes are not
1130 recorded in the buffer's undo list, since the overlays are not
1131 part of the buffer's contents.
1132
1133 @defun overlayp object
1134 This function returns @code{t} if @var{object} is an overlay.
1135 @end defun
1136
1137 @defun make-overlay start end &optional buffer front-advance rear-advance
1138 This function creates and returns an overlay that belongs to
1139 @var{buffer} and ranges from @var{start} to @var{end}. Both @var{start}
1140 and @var{end} must specify buffer positions; they may be integers or
1141 markers. If @var{buffer} is omitted, the overlay is created in the
1142 current buffer.
1143
1144 The arguments @var{front-advance} and @var{rear-advance} specify the
1145 marker insertion type for the start of the overlay and for the end of
1146 the overlay, respectively. @xref{Marker Insertion Types}. If they
1147 are both @code{nil}, the default, then the overlay extends to include
1148 any text inserted at the beginning, but not text inserted at the end.
1149 If @var{front-advance} is non-@code{nil}, text inserted at the
1150 beginning of the overlay is excluded from the overlay. If
1151 @var{rear-advance} is non-@code{nil}, text inserted at the end of the
1152 overlay is included in the overlay.
1153 @end defun
1154
1155 @defun overlay-start overlay
1156 This function returns the position at which @var{overlay} starts,
1157 as an integer.
1158 @end defun
1159
1160 @defun overlay-end overlay
1161 This function returns the position at which @var{overlay} ends,
1162 as an integer.
1163 @end defun
1164
1165 @defun overlay-buffer overlay
1166 This function returns the buffer that @var{overlay} belongs to. It
1167 returns @code{nil} if @var{overlay} has been deleted.
1168 @end defun
1169
1170 @defun delete-overlay overlay
1171 This function deletes @var{overlay}. The overlay continues to exist as
1172 a Lisp object, and its property list is unchanged, but it ceases to be
1173 attached to the buffer it belonged to, and ceases to have any effect on
1174 display.
1175
1176 A deleted overlay is not permanently disconnected. You can give it a
1177 position in a buffer again by calling @code{move-overlay}.
1178 @end defun
1179
1180 @defun move-overlay overlay start end &optional buffer
1181 This function moves @var{overlay} to @var{buffer}, and places its bounds
1182 at @var{start} and @var{end}. Both arguments @var{start} and @var{end}
1183 must specify buffer positions; they may be integers or markers.
1184
1185 If @var{buffer} is omitted, @var{overlay} stays in the same buffer it
1186 was already associated with; if @var{overlay} was deleted, it goes into
1187 the current buffer.
1188
1189 The return value is @var{overlay}.
1190
1191 This is the only valid way to change the endpoints of an overlay. Do
1192 not try modifying the markers in the overlay by hand, as that fails to
1193 update other vital data structures and can cause some overlays to be
1194 ``lost.''
1195 @end defun
1196
1197 @defun remove-overlays &optional start end name value
1198 This function removes all the overlays between @var{start} and
1199 @var{end} whose property @var{name} has the value @var{value}. It can
1200 move the endpoints of the overlays in the region, or split them.
1201
1202 If @var{name} is omitted or @code{nil}, it means to delete all overlays in
1203 the specified region. If @var{start} and/or @var{end} are omitted or
1204 @code{nil}, that means the beginning and end of the buffer respectively.
1205 Therefore, @code{(remove-overlays)} removes all the overlays in the
1206 current buffer.
1207 @end defun
1208
1209 Here are some examples:
1210
1211 @example
1212 ;; @r{Create an overlay.}
1213 (setq foo (make-overlay 1 10))
1214 @result{} #<overlay from 1 to 10 in display.texi>
1215 (overlay-start foo)
1216 @result{} 1
1217 (overlay-end foo)
1218 @result{} 10
1219 (overlay-buffer foo)
1220 @result{} #<buffer display.texi>
1221 ;; @r{Give it a property we can check later.}
1222 (overlay-put foo 'happy t)
1223 @result{} t
1224 ;; @r{Verify the property is present.}
1225 (overlay-get foo 'happy)
1226 @result{} t
1227 ;; @r{Move the overlay.}
1228 (move-overlay foo 5 20)
1229 @result{} #<overlay from 5 to 20 in display.texi>
1230 (overlay-start foo)
1231 @result{} 5
1232 (overlay-end foo)
1233 @result{} 20
1234 ;; @r{Delete the overlay.}
1235 (delete-overlay foo)
1236 @result{} nil
1237 ;; @r{Verify it is deleted.}
1238 foo
1239 @result{} #<overlay in no buffer>
1240 ;; @r{A deleted overlay has no position.}
1241 (overlay-start foo)
1242 @result{} nil
1243 (overlay-end foo)
1244 @result{} nil
1245 (overlay-buffer foo)
1246 @result{} nil
1247 ;; @r{Undelete the overlay.}
1248 (move-overlay foo 1 20)
1249 @result{} #<overlay from 1 to 20 in display.texi>
1250 ;; @r{Verify the results.}
1251 (overlay-start foo)
1252 @result{} 1
1253 (overlay-end foo)
1254 @result{} 20
1255 (overlay-buffer foo)
1256 @result{} #<buffer display.texi>
1257 ;; @r{Moving and deleting the overlay does not change its properties.}
1258 (overlay-get foo 'happy)
1259 @result{} t
1260 @end example
1261
1262 @node Overlay Properties
1263 @subsection Overlay Properties
1264
1265 Overlay properties are like text properties in that the properties that
1266 alter how a character is displayed can come from either source. But in
1267 most respects they are different. @xref{Text Properties}, for comparison.
1268
1269 Text properties are considered a part of the text; overlays and
1270 their properties are specifically considered not to be part of the
1271 text. Thus, copying text between various buffers and strings
1272 preserves text properties, but does not try to preserve overlays.
1273 Changing a buffer's text properties marks the buffer as modified,
1274 while moving an overlay or changing its properties does not. Unlike
1275 text property changes, overlay property changes are not recorded in
1276 the buffer's undo list.
1277
1278 These functions read and set the properties of an overlay:
1279
1280 @defun overlay-get overlay prop
1281 This function returns the value of property @var{prop} recorded in
1282 @var{overlay}, if any. If @var{overlay} does not record any value for
1283 that property, but it does have a @code{category} property which is a
1284 symbol, that symbol's @var{prop} property is used. Otherwise, the value
1285 is @code{nil}.
1286 @end defun
1287
1288 @defun overlay-put overlay prop value
1289 This function sets the value of property @var{prop} recorded in
1290 @var{overlay} to @var{value}. It returns @var{value}.
1291 @end defun
1292
1293 @defun overlay-properties overlay
1294 This returns a copy of the property list of @var{overlay}.
1295 @end defun
1296
1297 See also the function @code{get-char-property} which checks both
1298 overlay properties and text properties for a given character.
1299 @xref{Examining Properties}.
1300
1301 Many overlay properties have special meanings; here is a table
1302 of them:
1303
1304 @table @code
1305 @item priority
1306 @kindex priority @r{(overlay property)}
1307 This property's value (which should be a nonnegative integer number)
1308 determines the priority of the overlay. The priority matters when two
1309 or more overlays cover the same character and both specify the same
1310 property; the one whose @code{priority} value is larger takes priority
1311 over the other. For the @code{face} property, the higher priority
1312 value does not completely replace the other; instead, its face
1313 attributes override the face attributes of the lower priority
1314 @code{face} property.
1315
1316 Currently, all overlays take priority over text properties. Please
1317 avoid using negative priority values, as we have not yet decided just
1318 what they should mean.
1319
1320 @item window
1321 @kindex window @r{(overlay property)}
1322 If the @code{window} property is non-@code{nil}, then the overlay
1323 applies only on that window.
1324
1325 @item category
1326 @kindex category @r{(overlay property)}
1327 If an overlay has a @code{category} property, we call it the
1328 @dfn{category} of the overlay. It should be a symbol. The properties
1329 of the symbol serve as defaults for the properties of the overlay.
1330
1331 @item face
1332 @kindex face @r{(overlay property)}
1333 This property controls the way text is displayed---for example, which
1334 font and which colors. @xref{Faces}, for more information.
1335
1336 In the simplest case, the value is a face name. It can also be a list;
1337 then each element can be any of these possibilities:
1338
1339 @itemize @bullet
1340 @item
1341 A face name (a symbol or string).
1342
1343 @item
1344 A property list of face attributes. This has the form (@var{keyword}
1345 @var{value} @dots{}), where each @var{keyword} is a face attribute
1346 name and @var{value} is a meaningful value for that attribute. With
1347 this feature, you do not need to create a face each time you want to
1348 specify a particular attribute for certain text. @xref{Face
1349 Attributes}.
1350
1351 @item
1352 A cons cell of the form @code{(foreground-color . @var{color-name})} or
1353 @code{(background-color . @var{color-name})}. These elements specify
1354 just the foreground color or just the background color.
1355
1356 @code{(foreground-color . @var{color-name})} has the same effect as
1357 @code{(:foreground @var{color-name})}; likewise for the background.
1358 @end itemize
1359
1360 @item mouse-face
1361 @kindex mouse-face @r{(overlay property)}
1362 This property is used instead of @code{face} when the mouse is within
1363 the range of the overlay.
1364
1365 @item display
1366 @kindex display @r{(overlay property)}
1367 This property activates various features that change the
1368 way text is displayed. For example, it can make text appear taller
1369 or shorter, higher or lower, wider or narrower, or replaced with an image.
1370 @xref{Display Property}.
1371
1372 @item help-echo
1373 @kindex help-echo @r{(overlay property)}
1374 If an overlay has a @code{help-echo} property, then when you move the
1375 mouse onto the text in the overlay, Emacs displays a help string in the
1376 echo area, or in the tooltip window. For details see @ref{Text
1377 help-echo}.
1378
1379 @item modification-hooks
1380 @kindex modification-hooks @r{(overlay property)}
1381 This property's value is a list of functions to be called if any
1382 character within the overlay is changed or if text is inserted strictly
1383 within the overlay.
1384
1385 The hook functions are called both before and after each change.
1386 If the functions save the information they receive, and compare notes
1387 between calls, they can determine exactly what change has been made
1388 in the buffer text.
1389
1390 When called before a change, each function receives four arguments: the
1391 overlay, @code{nil}, and the beginning and end of the text range to be
1392 modified.
1393
1394 When called after a change, each function receives five arguments: the
1395 overlay, @code{t}, the beginning and end of the text range just
1396 modified, and the length of the pre-change text replaced by that range.
1397 (For an insertion, the pre-change length is zero; for a deletion, that
1398 length is the number of characters deleted, and the post-change
1399 beginning and end are equal.)
1400
1401 If these functions modify the buffer, they should bind
1402 @code{inhibit-modification-hooks} to @code{t} around doing so, to
1403 avoid confusing the internal mechanism that calls these hooks.
1404
1405 @item insert-in-front-hooks
1406 @kindex insert-in-front-hooks @r{(overlay property)}
1407 This property's value is a list of functions to be called before and
1408 after inserting text right at the beginning of the overlay. The calling
1409 conventions are the same as for the @code{modification-hooks} functions.
1410
1411 @item insert-behind-hooks
1412 @kindex insert-behind-hooks @r{(overlay property)}
1413 This property's value is a list of functions to be called before and
1414 after inserting text right at the end of the overlay. The calling
1415 conventions are the same as for the @code{modification-hooks} functions.
1416
1417 @item invisible
1418 @kindex invisible @r{(overlay property)}
1419 The @code{invisible} property can make the text in the overlay
1420 invisible, which means that it does not appear on the screen.
1421 @xref{Invisible Text}, for details.
1422
1423 @item intangible
1424 @kindex intangible @r{(overlay property)}
1425 The @code{intangible} property on an overlay works just like the
1426 @code{intangible} text property. @xref{Special Properties}, for details.
1427
1428 @item isearch-open-invisible
1429 This property tells incremental search how to make an invisible overlay
1430 visible, permanently, if the final match overlaps it. @xref{Invisible
1431 Text}.
1432
1433 @item isearch-open-invisible-temporary
1434 This property tells incremental search how to make an invisible overlay
1435 visible, temporarily, during the search. @xref{Invisible Text}.
1436
1437 @item before-string
1438 @kindex before-string @r{(overlay property)}
1439 This property's value is a string to add to the display at the beginning
1440 of the overlay. The string does not appear in the buffer in any
1441 sense---only on the screen.
1442
1443 @item after-string
1444 @kindex after-string @r{(overlay property)}
1445 This property's value is a string to add to the display at the end of
1446 the overlay. The string does not appear in the buffer in any
1447 sense---only on the screen.
1448
1449 @item evaporate
1450 @kindex evaporate @r{(overlay property)}
1451 If this property is non-@code{nil}, the overlay is deleted automatically
1452 if it becomes empty (i.e., if its length becomes zero). If you give
1453 an empty overlay a non-@code{nil} @code{evaporate} property, that deletes
1454 it immediately.
1455
1456 @item local-map
1457 @cindex keymap of character (and overlays)
1458 @kindex local-map @r{(overlay property)}
1459 If this property is non-@code{nil}, it specifies a keymap for a portion
1460 of the text. The property's value replaces the buffer's local map, when
1461 the character after point is within the overlay. @xref{Active Keymaps}.
1462
1463 @item keymap
1464 @kindex keymap @r{(overlay property)}
1465 The @code{keymap} property is similar to @code{local-map} but overrides the
1466 buffer's local map (and the map specified by the @code{local-map}
1467 property) rather than replacing it.
1468 @end table
1469
1470 @node Finding Overlays
1471 @subsection Searching for Overlays
1472
1473 @defun overlays-at pos
1474 This function returns a list of all the overlays that cover the
1475 character at position @var{pos} in the current buffer. The list is in
1476 no particular order. An overlay contains position @var{pos} if it
1477 begins at or before @var{pos}, and ends after @var{pos}.
1478
1479 To illustrate usage, here is a Lisp function that returns a list of the
1480 overlays that specify property @var{prop} for the character at point:
1481
1482 @smallexample
1483 (defun find-overlays-specifying (prop)
1484 (let ((overlays (overlays-at (point)))
1485 found)
1486 (while overlays
1487 (let ((overlay (car overlays)))
1488 (if (overlay-get overlay prop)
1489 (setq found (cons overlay found))))
1490 (setq overlays (cdr overlays)))
1491 found))
1492 @end smallexample
1493 @end defun
1494
1495 @defun overlays-in beg end
1496 This function returns a list of the overlays that overlap the region
1497 @var{beg} through @var{end}. ``Overlap'' means that at least one
1498 character is contained within the overlay and also contained within the
1499 specified region; however, empty overlays are included in the result if
1500 they are located at @var{beg}, or strictly between @var{beg} and @var{end}.
1501 @end defun
1502
1503 @defun next-overlay-change pos
1504 This function returns the buffer position of the next beginning or end
1505 of an overlay, after @var{pos}. If there is none, it returns
1506 @code{(point-max)}.
1507 @end defun
1508
1509 @defun previous-overlay-change pos
1510 This function returns the buffer position of the previous beginning or
1511 end of an overlay, before @var{pos}. If there is none, it returns
1512 @code{(point-min)}.
1513 @end defun
1514
1515 Here's a function which uses @code{next-overlay-change} to search
1516 for the next character which gets a given property @code{prop} from
1517 either its overlays or its text properties (@pxref{Property Search}):
1518
1519 @smallexample
1520 (defun find-overlay-prop (prop)
1521 (save-excursion
1522 (while (and (not (eobp))
1523 (not (get-char-property (point) prop)))
1524 (goto-char (min (next-overlay-change (point))
1525 (next-single-property-change (point) prop))))
1526 (point)))
1527 @end smallexample
1528
1529 Now you can search for a @code{happy} property like this:
1530
1531 @smallexample
1532 (find-overlay-prop 'happy)
1533 @end smallexample
1534
1535 @node Width
1536 @section Width
1537
1538 Since not all characters have the same width, these functions let you
1539 check the width of a character. @xref{Primitive Indent}, and
1540 @ref{Screen Lines}, for related functions.
1541
1542 @defun char-width char
1543 This function returns the width in columns of the character @var{char},
1544 if it were displayed in the current buffer and the selected window.
1545 @end defun
1546
1547 @defun string-width string
1548 This function returns the width in columns of the string @var{string},
1549 if it were displayed in the current buffer and the selected window.
1550 @end defun
1551
1552 @defun truncate-string-to-width string width &optional start-column padding ellipsis
1553 This function returns the part of @var{string} that fits within
1554 @var{width} columns, as a new string.
1555
1556 If @var{string} does not reach @var{width}, then the result ends where
1557 @var{string} ends. If one multi-column character in @var{string}
1558 extends across the column @var{width}, that character is not included in
1559 the result. Thus, the result can fall short of @var{width} but cannot
1560 go beyond it.
1561
1562 The optional argument @var{start-column} specifies the starting column.
1563 If this is non-@code{nil}, then the first @var{start-column} columns of
1564 the string are omitted from the value. If one multi-column character in
1565 @var{string} extends across the column @var{start-column}, that
1566 character is not included.
1567
1568 The optional argument @var{padding}, if non-@code{nil}, is a padding
1569 character added at the beginning and end of the result string, to extend
1570 it to exactly @var{width} columns. The padding character is used at the
1571 end of the result if it falls short of @var{width}. It is also used at
1572 the beginning of the result if one multi-column character in
1573 @var{string} extends across the column @var{start-column}.
1574
1575 If @var{ellipsis} is non-@code{nil}, it should be a string which will
1576 replace the end of @var{str} (including any padding) if it extends
1577 beyond @var{end-column}, unless the display width of @var{str} is
1578 equal to or less than the display width of @var{ellipsis}. If
1579 @var{ellipsis} is non-@code{nil} and not a string, it stands for
1580 @code{"..."}.
1581
1582 @example
1583 (truncate-string-to-width "\tab\t" 12 4)
1584 @result{} "ab"
1585 (truncate-string-to-width "\tab\t" 12 4 ?\s)
1586 @result{} " ab "
1587 @end example
1588 @end defun
1589
1590 @node Line Height
1591 @section Line Height
1592 @cindex line height
1593
1594 The total height of each display line consists of the height of the
1595 contents of the line, plus optional additional vertical line spacing
1596 above or below the display line.
1597
1598 The height of the line contents is the maximum height of any
1599 character or image on that display line, including the final newline
1600 if there is one. (A display line that is continued doesn't include a
1601 final newline.) That is the default line height, if you do nothing to
1602 specify a greater height. (In the most common case, this equals the
1603 height of the default frame font.)
1604
1605 There are several ways to explicitly specify a larger line height,
1606 either by specifying an absolute height for the display line, or by
1607 specifying vertical space. However, no matter what you specify, the
1608 actual line height can never be less than the default.
1609
1610 @kindex line-height @r{(text property)}
1611 A newline can have a @code{line-height} text or overlay property
1612 that controls the total height of the display line ending in that
1613 newline.
1614
1615 If the property value is @code{t}, the newline character has no
1616 effect on the displayed height of the line---the visible contents
1617 alone determine the height. This is useful for tiling small images
1618 (or image slices) without adding blank areas between the images.
1619
1620 If the property value is a list of the form @code{(@var{height}
1621 @var{total})}, that adds extra space @emph{below} the display line.
1622 First Emacs uses @var{height} as a height spec to control extra space
1623 @emph{above} the line; then it adds enough space @emph{below} the line
1624 to bring the total line height up to @var{total}. In this case, the
1625 other ways to specify the line spacing are ignored.
1626
1627 Any other kind of property value is a height spec, which translates
1628 into a number---the specified line height. There are several ways to
1629 write a height spec; here's how each of them translates into a number:
1630
1631 @table @code
1632 @item @var{integer}
1633 If the height spec is a positive integer, the height value is that integer.
1634 @item @var{float}
1635 If the height spec is a float, @var{float}, the numeric height value
1636 is @var{float} times the frame's default line height.
1637 @item (@var{face} . @var{ratio})
1638 If the height spec is a cons of the format shown, the numeric height
1639 is @var{ratio} times the height of face @var{face}. @var{ratio} can
1640 be any type of number, or @code{nil} which means a ratio of 1.
1641 If @var{face} is @code{t}, it refers to the current face.
1642 @item (nil . @var{ratio})
1643 If the height spec is a cons of the format shown, the numeric height
1644 is @var{ratio} times the height of the contents of the line.
1645 @end table
1646
1647 Thus, any valid height spec determines the height in pixels, one way
1648 or another. If the line contents' height is less than that, Emacs
1649 adds extra vertical space above the line to achieve the specified
1650 total height.
1651
1652 If you don't specify the @code{line-height} property, the line's
1653 height consists of the contents' height plus the line spacing.
1654 There are several ways to specify the line spacing for different
1655 parts of Emacs text.
1656
1657 @vindex default-line-spacing
1658 You can specify the line spacing for all lines in a frame with the
1659 @code{line-spacing} frame parameter (@pxref{Layout Parameters}).
1660 However, if the variable @code{default-line-spacing} is
1661 non-@code{nil}, it overrides the frame's @code{line-spacing}
1662 parameter. An integer value specifies the number of pixels put below
1663 lines on graphical displays. A floating point number specifies the
1664 spacing relative to the frame's default line height.
1665
1666 @vindex line-spacing
1667 You can specify the line spacing for all lines in a buffer via the
1668 buffer-local @code{line-spacing} variable. An integer value specifies
1669 the number of pixels put below lines on graphical displays. A floating
1670 point number specifies the spacing relative to the default frame line
1671 height. This overrides line spacings specified for the frame.
1672
1673 @kindex line-spacing @r{(text property)}
1674 Finally, a newline can have a @code{line-spacing} text or overlay
1675 property that overrides the default frame line spacing and the buffer
1676 local @code{line-spacing} variable, for the display line ending in
1677 that newline.
1678
1679 One way or another, these mechanisms specify a Lisp value for the
1680 spacing of each line. The value is a height spec, and it translates
1681 into a Lisp value as described above. However, in this case the
1682 numeric height value specifies the line spacing, rather than the line
1683 height.
1684
1685 @node Faces
1686 @section Faces
1687 @cindex faces
1688
1689 A @dfn{face} is a named collection of graphical attributes: font
1690 family, foreground color, background color, optional underlining, and
1691 many others. Faces are used in Emacs to control the style of display of
1692 particular parts of the text or the frame. @xref{Standard Faces,,,
1693 emacs, The GNU Emacs Manual}, for the list of faces Emacs normally
1694 comes with.
1695
1696 @cindex face id
1697 Each face has its own @dfn{face number}, which distinguishes faces at
1698 low levels within Emacs. However, for most purposes, you refer to
1699 faces in Lisp programs by the symbols that name them.
1700
1701 @defun facep object
1702 This function returns @code{t} if @var{object} is a face name string
1703 or symbol (or if it is a vector of the kind used internally to record
1704 face data). It returns @code{nil} otherwise.
1705 @end defun
1706
1707 Each face name is meaningful for all frames, and by default it has the
1708 same meaning in all frames. But you can arrange to give a particular
1709 face name a special meaning in one frame if you wish.
1710
1711 @menu
1712 * Defining Faces:: How to define a face with @code{defface}.
1713 * Face Attributes:: What is in a face?
1714 * Attribute Functions:: Functions to examine and set face attributes.
1715 * Displaying Faces:: How Emacs combines the faces specified for a character.
1716 * Font Selection:: Finding the best available font for a face.
1717 * Face Functions:: How to define and examine faces.
1718 * Auto Faces:: Hook for automatic face assignment.
1719 * Font Lookup:: Looking up the names of available fonts
1720 and information about them.
1721 * Fontsets:: A fontset is a collection of fonts
1722 that handle a range of character sets.
1723 @end menu
1724
1725 @node Defining Faces
1726 @subsection Defining Faces
1727
1728 The way to define a new face is with @code{defface}. This creates a
1729 kind of customization item (@pxref{Customization}) which the user can
1730 customize using the Customization buffer (@pxref{Easy Customization,,,
1731 emacs, The GNU Emacs Manual}).
1732
1733 @defmac defface face spec doc [keyword value]@dots{}
1734 This declares @var{face} as a customizable face that defaults
1735 according to @var{spec}. You should not quote the symbol @var{face},
1736 and it should not end in @samp{-face} (that would be redundant). The
1737 argument @var{doc} specifies the face documentation. The keywords you
1738 can use in @code{defface} are the same as in @code{defgroup} and
1739 @code{defcustom} (@pxref{Common Keywords}).
1740
1741 When @code{defface} executes, it defines the face according to
1742 @var{spec}, then uses any customizations that were read from the
1743 init file (@pxref{Init File}) to override that specification.
1744
1745 The purpose of @var{spec} is to specify how the face should appear on
1746 different kinds of terminals. It should be an alist whose elements
1747 have the form @code{(@var{display} @var{atts})}. Each element's
1748 @sc{car}, @var{display}, specifies a class of terminals. (The first
1749 element, if its @sc{car} is @code{default}, is special---it specifies
1750 defaults for the remaining elements). The element's @sc{cadr},
1751 @var{atts}, is a list of face attributes and their values; it
1752 specifies what the face should look like on that kind of terminal.
1753 The possible attributes are defined in the value of
1754 @code{custom-face-attributes}.
1755
1756 The @var{display} part of an element of @var{spec} determines which
1757 frames the element matches. If more than one element of @var{spec}
1758 matches a given frame, the first element that matches is the one used
1759 for that frame. There are three possibilities for @var{display}:
1760
1761 @table @asis
1762 @item @code{default}
1763 This element of @var{spec} doesn't match any frames; instead, it
1764 specifies defaults that apply to all frames. This kind of element, if
1765 used, must be the first element of @var{spec}. Each of the following
1766 elements can override any or all of these defaults.
1767
1768 @item @code{t}
1769 This element of @var{spec} matches all frames. Therefore, any
1770 subsequent elements of @var{spec} are never used. Normally
1771 @code{t} is used in the last (or only) element of @var{spec}.
1772
1773 @item a list
1774 If @var{display} is a list, each element should have the form
1775 @code{(@var{characteristic} @var{value}@dots{})}. Here
1776 @var{characteristic} specifies a way of classifying frames, and the
1777 @var{value}s are possible classifications which @var{display} should
1778 apply to. Here are the possible values of @var{characteristic}:
1779
1780 @table @code
1781 @item type
1782 The kind of window system the frame uses---either @code{graphic} (any
1783 graphics-capable display), @code{x}, @code{pc} (for the MS-DOS console),
1784 @code{w32} (for MS Windows 9X/NT/2K/XP), @code{mac} (for the Macintosh
1785 display), or @code{tty} (a non-graphics-capable display).
1786 @xref{Window Systems, window-system}.
1787
1788 @item class
1789 What kinds of colors the frame supports---either @code{color},
1790 @code{grayscale}, or @code{mono}.
1791
1792 @item background
1793 The kind of background---either @code{light} or @code{dark}.
1794
1795 @item min-colors
1796 An integer that represents the minimum number of colors the frame
1797 should support. This matches a frame if its
1798 @code{display-color-cells} value is at least the specified integer.
1799
1800 @item supports
1801 Whether or not the frame can display the face attributes given in
1802 @var{value}@dots{} (@pxref{Face Attributes}). See the documentation
1803 for the function @code{display-supports-face-attributes-p} for more
1804 information on exactly how this testing is done. @xref{Display Face
1805 Attribute Testing}.
1806 @end table
1807
1808 If an element of @var{display} specifies more than one @var{value} for a
1809 given @var{characteristic}, any of those values is acceptable. If
1810 @var{display} has more than one element, each element should specify a
1811 different @var{characteristic}; then @emph{each} characteristic of the
1812 frame must match one of the @var{value}s specified for it in
1813 @var{display}.
1814 @end table
1815 @end defmac
1816
1817 Here's how the standard face @code{region} is defined:
1818
1819 @example
1820 @group
1821 '((((class color) (min-colors 88) (background dark))
1822 :background "blue3")
1823 @end group
1824 (((class color) (min-colors 88) (background light))
1825 :background "lightgoldenrod2")
1826 (((class color) (min-colors 16) (background dark))
1827 :background "blue3")
1828 (((class color) (min-colors 16) (background light))
1829 :background "lightgoldenrod2")
1830 (((class color) (min-colors 8))
1831 :background "blue" :foreground "white")
1832 (((type tty) (class mono))
1833 :inverse-video t)
1834 (t :background "gray"))
1835 @group
1836 "Basic face for highlighting the region."
1837 :group 'basic-faces)
1838 @end group
1839 @end example
1840
1841 Internally, @code{defface} uses the symbol property
1842 @code{face-defface-spec} to record the face attributes specified in
1843 @code{defface}, @code{saved-face} for the attributes saved by the user
1844 with the customization buffer, @code{customized-face} for the
1845 attributes customized by the user for the current session, but not
1846 saved, and @code{face-documentation} for the documentation string.
1847
1848 @defopt frame-background-mode
1849 This option, if non-@code{nil}, specifies the background type to use for
1850 interpreting face definitions. If it is @code{dark}, then Emacs treats
1851 all frames as if they had a dark background, regardless of their actual
1852 background colors. If it is @code{light}, then Emacs treats all frames
1853 as if they had a light background.
1854 @end defopt
1855
1856 @node Face Attributes
1857 @subsection Face Attributes
1858 @cindex face attributes
1859
1860 The effect of using a face is determined by a fixed set of @dfn{face
1861 attributes}. This table lists all the face attributes, and what they
1862 mean. You can specify more than one face for a given piece of text;
1863 Emacs merges the attributes of all the faces to determine how to
1864 display the text. @xref{Displaying Faces}.
1865
1866 Any attribute in a face can have the value @code{unspecified}. This
1867 means the face doesn't specify that attribute. In face merging, when
1868 the first face fails to specify a particular attribute, that means the
1869 next face gets a chance. However, the @code{default} face must
1870 specify all attributes.
1871
1872 Some of these font attributes are meaningful only on certain kinds of
1873 displays---if your display cannot handle a certain attribute, the
1874 attribute is ignored. (The attributes @code{:family}, @code{:width},
1875 @code{:height}, @code{:weight}, and @code{:slant} correspond to parts of
1876 an X Logical Font Descriptor.)
1877
1878 @table @code
1879 @item :family
1880 Font family name, or fontset name (@pxref{Fontsets}). If you specify a
1881 font family name, the wild-card characters @samp{*} and @samp{?} are
1882 allowed.
1883
1884 @item :width
1885 Relative proportionate width, also known as the character set width or
1886 set width. This should be one of the symbols @code{ultra-condensed},
1887 @code{extra-condensed}, @code{condensed}, @code{semi-condensed},
1888 @code{normal}, @code{semi-expanded}, @code{expanded},
1889 @code{extra-expanded}, or @code{ultra-expanded}.
1890
1891 @item :height
1892 Either the font height, an integer in units of 1/10 point, a floating
1893 point number specifying the amount by which to scale the height of any
1894 underlying face, or a function, which is called with the old height
1895 (from the underlying face), and should return the new height.
1896
1897 @item :weight
1898 Font weight---a symbol from this series (from most dense to most faint):
1899 @code{ultra-bold}, @code{extra-bold}, @code{bold}, @code{semi-bold},
1900 @code{normal}, @code{semi-light}, @code{light}, @code{extra-light},
1901 or @code{ultra-light}.
1902
1903 On a text-only terminal, any weight greater than normal is displayed as
1904 extra bright, and any weight less than normal is displayed as
1905 half-bright (provided the terminal supports the feature).
1906
1907 @item :slant
1908 Font slant---one of the symbols @code{italic}, @code{oblique}, @code{normal},
1909 @code{reverse-italic}, or @code{reverse-oblique}.
1910
1911 On a text-only terminal, slanted text is displayed as half-bright, if
1912 the terminal supports the feature.
1913
1914 @item :foreground
1915 Foreground color, a string. The value can be a system-defined color
1916 name, or a hexadecimal color specification of the form
1917 @samp{#@var{rr}@var{gg}@var{bb}}. (@samp{#000000} is black,
1918 @samp{#ff0000} is red, @samp{#00ff00} is green, @samp{#0000ff} is
1919 blue, and @samp{#ffffff} is white.)
1920
1921 @item :background
1922 Background color, a string, like the foreground color.
1923
1924 @item :inverse-video
1925 Whether or not characters should be displayed in inverse video. The
1926 value should be @code{t} (yes) or @code{nil} (no).
1927
1928 @item :stipple
1929 The background stipple, a bitmap.
1930
1931 The value can be a string; that should be the name of a file containing
1932 external-format X bitmap data. The file is found in the directories
1933 listed in the variable @code{x-bitmap-file-path}.
1934
1935 Alternatively, the value can specify the bitmap directly, with a list
1936 of the form @code{(@var{width} @var{height} @var{data})}. Here,
1937 @var{width} and @var{height} specify the size in pixels, and
1938 @var{data} is a string containing the raw bits of the bitmap, row by
1939 row. Each row occupies @math{(@var{width} + 7) / 8} consecutive bytes
1940 in the string (which should be a unibyte string for best results).
1941 This means that each row always occupies at least one whole byte.
1942
1943 If the value is @code{nil}, that means use no stipple pattern.
1944
1945 Normally you do not need to set the stipple attribute, because it is
1946 used automatically to handle certain shades of gray.
1947
1948 @item :underline
1949 Whether or not characters should be underlined, and in what color. If
1950 the value is @code{t}, underlining uses the foreground color of the
1951 face. If the value is a string, underlining uses that color. The
1952 value @code{nil} means do not underline.
1953
1954 @item :overline
1955 Whether or not characters should be overlined, and in what color.
1956 The value is used like that of @code{:underline}.
1957
1958 @item :strike-through
1959 Whether or not characters should be strike-through, and in what
1960 color. The value is used like that of @code{:underline}.
1961
1962 @item :inherit
1963 The name of a face from which to inherit attributes, or a list of face
1964 names. Attributes from inherited faces are merged into the face like an
1965 underlying face would be, with higher priority than underlying faces.
1966 If a list of faces is used, attributes from faces earlier in the list
1967 override those from later faces.
1968
1969 @item :box
1970 Whether or not a box should be drawn around characters, its color, the
1971 width of the box lines, and 3D appearance.
1972 @end table
1973
1974 Here are the possible values of the @code{:box} attribute, and what
1975 they mean:
1976
1977 @table @asis
1978 @item @code{nil}
1979 Don't draw a box.
1980
1981 @item @code{t}
1982 Draw a box with lines of width 1, in the foreground color.
1983
1984 @item @var{color}
1985 Draw a box with lines of width 1, in color @var{color}.
1986
1987 @item @code{(:line-width @var{width} :color @var{color} :style @var{style})}
1988 This way you can explicitly specify all aspects of the box. The value
1989 @var{width} specifies the width of the lines to draw; it defaults to 1.
1990
1991 The value @var{color} specifies the color to draw with. The default is
1992 the foreground color of the face for simple boxes, and the background
1993 color of the face for 3D boxes.
1994
1995 The value @var{style} specifies whether to draw a 3D box. If it is
1996 @code{released-button}, the box looks like a 3D button that is not being
1997 pressed. If it is @code{pressed-button}, the box looks like a 3D button
1998 that is being pressed. If it is @code{nil} or omitted, a plain 2D box
1999 is used.
2000 @end table
2001
2002 In older versions of Emacs, before @code{:family}, @code{:height},
2003 @code{:width}, @code{:weight}, and @code{:slant} existed, these
2004 attributes were used to specify the type face. They are now
2005 semi-obsolete, but they still work:
2006
2007 @table @code
2008 @item :font
2009 This attribute specifies the font name.
2010
2011 @item :bold
2012 A non-@code{nil} value specifies a bold font.
2013
2014 @item :italic
2015 A non-@code{nil} value specifies an italic font.
2016 @end table
2017
2018 For compatibility, you can still set these ``attributes,'' even
2019 though they are not real face attributes. Here is what that does:
2020
2021 @table @code
2022 @item :font
2023 You can specify an X font name as the ``value'' of this ``attribute'';
2024 that sets the @code{:family}, @code{:width}, @code{:height},
2025 @code{:weight}, and @code{:slant} attributes according to the font name.
2026
2027 If the value is a pattern with wildcards, the first font that matches
2028 the pattern is used to set these attributes.
2029
2030 @item :bold
2031 A non-@code{nil} makes the face bold; @code{nil} makes it normal.
2032 This actually works by setting the @code{:weight} attribute.
2033
2034 @item :italic
2035 A non-@code{nil} makes the face italic; @code{nil} makes it normal.
2036 This actually works by setting the @code{:slant} attribute.
2037 @end table
2038
2039 @defvar x-bitmap-file-path
2040 This variable specifies a list of directories for searching
2041 for bitmap files, for the @code{:stipple} attribute.
2042 @end defvar
2043
2044 @defun bitmap-spec-p object
2045 This returns @code{t} if @var{object} is a valid bitmap specification,
2046 suitable for use with @code{:stipple} (see above). It returns
2047 @code{nil} otherwise.
2048 @end defun
2049
2050 @node Attribute Functions
2051 @subsection Face Attribute Functions
2052
2053 This section describes the functions for accessing and modifying the
2054 attributes of an existing face.
2055
2056 @defun set-face-attribute face frame &rest arguments
2057 This function sets one or more attributes of face @var{face} for frame
2058 @var{frame}. The attributes you specify this way override whatever
2059 the @code{defface} says.
2060
2061 The extra arguments @var{arguments} specify the attributes to set, and
2062 the values for them. They should consist of alternating attribute names
2063 (such as @code{:family} or @code{:underline}) and corresponding values.
2064 Thus,
2065
2066 @example
2067 (set-face-attribute 'foo nil
2068 :width 'extended
2069 :weight 'bold
2070 :underline "red")
2071 @end example
2072
2073 @noindent
2074 sets the attributes @code{:width}, @code{:weight} and @code{:underline}
2075 to the corresponding values.
2076
2077 If @var{frame} is @code{t}, this function sets the default attributes
2078 for new frames. Default attribute values specified this way override
2079 the @code{defface} for newly created frames.
2080
2081 If @var{frame} is @code{nil}, this function sets the attributes for
2082 all existing frames, and the default for new frames.
2083 @end defun
2084
2085 @defun face-attribute face attribute &optional frame inherit
2086 This returns the value of the @var{attribute} attribute of face
2087 @var{face} on @var{frame}. If @var{frame} is @code{nil},
2088 that means the selected frame (@pxref{Input Focus}).
2089
2090 If @var{frame} is @code{t}, this returns whatever new-frames default
2091 value you previously specified with @code{set-face-attribute} for the
2092 @var{attribute} attribute of @var{face}. If you have not specified
2093 one, it returns @code{nil}.
2094
2095 If @var{inherit} is @code{nil}, only attributes directly defined by
2096 @var{face} are considered, so the return value may be
2097 @code{unspecified}, or a relative value. If @var{inherit} is
2098 non-@code{nil}, @var{face}'s definition of @var{attribute} is merged
2099 with the faces specified by its @code{:inherit} attribute; however the
2100 return value may still be @code{unspecified} or relative. If
2101 @var{inherit} is a face or a list of faces, then the result is further
2102 merged with that face (or faces), until it becomes specified and
2103 absolute.
2104
2105 To ensure that the return value is always specified and absolute, use
2106 a value of @code{default} for @var{inherit}; this will resolve any
2107 unspecified or relative values by merging with the @code{default} face
2108 (which is always completely specified).
2109
2110 For example,
2111
2112 @example
2113 (face-attribute 'bold :weight)
2114 @result{} bold
2115 @end example
2116 @end defun
2117
2118 @defun face-attribute-relative-p attribute value
2119 This function returns non-@code{nil} if @var{value}, when used as the
2120 value of the face attribute @var{attribute}, is relative. This means
2121 it would modify, rather than completely override, any value that comes
2122 from a subsequent face in the face list or that is inherited from
2123 another face.
2124
2125 @code{unspecified} is a relative value for all attributes.
2126 For @code{:height}, floating point values are also relative.
2127
2128 For example:
2129
2130 @example
2131 (read-face-name "Describe face" "= `default' face" t)
2132 @end example
2133
2134 prompts with @samp{Describe face (default = `default' face): }.
2135 @end defun
2136
2137 @defun merge-face-attribute attribute value1 value2
2138 If @var{value1} is a relative value for the face attribute
2139 @var{attribute}, returns it merged with the underlying value
2140 @var{value2}; otherwise, if @var{value1} is an absolute value for the
2141 face attribute @var{attribute}, returns @var{value1} unchanged.
2142 @end defun
2143
2144 The functions above did not exist before Emacs 21. For compatibility
2145 with older Emacs versions, you can use the following functions to set
2146 and examine the face attributes which existed in those versions.
2147 They use values of @code{t} and @code{nil} for @var{frame}
2148 just like @code{set-face-attribute} and @code{face-attribute}.
2149
2150 @defun set-face-foreground face color &optional frame
2151 @defunx set-face-background face color &optional frame
2152 These functions set the foreground (or background, respectively) color
2153 of face @var{face} to @var{color}. The argument @var{color} should be a
2154 string, the name of a color.
2155
2156 Certain shades of gray are implemented by stipple patterns on
2157 black-and-white screens.
2158 @end defun
2159
2160 @defun set-face-stipple face pattern &optional frame
2161 This function sets the background stipple pattern of face @var{face}
2162 to @var{pattern}. The argument @var{pattern} should be the name of a
2163 stipple pattern defined by the X server, or actual bitmap data
2164 (@pxref{Face Attributes}), or @code{nil} meaning don't use stipple.
2165
2166 Normally there is no need to pay attention to stipple patterns, because
2167 they are used automatically to handle certain shades of gray.
2168 @end defun
2169
2170 @defun set-face-font face font &optional frame
2171 This function sets the font of face @var{face}. This actually sets
2172 the attributes @code{:family}, @code{:width}, @code{:height},
2173 @code{:weight}, and @code{:slant} according to the font name
2174 @var{font}.
2175 @end defun
2176
2177 @defun set-face-bold-p face bold-p &optional frame
2178 This function specifies whether @var{face} should be bold. If
2179 @var{bold-p} is non-@code{nil}, that means yes; @code{nil} means no.
2180 This actually sets the @code{:weight} attribute.
2181 @end defun
2182
2183 @defun set-face-italic-p face italic-p &optional frame
2184 This function specifies whether @var{face} should be italic. If
2185 @var{italic-p} is non-@code{nil}, that means yes; @code{nil} means no.
2186 This actually sets the @code{:slant} attribute.
2187 @end defun
2188
2189 @defun set-face-underline-p face underline-p &optional frame
2190 This function sets the underline attribute of face @var{face}.
2191 Non-@code{nil} means do underline; @code{nil} means don't.
2192 @end defun
2193
2194 @defun set-face-inverse-video-p face inverse-video-p &optional frame
2195 This function sets the @code{:inverse-video} attribute of face
2196 @var{face}.
2197 @end defun
2198
2199 @defun invert-face face &optional frame
2200 This function swaps the foreground and background colors of face
2201 @var{face}.
2202 @end defun
2203
2204 These functions examine the attributes of a face. If you don't
2205 specify @var{frame}, they refer to the selected frame; @code{t} refers
2206 to the default data for new frames. They return the symbol
2207 @code{unspecified} if the face doesn't define any value for that
2208 attribute.
2209
2210 @defun face-foreground face &optional frame inherit
2211 @defunx face-background face &optional frame inherit
2212 These functions return the foreground color (or background color,
2213 respectively) of face @var{face}, as a string.
2214
2215 If @var{inherit} is @code{nil}, only a color directly defined by the face is
2216 returned. If @var{inherit} is non-@code{nil}, any faces specified by its
2217 @code{:inherit} attribute are considered as well, and if @var{inherit}
2218 is a face or a list of faces, then they are also considered, until a
2219 specified color is found. To ensure that the return value is always
2220 specified, use a value of @code{default} for @var{inherit}.
2221 @end defun
2222
2223 @defun face-stipple face &optional frame inherit
2224 This function returns the name of the background stipple pattern of face
2225 @var{face}, or @code{nil} if it doesn't have one.
2226
2227 If @var{inherit} is @code{nil}, only a stipple directly defined by the
2228 face is returned. If @var{inherit} is non-@code{nil}, any faces
2229 specified by its @code{:inherit} attribute are considered as well, and
2230 if @var{inherit} is a face or a list of faces, then they are also
2231 considered, until a specified stipple is found. To ensure that the
2232 return value is always specified, use a value of @code{default} for
2233 @var{inherit}.
2234 @end defun
2235
2236 @defun face-font face &optional frame
2237 This function returns the name of the font of face @var{face}.
2238 @end defun
2239
2240 @defun face-bold-p face &optional frame
2241 This function returns @code{t} if @var{face} is bold---that is, if it is
2242 bolder than normal. It returns @code{nil} otherwise.
2243 @end defun
2244
2245 @defun face-italic-p face &optional frame
2246 This function returns @code{t} if @var{face} is italic or oblique,
2247 @code{nil} otherwise.
2248 @end defun
2249
2250 @defun face-underline-p face &optional frame
2251 This function returns the @code{:underline} attribute of face @var{face}.
2252 @end defun
2253
2254 @defun face-inverse-video-p face &optional frame
2255 This function returns the @code{:inverse-video} attribute of face @var{face}.
2256 @end defun
2257
2258 @node Displaying Faces
2259 @subsection Displaying Faces
2260
2261 Here are the ways to specify which faces to use for display of text:
2262
2263 @itemize @bullet
2264 @item
2265 With defaults. The @code{default} face is used as the ultimate
2266 default for all text. (In Emacs 19 and 20, the @code{default}
2267 face is used only when no other face is specified.)
2268
2269 @item
2270 For a mode line or header line, the face @code{mode-line} or
2271 @code{mode-line-inactive}, or @code{header-line}, is merged in just
2272 before @code{default}.
2273
2274 @item
2275 With text properties. A character can have a @code{face} property; if
2276 so, the faces and face attributes specified there apply. @xref{Special
2277 Properties}.
2278
2279 If the character has a @code{mouse-face} property, that is used instead
2280 of the @code{face} property when the mouse is ``near enough'' to the
2281 character.
2282
2283 @item
2284 With overlays. An overlay can have @code{face} and @code{mouse-face}
2285 properties too; they apply to all the text covered by the overlay.
2286
2287 @item
2288 With a region that is active. In Transient Mark mode, the region is
2289 highlighted with the face @code{region} (@pxref{Standard Faces,,,
2290 emacs, The GNU Emacs Manual}).
2291
2292 @item
2293 With special glyphs. Each glyph can specify a particular face
2294 number. @xref{Glyphs}.
2295 @end itemize
2296
2297 If these various sources together specify more than one face for a
2298 particular character, Emacs merges the attributes of the various faces
2299 specified. For each attribute, Emacs tries first the face of any
2300 special glyph; then the face for region highlighting, if appropriate;
2301 then the faces specified by overlays, followed by those specified by
2302 text properties, then the @code{mode-line} or
2303 @code{mode-line-inactive} or @code{header-line} face (if in a mode
2304 line or a header line), and last the @code{default} face.
2305
2306 When multiple overlays cover one character, an overlay with higher
2307 priority overrides those with lower priority. @xref{Overlays}.
2308
2309 @node Font Selection
2310 @subsection Font Selection
2311
2312 @dfn{Selecting a font} means mapping the specified face attributes for
2313 a character to a font that is available on a particular display. The
2314 face attributes, as determined by face merging, specify most of the
2315 font choice, but not all. Part of the choice depends on what character
2316 it is.
2317
2318 If the face specifies a fontset name, that fontset determines a
2319 pattern for fonts of the given charset. If the face specifies a font
2320 family, a font pattern is constructed.
2321
2322 Emacs tries to find an available font for the given face attributes
2323 and character's registry and encoding. If there is a font that matches
2324 exactly, it is used, of course. The hard case is when no available font
2325 exactly fits the specification. Then Emacs looks for one that is
2326 ``close''---one attribute at a time. You can specify the order to
2327 consider the attributes. In the case where a specified font family is
2328 not available, you can specify a set of mappings for alternatives to
2329 try.
2330
2331 @defvar face-font-selection-order
2332 This variable specifies the order of importance of the face attributes
2333 @code{:width}, @code{:height}, @code{:weight}, and @code{:slant}. The
2334 value should be a list containing those four symbols, in order of
2335 decreasing importance.
2336
2337 Font selection first finds the best available matches for the first
2338 attribute listed; then, among the fonts which are best in that way, it
2339 searches for the best matches in the second attribute, and so on.
2340
2341 The attributes @code{:weight} and @code{:width} have symbolic values in
2342 a range centered around @code{normal}. Matches that are more extreme
2343 (farther from @code{normal}) are somewhat preferred to matches that are
2344 less extreme (closer to @code{normal}); this is designed to ensure that
2345 non-normal faces contrast with normal ones, whenever possible.
2346
2347 The default is @code{(:width :height :weight :slant)}, which means first
2348 find the fonts closest to the specified @code{:width}, then---among the
2349 fonts with that width---find a best match for the specified font height,
2350 and so on.
2351
2352 One example of a case where this variable makes a difference is when the
2353 default font has no italic equivalent. With the default ordering, the
2354 @code{italic} face will use a non-italic font that is similar to the
2355 default one. But if you put @code{:slant} before @code{:height}, the
2356 @code{italic} face will use an italic font, even if its height is not
2357 quite right.
2358 @end defvar
2359
2360 @defvar face-font-family-alternatives
2361 This variable lets you specify alternative font families to try, if a
2362 given family is specified and doesn't exist. Each element should have
2363 this form:
2364
2365 @example
2366 (@var{family} @var{alternate-families}@dots{})
2367 @end example
2368
2369 If @var{family} is specified but not available, Emacs will try the other
2370 families given in @var{alternate-families}, one by one, until it finds a
2371 family that does exist.
2372 @end defvar
2373
2374 @defvar face-font-registry-alternatives
2375 This variable lets you specify alternative font registries to try, if a
2376 given registry is specified and doesn't exist. Each element should have
2377 this form:
2378
2379 @example
2380 (@var{registry} @var{alternate-registries}@dots{})
2381 @end example
2382
2383 If @var{registry} is specified but not available, Emacs will try the
2384 other registries given in @var{alternate-registries}, one by one,
2385 until it finds a registry that does exist.
2386 @end defvar
2387
2388 Emacs can make use of scalable fonts, but by default it does not use
2389 them, since the use of too many or too big scalable fonts can crash
2390 XFree86 servers.
2391
2392 @defvar scalable-fonts-allowed
2393 This variable controls which scalable fonts to use. A value of
2394 @code{nil}, the default, means do not use scalable fonts. @code{t}
2395 means to use any scalable font that seems appropriate for the text.
2396
2397 Otherwise, the value must be a list of regular expressions. Then a
2398 scalable font is enabled for use if its name matches any regular
2399 expression in the list. For example,
2400
2401 @example
2402 (setq scalable-fonts-allowed '("muleindian-2$"))
2403 @end example
2404
2405 @noindent
2406 allows the use of scalable fonts with registry @code{muleindian-2}.
2407 @end defvar
2408
2409 @defvar face-font-rescale-alist
2410 This variable specifies scaling for certain faces. Its value should
2411 be a list of elements of the form
2412
2413 @example
2414 (@var{fontname-regexp} . @var{scale-factor})
2415 @end example
2416
2417 If @var{fontname-regexp} matches the font name that is about to be
2418 used, this says to choose a larger similar font according to the
2419 factor @var{scale-factor}. You would use this feature to normalize
2420 the font size if certain fonts are bigger or smaller than their
2421 nominal heights and widths would suggest.
2422 @end defvar
2423
2424 @node Face Functions
2425 @subsection Functions for Working with Faces
2426
2427 Here are additional functions for creating and working with faces.
2428
2429 @defun make-face name
2430 This function defines a new face named @var{name}, initially with all
2431 attributes @code{nil}. It does nothing if there is already a face named
2432 @var{name}.
2433 @end defun
2434
2435 @defun face-list
2436 This function returns a list of all defined face names.
2437 @end defun
2438
2439 @defun copy-face old-face new-name &optional frame new-frame
2440 This function defines a face named @var{new-name} as a copy of the existing
2441 face named @var{old-face}. It creates the face @var{new-name} if that
2442 doesn't already exist.
2443
2444 If the optional argument @var{frame} is given, this function applies
2445 only to that frame. Otherwise it applies to each frame individually,
2446 copying attributes from @var{old-face} in each frame to @var{new-face}
2447 in the same frame.
2448
2449 If the optional argument @var{new-frame} is given, then @code{copy-face}
2450 copies the attributes of @var{old-face} in @var{frame} to @var{new-name}
2451 in @var{new-frame}.
2452 @end defun
2453
2454 @defun face-id face
2455 This function returns the face number of face @var{face}.
2456 @end defun
2457
2458 @defun face-documentation face
2459 This function returns the documentation string of face @var{face}, or
2460 @code{nil} if none was specified for it.
2461 @end defun
2462
2463 @defun face-equal face1 face2 &optional frame
2464 This returns @code{t} if the faces @var{face1} and @var{face2} have the
2465 same attributes for display.
2466 @end defun
2467
2468 @defun face-differs-from-default-p face &optional frame
2469 This returns non-@code{nil} if the face @var{face} displays
2470 differently from the default face.
2471 @end defun
2472
2473 @cindex face alias
2474 A @dfn{face alias} provides an equivalent name for a face. You can
2475 define a face alias by giving the alias symbol the @code{face-alias}
2476 property, with a value of the target face name. The following example
2477 makes @code{modeline} an alias for the @code{mode-line} face.
2478
2479 @example
2480 (put 'modeline 'face-alias 'mode-line)
2481 @end example
2482
2483
2484 @node Auto Faces
2485 @subsection Automatic Face Assignment
2486 @cindex automatic face assignment
2487 @cindex faces, automatic choice
2488
2489 @cindex Font-Lock mode
2490 This hook is used for automatically assigning faces to text in the
2491 buffer. It is part of the implementation of Font-Lock mode.
2492
2493 @defvar fontification-functions
2494 This variable holds a list of functions that are called by Emacs
2495 redisplay as needed to assign faces automatically to text in the buffer.
2496
2497 The functions are called in the order listed, with one argument, a
2498 buffer position @var{pos}. Each function should attempt to assign faces
2499 to the text in the current buffer starting at @var{pos}.
2500
2501 Each function should record the faces they assign by setting the
2502 @code{face} property. It should also add a non-@code{nil}
2503 @code{fontified} property for all the text it has assigned faces to.
2504 That property tells redisplay that faces have been assigned to that text
2505 already.
2506
2507 It is probably a good idea for each function to do nothing if the
2508 character after @var{pos} already has a non-@code{nil} @code{fontified}
2509 property, but this is not required. If one function overrides the
2510 assignments made by a previous one, the properties as they are
2511 after the last function finishes are the ones that really matter.
2512
2513 For efficiency, we recommend writing these functions so that they
2514 usually assign faces to around 400 to 600 characters at each call.
2515 @end defvar
2516
2517 @node Font Lookup
2518 @subsection Looking Up Fonts
2519
2520 @defun x-list-fonts pattern &optional face frame maximum
2521 This function returns a list of available font names that match
2522 @var{pattern}. If the optional arguments @var{face} and @var{frame} are
2523 specified, then the list is limited to fonts that are the same size as
2524 @var{face} currently is on @var{frame}.
2525
2526 The argument @var{pattern} should be a string, perhaps with wildcard
2527 characters: the @samp{*} character matches any substring, and the
2528 @samp{?} character matches any single character. Pattern matching
2529 of font names ignores case.
2530
2531 If you specify @var{face} and @var{frame}, @var{face} should be a face name
2532 (a symbol) and @var{frame} should be a frame.
2533
2534 The optional argument @var{maximum} sets a limit on how many fonts to
2535 return. If this is non-@code{nil}, then the return value is truncated
2536 after the first @var{maximum} matching fonts. Specifying a small value
2537 for @var{maximum} can make this function much faster, in cases where
2538 many fonts match the pattern.
2539 @end defun
2540
2541 @defun x-family-fonts &optional family frame
2542 This function returns a list describing the available fonts for family
2543 @var{family} on @var{frame}. If @var{family} is omitted or @code{nil},
2544 this list applies to all families, and therefore, it contains all
2545 available fonts. Otherwise, @var{family} must be a string; it may
2546 contain the wildcards @samp{?} and @samp{*}.
2547
2548 The list describes the display that @var{frame} is on; if @var{frame} is
2549 omitted or @code{nil}, it applies to the selected frame's display
2550 (@pxref{Input Focus}).
2551
2552 The list contains a vector of the following form for each font:
2553
2554 @example
2555 [@var{family} @var{width} @var{point-size} @var{weight} @var{slant}
2556 @var{fixed-p} @var{full} @var{registry-and-encoding}]
2557 @end example
2558
2559 The first five elements correspond to face attributes; if you
2560 specify these attributes for a face, it will use this font.
2561
2562 The last three elements give additional information about the font.
2563 @var{fixed-p} is non-@code{nil} if the font is fixed-pitch.
2564 @var{full} is the full name of the font, and
2565 @var{registry-and-encoding} is a string giving the registry and
2566 encoding of the font.
2567
2568 The result list is sorted according to the current face font sort order.
2569 @end defun
2570
2571 @defun x-font-family-list &optional frame
2572 This function returns a list of the font families available for
2573 @var{frame}'s display. If @var{frame} is omitted or @code{nil}, it
2574 describes the selected frame's display (@pxref{Input Focus}).
2575
2576 The value is a list of elements of this form:
2577
2578 @example
2579 (@var{family} . @var{fixed-p})
2580 @end example
2581
2582 @noindent
2583 Here @var{family} is a font family, and @var{fixed-p} is
2584 non-@code{nil} if fonts of that family are fixed-pitch.
2585 @end defun
2586
2587 @defvar font-list-limit
2588 This variable specifies maximum number of fonts to consider in font
2589 matching. The function @code{x-family-fonts} will not return more than
2590 that many fonts, and font selection will consider only that many fonts
2591 when searching a matching font for face attributes. The default is
2592 currently 100.
2593 @end defvar
2594
2595 @node Fontsets
2596 @subsection Fontsets
2597
2598 A @dfn{fontset} is a list of fonts, each assigned to a range of
2599 character codes. An individual font cannot display the whole range of
2600 characters that Emacs supports, but a fontset can. Fontsets have names,
2601 just as fonts do, and you can use a fontset name in place of a font name
2602 when you specify the ``font'' for a frame or a face. Here is
2603 information about defining a fontset under Lisp program control.
2604
2605 @defun create-fontset-from-fontset-spec fontset-spec &optional style-variant-p noerror
2606 This function defines a new fontset according to the specification
2607 string @var{fontset-spec}. The string should have this format:
2608
2609 @smallexample
2610 @var{fontpattern}, @r{[}@var{charsetname}:@var{fontname}@r{]@dots{}}
2611 @end smallexample
2612
2613 @noindent
2614 Whitespace characters before and after the commas are ignored.
2615
2616 The first part of the string, @var{fontpattern}, should have the form of
2617 a standard X font name, except that the last two fields should be
2618 @samp{fontset-@var{alias}}.
2619
2620 The new fontset has two names, one long and one short. The long name is
2621 @var{fontpattern} in its entirety. The short name is
2622 @samp{fontset-@var{alias}}. You can refer to the fontset by either
2623 name. If a fontset with the same name already exists, an error is
2624 signaled, unless @var{noerror} is non-@code{nil}, in which case this
2625 function does nothing.
2626
2627 If optional argument @var{style-variant-p} is non-@code{nil}, that says
2628 to create bold, italic and bold-italic variants of the fontset as well.
2629 These variant fontsets do not have a short name, only a long one, which
2630 is made by altering @var{fontpattern} to indicate the bold or italic
2631 status.
2632
2633 The specification string also says which fonts to use in the fontset.
2634 See below for the details.
2635 @end defun
2636
2637 The construct @samp{@var{charset}:@var{font}} specifies which font to
2638 use (in this fontset) for one particular character set. Here,
2639 @var{charset} is the name of a character set, and @var{font} is the font
2640 to use for that character set. You can use this construct any number of
2641 times in the specification string.
2642
2643 For the remaining character sets, those that you don't specify
2644 explicitly, Emacs chooses a font based on @var{fontpattern}: it replaces
2645 @samp{fontset-@var{alias}} with a value that names one character set.
2646 For the @acronym{ASCII} character set, @samp{fontset-@var{alias}} is replaced
2647 with @samp{ISO8859-1}.
2648
2649 In addition, when several consecutive fields are wildcards, Emacs
2650 collapses them into a single wildcard. This is to prevent use of
2651 auto-scaled fonts. Fonts made by scaling larger fonts are not usable
2652 for editing, and scaling a smaller font is not useful because it is
2653 better to use the smaller font in its own size, which Emacs does.
2654
2655 Thus if @var{fontpattern} is this,
2656
2657 @example
2658 -*-fixed-medium-r-normal-*-24-*-*-*-*-*-fontset-24
2659 @end example
2660
2661 @noindent
2662 the font specification for @acronym{ASCII} characters would be this:
2663
2664 @example
2665 -*-fixed-medium-r-normal-*-24-*-ISO8859-1
2666 @end example
2667
2668 @noindent
2669 and the font specification for Chinese GB2312 characters would be this:
2670
2671 @example
2672 -*-fixed-medium-r-normal-*-24-*-gb2312*-*
2673 @end example
2674
2675 You may not have any Chinese font matching the above font
2676 specification. Most X distributions include only Chinese fonts that
2677 have @samp{song ti} or @samp{fangsong ti} in the @var{family} field. In
2678 such a case, @samp{Fontset-@var{n}} can be specified as below:
2679
2680 @smallexample
2681 Emacs.Fontset-0: -*-fixed-medium-r-normal-*-24-*-*-*-*-*-fontset-24,\
2682 chinese-gb2312:-*-*-medium-r-normal-*-24-*-gb2312*-*
2683 @end smallexample
2684
2685 @noindent
2686 Then, the font specifications for all but Chinese GB2312 characters have
2687 @samp{fixed} in the @var{family} field, and the font specification for
2688 Chinese GB2312 characters has a wild card @samp{*} in the @var{family}
2689 field.
2690
2691 @defun set-fontset-font name character fontname &optional frame
2692 This function modifies the existing fontset @var{name} to
2693 use the font name @var{fontname} for the character @var{character}.
2694
2695 If @var{name} is @code{nil}, this function modifies the default
2696 fontset, whose short name is @samp{fontset-default}.
2697
2698 @var{character} may be a cons; @code{(@var{from} . @var{to})}, where
2699 @var{from} and @var{to} are non-generic characters. In that case, use
2700 @var{fontname} for all characters in the range @var{from} and @var{to}
2701 (inclusive).
2702
2703 @var{character} may be a charset. In that case, use
2704 @var{fontname} for all character in the charsets.
2705
2706 @var{fontname} may be a cons; @code{(@var{family} . @var{registry})},
2707 where @var{family} is a family name of a font (possibly including a
2708 foundry name at the head), @var{registry} is a registry name of a font
2709 (possibly including an encoding name at the tail).
2710
2711 For instance, this changes the default fontset to use a font of which
2712 registry name is @samp{JISX0208.1983} for all characters belonging to
2713 the charset @code{japanese-jisx0208}.
2714
2715 @smallexample
2716 (set-fontset-font nil 'japanese-jisx0208 '(nil . "JISX0208.1983"))
2717 @end smallexample
2718 @end defun
2719
2720 @defun char-displayable-p char
2721 This function returns @code{t} if Emacs ought to be able to display
2722 @var{char}. More precisely, if the selected frame's fontset has a
2723 font to display the character set that @var{char} belongs to.
2724
2725 Fontsets can specify a font on a per-character basis; when the fontset
2726 does that, this function's value may not be accurate.
2727 @end defun
2728
2729 @node Fringes
2730 @section Fringes
2731 @cindex Fringes
2732
2733 The @dfn{fringes} of a window are thin vertical strips down the
2734 sides that are used for displaying bitmaps that indicate truncation,
2735 continuation, horizontal scrolling, and the overlay arrow.
2736
2737 @menu
2738 * Fringe Size/Pos:: Specifying where to put the window fringes.
2739 * Fringe Indicators:: Displaying indicator icons in the window fringes.
2740 * Fringe Cursors:: Displaying cursors in the right fringe.
2741 * Fringe Bitmaps:: Specifying bitmaps for fringe indicators.
2742 * Customizing Bitmaps:: Specifying your own bitmaps to use in the fringes.
2743 * Overlay Arrow:: Display of an arrow to indicate position.
2744 @end menu
2745
2746 @node Fringe Size/Pos
2747 @subsection Fringe Size and Position
2748
2749 The following buffer-local variables control the position and width
2750 of the window fringes.
2751
2752 @defvar fringes-outside-margins
2753 The fringes normally appear between the display margins and the window
2754 text. If the value is non-@code{nil}, they appear outside the display
2755 margins. @xref{Display Margins}.
2756 @end defvar
2757
2758 @defvar left-fringe-width
2759 This variable, if non-@code{nil}, specifies the width of the left
2760 fringe in pixels. A value of @code{nil} means to use the left fringe
2761 width from the window's frame.
2762 @end defvar
2763
2764 @defvar right-fringe-width
2765 This variable, if non-@code{nil}, specifies the width of the right
2766 fringe in pixels. A value of @code{nil} means to use the right fringe
2767 width from the window's frame.
2768 @end defvar
2769
2770 The values of these variables take effect when you display the
2771 buffer in a window. If you change them while the buffer is visible,
2772 you can call @code{set-window-buffer} to display it once again in the
2773 same window, to make the changes take effect.
2774
2775 @defun set-window-fringes window left &optional right outside-margins
2776 This function sets the fringe widths of window @var{window}.
2777 If @var{window} is @code{nil}, the selected window is used.
2778
2779 The argument @var{left} specifies the width in pixels of the left
2780 fringe, and likewise @var{right} for the right fringe. A value of
2781 @code{nil} for either one stands for the default width. If
2782 @var{outside-margins} is non-@code{nil}, that specifies that fringes
2783 should appear outside of the display margins.
2784 @end defun
2785
2786 @defun window-fringes &optional window
2787 This function returns information about the fringes of a window
2788 @var{window}. If @var{window} is omitted or @code{nil}, the selected
2789 window is used. The value has the form @code{(@var{left-width}
2790 @var{right-width} @var{outside-margins})}.
2791 @end defun
2792
2793
2794 @node Fringe Indicators
2795 @subsection Fringe Indicators
2796 @cindex fringe indicators
2797 @cindex indicators, fringe
2798
2799 The @dfn{fringe indicators} are tiny icons Emacs displays in the
2800 window fringe (on a graphic display) to indicate truncated or
2801 continued lines, buffer boundaries, overlay arrow, etc.
2802
2803 @defopt indicate-empty-lines
2804 @cindex fringes, and empty line indication
2805 When this is non-@code{nil}, Emacs displays a special glyph in the
2806 fringe of each empty line at the end of the buffer, on graphical
2807 displays. @xref{Fringes}. This variable is automatically
2808 buffer-local in every buffer.
2809 @end defopt
2810
2811 @defvar indicate-buffer-boundaries
2812 This buffer-local variable controls how the buffer boundaries and
2813 window scrolling are indicated in the window fringes.
2814
2815 Emacs can indicate the buffer boundaries---that is, the first and last
2816 line in the buffer---with angle icons when they appear on the screen.
2817 In addition, Emacs can display an up-arrow in the fringe to show
2818 that there is text above the screen, and a down-arrow to show
2819 there is text below the screen.
2820
2821 There are three kinds of basic values:
2822
2823 @table @asis
2824 @item @code{nil}
2825 Don't display any of these fringe icons.
2826 @item @code{left}
2827 Display the angle icons and arrows in the left fringe.
2828 @item @code{right}
2829 Display the angle icons and arrows in the right fringe.
2830 @item any non-alist
2831 Display the angle icons in the left fringe
2832 and don't display the arrows.
2833 @end table
2834
2835 Otherwise the value should be an alist that specifies which fringe
2836 indicators to display and where. Each element of the alist should
2837 have the form @code{(@var{indicator} . @var{position})}. Here,
2838 @var{indicator} is one of @code{top}, @code{bottom}, @code{up},
2839 @code{down}, and @code{t} (which covers all the icons not yet
2840 specified), while @var{position} is one of @code{left}, @code{right}
2841 and @code{nil}.
2842
2843 For example, @code{((top . left) (t . right))} places the top angle
2844 bitmap in left fringe, and the bottom angle bitmap as well as both
2845 arrow bitmaps in right fringe. To show the angle bitmaps in the left
2846 fringe, and no arrow bitmaps, use @code{((top . left) (bottom . left))}.
2847 @end defvar
2848
2849 @defvar default-indicate-buffer-boundaries
2850 The value of this variable is the default value for
2851 @code{indicate-buffer-boundaries} in buffers that do not override it.
2852 @end defvar
2853
2854 @defvar fringe-indicator-alist
2855 This buffer-local variable specifies the mapping from logical fringe
2856 indicators to the actual bitmaps displayed in the window fringes.
2857
2858 These symbols identify the logical fringe indicators:
2859
2860 @table @asis
2861 @item Truncation and continuation line indicators:
2862 @code{truncation}, @code{continuation}.
2863
2864 @item Buffer position indicators:
2865 @code{up}, @code{down},
2866 @code{top}, @code{bottom},
2867 @code{top-bottom}.
2868
2869 @item Empty line indicator:
2870 @code{empty-line}.
2871
2872 @item Overlay arrow indicator:
2873 @code{overlay-arrow}.
2874
2875 @item Unknown bitmap indicator:
2876 @code{unknown}.
2877 @end table
2878
2879 The value is an alist where each element @code{(@var{indicator} . @var{bitmaps})}
2880 specifies the fringe bitmaps used to display a specific logical
2881 fringe indicator.
2882
2883 Here, @var{indicator} specifies the logical indicator type, and
2884 @var{bitmaps} is list of symbols @code{(@var{left} @var{right}
2885 [@var{left1} @var{right1}])} which specifies the actual bitmap shown
2886 in the left or right fringe for the logical indicator.
2887
2888 The @var{left} and @var{right} symbols specify the bitmaps shown in
2889 the left and/or right fringe for the specific indicator. The
2890 @var{left1} or @var{right1} bitmaps are used only for the `bottom' and
2891 `top-bottom indicators when the last (only) line in has no final
2892 newline. Alternatively, @var{bitmaps} may be a single symbol which is
2893 used in both left and right fringes.
2894
2895 When @code{fringe-indicator-alist} has a buffer-local value, and there
2896 is no bitmap defined for a logical indicator, or the bitmap is
2897 @code{t}, the corresponding value from the (non-local)
2898 @code{default-fringe-indicator-alist} is used.
2899
2900 To completely hide a specific indicator, set the bitmap to @code{nil}.
2901 @end defvar
2902
2903 @defvar default-fringe-indicator-alist
2904 The value of this variable is the default value for
2905 @code{fringe-indicator-alist} in buffers that do not override it.
2906 @end defvar
2907
2908 Standard fringe bitmaps for indicators:
2909 @example
2910 left-arrow right-arrow up-arrow down-arrow
2911 left-curly-arrow right-curly-arrow
2912 left-triangle right-triangle
2913 top-left-angle top-right-angle
2914 bottom-left-angle bottom-right-angle
2915 left-bracket right-bracket
2916 filled-rectangle hollow-rectangle
2917 filled-square hollow-square
2918 vertical-bar horizontal-bar
2919 empty-line question-mark
2920 @end example
2921
2922 @node Fringe Cursors
2923 @subsection Fringe Cursors
2924 @cindex fringe cursors
2925 @cindex cursor, fringe
2926
2927 When a line is exactly as wide as the window, Emacs displays the
2928 cursor in the right fringe instead of using two lines. Different
2929 bitmaps are used to represent the cursor in the fringe depending on
2930 the current buffer's cursor type.
2931
2932 @table @asis
2933 @item Logical cursor types:
2934 @code{box} , @code{hollow}, @code{bar},
2935 @code{hbar}, @code{hollow-small}.
2936 @end table
2937
2938 The @code{hollow-small} type is used instead of @code{hollow} when the
2939 normal @code{hollow-rectangle} bitmap is too tall to fit on a specific
2940 display line.
2941
2942 @defvar overflow-newline-into-fringe
2943 If this is non-@code{nil}, lines exactly as wide as the window (not
2944 counting the final newline character) are not continued. Instead,
2945 when point is at the end of the line, the cursor appears in the right
2946 fringe.
2947 @end defvar
2948
2949 @defvar fringe-cursor-alist
2950 This variable specifies the mapping from logical cursor type to the
2951 actual fringe bitmaps displayed in the right fringe. The value is an
2952 alist where each element @code{(@var{cursor} . @var{bitmap})} specifies
2953 the fringe bitmaps used to display a specific logical cursor type in
2954 the fringe. Here, @var{cursor} specifies the logical cursor type and
2955 @var{bitmap} is a symbol specifying the fringe bitmap to be displayed
2956 for that logical cursor type.
2957
2958 When @code{fringe-cursor-alist} has a buffer-local value, and there is
2959 no bitmap defined for a cursor type, the corresponding value from the
2960 (non-local) @code{default-fringes-indicator-alist} is used.
2961 @end defvar
2962
2963 @defvar default-fringes-cursor-alist
2964 The value of this variable is the default value for
2965 @code{fringe-cursor-alist} in buffers that do not override it.
2966 @end defvar
2967
2968 Standard bitmaps for displaying the cursor in right fringe:
2969 @example
2970 filled-rectangle hollow-rectangle filled-square hollow-square
2971 vertical-bar horizontal-bar
2972 @end example
2973
2974
2975 @node Fringe Bitmaps
2976 @subsection Fringe Bitmaps
2977 @cindex fringe bitmaps
2978 @cindex bitmaps, fringe
2979
2980 The @dfn{fringe bitmaps} are the actual bitmaps which represent the
2981 logical fringe indicators for truncated or continued lines, buffer
2982 boundaries, overlay arrow, etc. Fringe bitmap symbols have their own
2983 name space. The fringe bitmaps are shared by all frames and windows.
2984 You can redefine the built-in fringe bitmaps, and you can define new
2985 fringe bitmaps.
2986
2987 The way to display a bitmap in the left or right fringes for a given
2988 line in a window is by specifying the @code{display} property for one
2989 of the characters that appears in it. Use a display specification of
2990 the form @code{(left-fringe @var{bitmap} [@var{face}])} or
2991 @code{(right-fringe @var{bitmap} [@var{face}])} (@pxref{Display
2992 Property}). Here, @var{bitmap} is a symbol identifying the bitmap you
2993 want, and @var{face} (which is optional) is the name of the face whose
2994 colors should be used for displaying the bitmap, instead of the
2995 default @code{fringe} face. @var{face} is automatically merged with
2996 the @code{fringe} face, so normally @var{face} need only specify the
2997 foreground color for the bitmap.
2998
2999 @defun fringe-bitmaps-at-pos &optional pos window
3000 This function returns the fringe bitmaps of the display line
3001 containing position @var{pos} in window @var{window}. The return
3002 value has the form @code{(@var{left} @var{right} @var{ov})}, where @var{left}
3003 is the symbol for the fringe bitmap in the left fringe (or @code{nil}
3004 if no bitmap), @var{right} is similar for the right fringe, and @var{ov}
3005 is non-@code{nil} if there is an overlay arrow in the left fringe.
3006
3007 The value is @code{nil} if @var{pos} is not visible in @var{window}.
3008 If @var{window} is @code{nil}, that stands for the selected window.
3009 If @var{pos} is @code{nil}, that stands for the value of point in
3010 @var{window}.
3011 @end defun
3012
3013 @node Customizing Bitmaps
3014 @subsection Customizing Fringe Bitmaps
3015
3016 @defun define-fringe-bitmap bitmap bits &optional height width align
3017 This function defines the symbol @var{bitmap} as a new fringe bitmap,
3018 or replaces an existing bitmap with that name.
3019
3020 The argument @var{bits} specifies the image to use. It should be
3021 either a string or a vector of integers, where each element (an
3022 integer) corresponds to one row of the bitmap. Each bit of an integer
3023 corresponds to one pixel of the bitmap, where the low bit corresponds
3024 to the rightmost pixel of the bitmap.
3025
3026 The height is normally the length of @var{bits}. However, you
3027 can specify a different height with non-@code{nil} @var{height}. The width
3028 is normally 8, but you can specify a different width with non-@code{nil}
3029 @var{width}. The width must be an integer between 1 and 16.
3030
3031 The argument @var{align} specifies the positioning of the bitmap
3032 relative to the range of rows where it is used; the default is to
3033 center the bitmap. The allowed values are @code{top}, @code{center},
3034 or @code{bottom}.
3035
3036 The @var{align} argument may also be a list @code{(@var{align}
3037 @var{periodic})} where @var{align} is interpreted as described above.
3038 If @var{periodic} is non-@code{nil}, it specifies that the rows in
3039 @code{bits} should be repeated enough times to reach the specified
3040 height.
3041 @end defun
3042
3043 @defun destroy-fringe-bitmap bitmap
3044 This function destroy the fringe bitmap identified by @var{bitmap}.
3045 If @var{bitmap} identifies a standard fringe bitmap, it actually
3046 restores the standard definition of that bitmap, instead of
3047 eliminating it entirely.
3048 @end defun
3049
3050 @defun set-fringe-bitmap-face bitmap &optional face
3051 This sets the face for the fringe bitmap @var{bitmap} to @var{face}.
3052 If @var{face} is @code{nil}, it selects the @code{fringe} face. The
3053 bitmap's face controls the color to draw it in.
3054
3055 @var{face} is merged with the @code{fringe} face, so normally
3056 @var{face} should specify only the foreground color.
3057 @end defun
3058
3059 @node Overlay Arrow
3060 @subsection The Overlay Arrow
3061 @cindex overlay arrow
3062
3063 The @dfn{overlay arrow} is useful for directing the user's attention
3064 to a particular line in a buffer. For example, in the modes used for
3065 interface to debuggers, the overlay arrow indicates the line of code
3066 about to be executed. This feature has nothing to do with
3067 @dfn{overlays} (@pxref{Overlays}).
3068
3069 @defvar overlay-arrow-string
3070 This variable holds the string to display to call attention to a
3071 particular line, or @code{nil} if the arrow feature is not in use.
3072 On a graphical display the contents of the string are ignored; instead a
3073 glyph is displayed in the fringe area to the left of the display area.
3074 @end defvar
3075
3076 @defvar overlay-arrow-position
3077 This variable holds a marker that indicates where to display the overlay
3078 arrow. It should point at the beginning of a line. On a non-graphical
3079 display the arrow text
3080 appears at the beginning of that line, overlaying any text that would
3081 otherwise appear. Since the arrow is usually short, and the line
3082 usually begins with indentation, normally nothing significant is
3083 overwritten.
3084
3085 The overlay-arrow string is displayed in any given buffer if the value
3086 of @code{overlay-arrow-position} in that buffer points into that
3087 buffer. Thus, it works to can display multiple overlay arrow strings
3088 by creating buffer-local bindings of @code{overlay-arrow-position}.
3089 However, it is usually cleaner to use
3090 @code{overlay-arrow-variable-list} to achieve this result.
3091 @c !!! overlay-arrow-position: but the overlay string may remain in the display
3092 @c of some other buffer until an update is required. This should be fixed
3093 @c now. Is it?
3094 @end defvar
3095
3096 You can do a similar job by creating an overlay with a
3097 @code{before-string} property. @xref{Overlay Properties}.
3098
3099 You can define multiple overlay arrows via the variable
3100 @code{overlay-arrow-variable-list}.
3101
3102 @defvar overlay-arrow-variable-list
3103 This variable's value is a list of variables, each of which specifies
3104 the position of an overlay arrow. The variable
3105 @code{overlay-arrow-position} has its normal meaning because it is on
3106 this list.
3107 @end defvar
3108
3109 Each variable on this list can have properties
3110 @code{overlay-arrow-string} and @code{overlay-arrow-bitmap} that
3111 specify an overlay arrow string (for text-only terminals) or fringe
3112 bitmap (for graphical terminals) to display at the corresponding
3113 overlay arrow position. If either property is not set, the default
3114 @code{overlay-arrow-string} or @code{overlay-arrow} fringe indicator
3115 is used.
3116
3117 @node Scroll Bars
3118 @section Scroll Bars
3119
3120 Normally the frame parameter @code{vertical-scroll-bars} controls
3121 whether the windows in the frame have vertical scroll bars, and
3122 whether they are on the left or right. The frame parameter
3123 @code{scroll-bar-width} specifies how wide they are (@code{nil}
3124 meaning the default). @xref{Layout Parameters}.
3125
3126 @defun frame-current-scroll-bars &optional frame
3127 This function reports the scroll bar type settings for frame
3128 @var{frame}. The value is a cons cell
3129 @code{(@var{vertical-type} .@: @var{horizontal-type})}, where
3130 @var{vertical-type} is either @code{left}, @code{right}, or @code{nil}
3131 (which means no scroll bar.) @var{horizontal-type} is meant to
3132 specify the horizontal scroll bar type, but since they are not
3133 implemented, it is always @code{nil}.
3134 @end defun
3135
3136 @vindex vertical-scroll-bar
3137 You can enable or disable scroll bars for a particular buffer,
3138 by setting the variable @code{vertical-scroll-bar}. This variable
3139 automatically becomes buffer-local when set. The possible values are
3140 @code{left}, @code{right}, @code{t}, which means to use the
3141 frame's default, and @code{nil} for no scroll bar.
3142
3143 You can also control this for individual windows. Call the function
3144 @code{set-window-scroll-bars} to specify what to do for a specific window:
3145
3146 @defun set-window-scroll-bars window width &optional vertical-type horizontal-type
3147 This function sets the width and type of scroll bars for window
3148 @var{window}.
3149
3150 @var{width} specifies the scroll bar width in pixels (@code{nil} means
3151 use the width specified for the frame). @var{vertical-type} specifies
3152 whether to have a vertical scroll bar and, if so, where. The possible
3153 values are @code{left}, @code{right} and @code{nil}, just like the
3154 values of the @code{vertical-scroll-bars} frame parameter.
3155
3156 The argument @var{horizontal-type} is meant to specify whether and
3157 where to have horizontal scroll bars, but since they are not
3158 implemented, it has no effect. If @var{window} is @code{nil}, the
3159 selected window is used.
3160 @end defun
3161
3162 @defun window-scroll-bars &optional window
3163 Report the width and type of scroll bars specified for @var{window}.
3164 If @var{window} is omitted or @code{nil}, the selected window is used.
3165 The value is a list of the form @code{(@var{width}
3166 @var{cols} @var{vertical-type} @var{horizontal-type})}. The value
3167 @var{width} is the value that was specified for the width (which may
3168 be @code{nil}); @var{cols} is the number of columns that the scroll
3169 bar actually occupies.
3170
3171 @var{horizontal-type} is not actually meaningful.
3172 @end defun
3173
3174 If you don't specify these values for a window with
3175 @code{set-window-scroll-bars}, the buffer-local variables
3176 @code{scroll-bar-mode} and @code{scroll-bar-width} in the buffer being
3177 displayed control the window's vertical scroll bars. The function
3178 @code{set-window-buffer} examines these variables. If you change them
3179 in a buffer that is already visible in a window, you can make the
3180 window take note of the new values by calling @code{set-window-buffer}
3181 specifying the same buffer that is already displayed.
3182
3183 @defvar scroll-bar-mode
3184 This variable, always local in all buffers, controls whether and where
3185 to put scroll bars in windows displaying the buffer. The possible values
3186 are @code{nil} for no scroll bar, @code{left} to put a scroll bar on
3187 the left, and @code{right} to put a scroll bar on the right.
3188 @end defvar
3189
3190 @defun window-current-scroll-bars &optional window
3191 This function reports the scroll bar type for window @var{window}.
3192 If @var{window} is omitted or @code{nil}, the selected window is used.
3193 The value is a cons cell
3194 @code{(@var{vertical-type} .@: @var{horizontal-type})}. Unlike
3195 @code{window-scroll-bars}, this reports the scroll bar type actually
3196 used, once frame defaults and @code{scroll-bar-mode} are taken into
3197 account.
3198 @end defun
3199
3200 @defvar scroll-bar-width
3201 This variable, always local in all buffers, specifies the width of the
3202 buffer's scroll bars, measured in pixels. A value of @code{nil} means
3203 to use the value specified by the frame.
3204 @end defvar
3205
3206 @node Display Property
3207 @section The @code{display} Property
3208 @cindex display specification
3209 @kindex display @r{(text property)}
3210
3211 The @code{display} text property (or overlay property) is used to
3212 insert images into text, and also control other aspects of how text
3213 displays. The value of the @code{display} property should be a
3214 display specification, or a list or vector containing several display
3215 specifications.
3216
3217 Some kinds of @code{display} properties specify something to display
3218 instead of the text that has the property. In this case, ``the text''
3219 means all the consecutive characters that have the same Lisp object as
3220 their @code{display} property; these characters are replaced as a
3221 single unit. By contrast, characters that have similar but distinct
3222 Lisp objects as their @code{display} properties are handled
3223 separately. Here's a function that illustrates this point:
3224
3225 @smallexample
3226 (defun foo ()
3227 (goto-char (point-min))
3228 (dotimes (i 5)
3229 (let ((string (concat "A")))
3230 (put-text-property (point) (1+ (point)) 'display string)
3231 (forward-char 1)
3232 (put-text-property (point) (1+ (point)) 'display string)
3233 (forward-char 1))))
3234 @end smallexample
3235
3236 @noindent
3237 It gives each of the first ten characters in the buffer string
3238 @code{"A"} as the @code{display} property, but they don't all get the
3239 same string. The first two characters get the same string, so they
3240 together are replaced with one @samp{A}. The next two characters get
3241 a second string, so they together are replaced with one @samp{A}.
3242 Likewise for each following pair of characters. Thus, the ten
3243 characters appear as five A's. This function would have the same
3244 results:
3245
3246 @smallexample
3247 (defun foo ()
3248 (goto-char (point-min))
3249 (dotimes (i 5)
3250 (let ((string (concat "A")))
3251 (put-text-property (point) (2+ (point)) 'display string)
3252 (put-text-property (point) (1+ (point)) 'display string)
3253 (forward-char 2))))
3254 @end smallexample
3255
3256 @noindent
3257 This illustrates that what matters is the property value for
3258 each character. If two consecutive characters have the same
3259 object as the @code{display} property value, it's irrelevant
3260 whether they got this property from a single call to
3261 @code{put-text-property} or from two different calls.
3262
3263 The rest of this section describes several kinds of
3264 display specifications and what they mean.
3265
3266 @menu
3267 * Specified Space:: Displaying one space with a specified width.
3268 * Pixel Specification:: Specifying space width or height in pixels.
3269 * Other Display Specs:: Displaying an image; magnifying text; moving it
3270 up or down on the page; adjusting the width
3271 of spaces within text.
3272 * Display Margins:: Displaying text or images to the side of the main text.
3273 @end menu
3274
3275 @node Specified Space
3276 @subsection Specified Spaces
3277 @cindex spaces, specified height or width
3278 @cindex specified spaces
3279 @cindex variable-width spaces
3280
3281 To display a space of specified width and/or height, use a display
3282 specification of the form @code{(space . @var{props})}, where
3283 @var{props} is a property list (a list of alternating properties and
3284 values). You can put this property on one or more consecutive
3285 characters; a space of the specified height and width is displayed in
3286 place of @emph{all} of those characters. These are the properties you
3287 can use in @var{props} to specify the weight of the space:
3288
3289 @table @code
3290 @item :width @var{width}
3291 If @var{width} is an integer or floating point number, it specifies
3292 that the space width should be @var{width} times the normal character
3293 width. @var{width} can also be a @dfn{pixel width} specification
3294 (@pxref{Pixel Specification}).
3295
3296 @item :relative-width @var{factor}
3297 Specifies that the width of the stretch should be computed from the
3298 first character in the group of consecutive characters that have the
3299 same @code{display} property. The space width is the width of that
3300 character, multiplied by @var{factor}.
3301
3302 @item :align-to @var{hpos}
3303 Specifies that the space should be wide enough to reach @var{hpos}.
3304 If @var{hpos} is a number, it is measured in units of the normal
3305 character width. @var{hpos} can also be a @dfn{pixel width}
3306 specification (@pxref{Pixel Specification}).
3307 @end table
3308
3309 You should use one and only one of the above properties. You can
3310 also specify the height of the space, with these properties:
3311
3312 @table @code
3313 @item :height @var{height}
3314 Specifies the height of the space.
3315 If @var{height} is an integer or floating point number, it specifies
3316 that the space height should be @var{height} times the normal character
3317 height. The @var{height} may also be a @dfn{pixel height} specification
3318 (@pxref{Pixel Specification}).
3319
3320 @item :relative-height @var{factor}
3321 Specifies the height of the space, multiplying the ordinary height
3322 of the text having this display specification by @var{factor}.
3323
3324 @item :ascent @var{ascent}
3325 If the value of @var{ascent} is a non-negative number no greater than
3326 100, it specifies that @var{ascent} percent of the height of the space
3327 should be considered as the ascent of the space---that is, the part
3328 above the baseline. The ascent may also be specified in pixel units
3329 with a @dfn{pixel ascent} specification (@pxref{Pixel Specification}).
3330
3331 @end table
3332
3333 Don't use both @code{:height} and @code{:relative-height} together.
3334
3335 The @code{:width} and @code{:align-to} properties are supported on
3336 non-graphic terminals, but the other space properties in this section
3337 are not.
3338
3339 @node Pixel Specification
3340 @subsection Pixel Specification for Spaces
3341 @cindex spaces, pixel specification
3342
3343 The value of the @code{:width}, @code{:align-to}, @code{:height},
3344 and @code{:ascent} properties can be a special kind of expression that
3345 is evaluated during redisplay. The result of the evaluation is used
3346 as an absolute number of pixels.
3347
3348 The following expressions are supported:
3349
3350 @smallexample
3351 @group
3352 @var{expr} ::= @var{num} | (@var{num}) | @var{unit} | @var{elem} | @var{pos} | @var{image} | @var{form}
3353 @var{num} ::= @var{integer} | @var{float} | @var{symbol}
3354 @var{unit} ::= in | mm | cm | width | height
3355 @end group
3356 @group
3357 @var{elem} ::= left-fringe | right-fringe | left-margin | right-margin
3358 | scroll-bar | text
3359 @var{pos} ::= left | center | right
3360 @var{form} ::= (@var{num} . @var{expr}) | (@var{op} @var{expr} ...)
3361 @var{op} ::= + | -
3362 @end group
3363 @end smallexample
3364
3365 The form @var{num} specifies a fraction of the default frame font
3366 height or width. The form @code{(@var{num})} specifies an absolute
3367 number of pixels. If @var{num} is a symbol, @var{symbol}, its
3368 buffer-local variable binding is used.
3369
3370 The @code{in}, @code{mm}, and @code{cm} units specify the number of
3371 pixels per inch, millimeter, and centimeter, respectively. The
3372 @code{width} and @code{height} units correspond to the default width
3373 and height of the current face. An image specification @code{image}
3374 corresponds to the width or height of the image.
3375
3376 The @code{left-fringe}, @code{right-fringe}, @code{left-margin},
3377 @code{right-margin}, @code{scroll-bar}, and @code{text} elements
3378 specify to the width of the corresponding area of the window.
3379
3380 The @code{left}, @code{center}, and @code{right} positions can be
3381 used with @code{:align-to} to specify a position relative to the left
3382 edge, center, or right edge of the text area.
3383
3384 Any of the above window elements (except @code{text}) can also be
3385 used with @code{:align-to} to specify that the position is relative to
3386 the left edge of the given area. Once the base offset for a relative
3387 position has been set (by the first occurrence of one of these
3388 symbols), further occurrences of these symbols are interpreted as the
3389 width of the specified area. For example, to align to the center of
3390 the left-margin, use
3391
3392 @example
3393 :align-to (+ left-margin (0.5 . left-margin))
3394 @end example
3395
3396 If no specific base offset is set for alignment, it is always relative
3397 to the left edge of the text area. For example, @samp{:align-to 0} in a
3398 header-line aligns with the first text column in the text area.
3399
3400 A value of the form @code{(@var{num} . @var{expr})} stands for the
3401 product of the values of @var{num} and @var{expr}. For example,
3402 @code{(2 . in)} specifies a width of 2 inches, while @code{(0.5 .
3403 @var{image})} specifies half the width (or height) of the specified
3404 image.
3405
3406 The form @code{(+ @var{expr} ...)} adds up the value of the
3407 expressions. The form @code{(- @var{expr} ...)} negates or subtracts
3408 the value of the expressions.
3409
3410 @node Other Display Specs
3411 @subsection Other Display Specifications
3412
3413 Here are the other sorts of display specifications that you can use
3414 in the @code{display} text property.
3415
3416 @table @code
3417 @item @var{string}
3418 Display @var{string} instead of the text that has this property.
3419
3420 Recursive display specifications are not supported---@var{string}'s
3421 @code{display} properties, if any, are not used.
3422
3423 @item (image . @var{image-props})
3424 This kind of display specification is an image descriptor (@pxref{Images}).
3425 When used as a display specification, it means to display the image
3426 instead of the text that has the display specification.
3427
3428 @item (slice @var{x} @var{y} @var{width} @var{height})
3429 This specification together with @code{image} specifies a @dfn{slice}
3430 (a partial area) of the image to display. The elements @var{y} and
3431 @var{x} specify the top left corner of the slice, within the image;
3432 @var{width} and @var{height} specify the width and height of the
3433 slice. Integer values are numbers of pixels. A floating point number
3434 in the range 0.0--1.0 stands for that fraction of the width or height
3435 of the entire image.
3436
3437 @item ((margin nil) @var{string})
3438 A display specification of this form means to display @var{string}
3439 instead of the text that has the display specification, at the same
3440 position as that text. It is equivalent to using just @var{string},
3441 but it is done as a special case of marginal display (@pxref{Display
3442 Margins}).
3443
3444 @item (space-width @var{factor})
3445 This display specification affects all the space characters within the
3446 text that has the specification. It displays all of these spaces
3447 @var{factor} times as wide as normal. The element @var{factor} should
3448 be an integer or float. Characters other than spaces are not affected
3449 at all; in particular, this has no effect on tab characters.
3450
3451 @item (height @var{height})
3452 This display specification makes the text taller or shorter.
3453 Here are the possibilities for @var{height}:
3454
3455 @table @asis
3456 @item @code{(+ @var{n})}
3457 This means to use a font that is @var{n} steps larger. A ``step'' is
3458 defined by the set of available fonts---specifically, those that match
3459 what was otherwise specified for this text, in all attributes except
3460 height. Each size for which a suitable font is available counts as
3461 another step. @var{n} should be an integer.
3462
3463 @item @code{(- @var{n})}
3464 This means to use a font that is @var{n} steps smaller.
3465
3466 @item a number, @var{factor}
3467 A number, @var{factor}, means to use a font that is @var{factor} times
3468 as tall as the default font.
3469
3470 @item a symbol, @var{function}
3471 A symbol is a function to compute the height. It is called with the
3472 current height as argument, and should return the new height to use.
3473
3474 @item anything else, @var{form}
3475 If the @var{height} value doesn't fit the previous possibilities, it is
3476 a form. Emacs evaluates it to get the new height, with the symbol
3477 @code{height} bound to the current specified font height.
3478 @end table
3479
3480 @item (raise @var{factor})
3481 This kind of display specification raises or lowers the text
3482 it applies to, relative to the baseline of the line.
3483
3484 @var{factor} must be a number, which is interpreted as a multiple of the
3485 height of the affected text. If it is positive, that means to display
3486 the characters raised. If it is negative, that means to display them
3487 lower down.
3488
3489 If the text also has a @code{height} display specification, that does
3490 not affect the amount of raising or lowering, which is based on the
3491 faces used for the text.
3492 @end table
3493
3494 @c We put all the `@code{(when ...)}' on one line to encourage
3495 @c makeinfo's end-of-sentence heuristics to DTRT. Previously, the dot
3496 @c was at eol; the info file ended up w/ two spaces rendered after it.
3497 You can make any display specification conditional. To do that,
3498 package it in another list of the form
3499 @code{(when @var{condition} . @var{spec})}.
3500 Then the specification @var{spec} applies only when
3501 @var{condition} evaluates to a non-@code{nil} value. During the
3502 evaluation, @code{object} is bound to the string or buffer having the
3503 conditional @code{display} property. @code{position} and
3504 @code{buffer-position} are bound to the position within @code{object}
3505 and the buffer position where the @code{display} property was found,
3506 respectively. Both positions can be different when @code{object} is a
3507 string.
3508
3509 @node Display Margins
3510 @subsection Displaying in the Margins
3511 @cindex display margins
3512 @cindex margins, display
3513
3514 A buffer can have blank areas called @dfn{display margins} on the left
3515 and on the right. Ordinary text never appears in these areas, but you
3516 can put things into the display margins using the @code{display}
3517 property.
3518
3519 To put text in the left or right display margin of the window, use a
3520 display specification of the form @code{(margin right-margin)} or
3521 @code{(margin left-margin)} on it. To put an image in a display margin,
3522 use that display specification along with the display specification for
3523 the image. Unfortunately, there is currently no way to make
3524 text or images in the margin mouse-sensitive.
3525
3526 If you put such a display specification directly on text in the
3527 buffer, the specified margin display appears @emph{instead of} that
3528 buffer text itself. To put something in the margin @emph{in
3529 association with} certain buffer text without preventing or altering
3530 the display of that text, put a @code{before-string} property on the
3531 text and put the display specification on the contents of the
3532 before-string.
3533
3534 Before the display margins can display anything, you must give
3535 them a nonzero width. The usual way to do that is to set these
3536 variables:
3537
3538 @defvar left-margin-width
3539 This variable specifies the width of the left margin.
3540 It is buffer-local in all buffers.
3541 @end defvar
3542
3543 @defvar right-margin-width
3544 This variable specifies the width of the right margin.
3545 It is buffer-local in all buffers.
3546 @end defvar
3547
3548 Setting these variables does not immediately affect the window. These
3549 variables are checked when a new buffer is displayed in the window.
3550 Thus, you can make changes take effect by calling
3551 @code{set-window-buffer}.
3552
3553 You can also set the margin widths immediately.
3554
3555 @defun set-window-margins window left &optional right
3556 This function specifies the margin widths for window @var{window}.
3557 The argument @var{left} controls the left margin and
3558 @var{right} controls the right margin (default @code{0}).
3559 @end defun
3560
3561 @defun window-margins &optional window
3562 This function returns the left and right margins of @var{window}
3563 as a cons cell of the form @code{(@var{left} . @var{right})}.
3564 If @var{window} is @code{nil}, the selected window is used.
3565 @end defun
3566
3567 @node Images
3568 @section Images
3569 @cindex images in buffers
3570
3571 To display an image in an Emacs buffer, you must first create an image
3572 descriptor, then use it as a display specifier in the @code{display}
3573 property of text that is displayed (@pxref{Display Property}).
3574
3575 Emacs is usually able to display images when it is run on a
3576 graphical terminal. Images cannot be displayed in a text terminal, on
3577 certain graphical terminals that lack the support for this, or if
3578 Emacs is compiled without image support. You can use the function
3579 @code{display-images-p} to determine if images can in principle be
3580 displayed (@pxref{Display Feature Testing}).
3581
3582 Emacs can display a number of different image formats; some of them
3583 are supported only if particular support libraries are installed on
3584 your machine. In some environments, Emacs can load image
3585 libraries on demand; if so, the variable @code{image-library-alist}
3586 can be used to modify the set of known names for these dynamic
3587 libraries (though it is not possible to add new image formats).
3588
3589 The supported image formats include XBM, XPM (this requires the
3590 libraries @code{libXpm} version 3.4k and @code{libz}), GIF (requiring
3591 @code{libungif} 4.1.0), Postscript, PBM, JPEG (requiring the
3592 @code{libjpeg} library version v6a), TIFF (requiring @code{libtiff}
3593 v3.4), and PNG (requiring @code{libpng} 1.0.2).
3594
3595 You specify one of these formats with an image type symbol. The image
3596 type symbols are @code{xbm}, @code{xpm}, @code{gif}, @code{postscript},
3597 @code{pbm}, @code{jpeg}, @code{tiff}, and @code{png}.
3598
3599 @defvar image-types
3600 This variable contains a list of those image type symbols that are
3601 potentially supported in the current configuration.
3602 @emph{Potentially} here means that Emacs knows about the image types,
3603 not necessarily that they can be loaded (they could depend on
3604 unavailable dynamic libraries, for example).
3605
3606 To know which image types are really available, use
3607 @code{image-type-available-p}.
3608 @end defvar
3609
3610 @defvar image-library-alist
3611 This in an alist of image types vs external libraries needed to
3612 display them.
3613
3614 Each element is a list @code{(@var{image-type} @var{library}...)},
3615 where the car is a supported image format from @code{image-types}, and
3616 the rest are strings giving alternate filenames for the corresponding
3617 external libraries to load.
3618
3619 Emacs tries to load the libraries in the order they appear on the
3620 list; if none is loaded, the running session of Emacs won't support
3621 the image type. @code{pbm} and @code{xbm} don't need to be listed;
3622 they're always supported.
3623
3624 This variable is ignored if the image libraries are statically linked
3625 into Emacs.
3626 @end defvar
3627
3628 @defun image-type-available-p type
3629 @findex image-type-available-p
3630
3631 This function returns non-@code{nil} if image type @var{type} is
3632 available, i.e., if images of this type can be loaded and displayed in
3633 Emacs. @var{type} should be one of the types contained in
3634 @code{image-types}.
3635
3636 For image types whose support libraries are statically linked, this
3637 function always returns @code{t}; for other image types, it returns
3638 @code{t} if the dynamic library could be loaded, @code{nil} otherwise.
3639 @end defun
3640
3641 @menu
3642 * Image Descriptors:: How to specify an image for use in @code{:display}.
3643 * XBM Images:: Special features for XBM format.
3644 * XPM Images:: Special features for XPM format.
3645 * GIF Images:: Special features for GIF format.
3646 * Postscript Images:: Special features for Postscript format.
3647 * Other Image Types:: Various other formats are supported.
3648 * Defining Images:: Convenient ways to define an image for later use.
3649 * Showing Images:: Convenient ways to display an image once it is defined.
3650 * Image Cache:: Internal mechanisms of image display.
3651 @end menu
3652
3653 @node Image Descriptors
3654 @subsection Image Descriptors
3655 @cindex image descriptor
3656
3657 An image description is a list of the form @code{(image . @var{props})},
3658 where @var{props} is a property list containing alternating keyword
3659 symbols (symbols whose names start with a colon) and their values.
3660 You can use any Lisp object as a property, but the only properties
3661 that have any special meaning are certain symbols, all of them keywords.
3662
3663 Every image descriptor must contain the property @code{:type
3664 @var{type}} to specify the format of the image. The value of @var{type}
3665 should be an image type symbol; for example, @code{xpm} for an image in
3666 XPM format.
3667
3668 Here is a list of other properties that are meaningful for all image
3669 types:
3670
3671 @table @code
3672 @item :file @var{file}
3673 The @code{:file} property says to load the image from file
3674 @var{file}. If @var{file} is not an absolute file name, it is expanded
3675 in @code{data-directory}.
3676
3677 @item :data @var{data}
3678 The @code{:data} property says the actual contents of the image.
3679 Each image must use either @code{:data} or @code{:file}, but not both.
3680 For most image types, the value of the @code{:data} property should be a
3681 string containing the image data; we recommend using a unibyte string.
3682
3683 Before using @code{:data}, look for further information in the section
3684 below describing the specific image format. For some image types,
3685 @code{:data} may not be supported; for some, it allows other data types;
3686 for some, @code{:data} alone is not enough, so you need to use other
3687 image properties along with @code{:data}.
3688
3689 @item :margin @var{margin}
3690 The @code{:margin} property specifies how many pixels to add as an
3691 extra margin around the image. The value, @var{margin}, must be a
3692 non-negative number, or a pair @code{(@var{x} . @var{y})} of such
3693 numbers. If it is a pair, @var{x} specifies how many pixels to add
3694 horizontally, and @var{y} specifies how many pixels to add vertically.
3695 If @code{:margin} is not specified, the default is zero.
3696
3697 @item :ascent @var{ascent}
3698 The @code{:ascent} property specifies the amount of the image's
3699 height to use for its ascent---that is, the part above the baseline.
3700 The value, @var{ascent}, must be a number in the range 0 to 100, or
3701 the symbol @code{center}.
3702
3703 If @var{ascent} is a number, that percentage of the image's height is
3704 used for its ascent.
3705
3706 If @var{ascent} is @code{center}, the image is vertically centered
3707 around a centerline which would be the vertical centerline of text drawn
3708 at the position of the image, in the manner specified by the text
3709 properties and overlays that apply to the image.
3710
3711 If this property is omitted, it defaults to 50.
3712
3713 @item :relief @var{relief}
3714 The @code{:relief} property, if non-@code{nil}, adds a shadow rectangle
3715 around the image. The value, @var{relief}, specifies the width of the
3716 shadow lines, in pixels. If @var{relief} is negative, shadows are drawn
3717 so that the image appears as a pressed button; otherwise, it appears as
3718 an unpressed button.
3719
3720 @item :conversion @var{algorithm}
3721 The @code{:conversion} property, if non-@code{nil}, specifies a
3722 conversion algorithm that should be applied to the image before it is
3723 displayed; the value, @var{algorithm}, specifies which algorithm.
3724
3725 @table @code
3726 @item laplace
3727 @itemx emboss
3728 Specifies the Laplace edge detection algorithm, which blurs out small
3729 differences in color while highlighting larger differences. People
3730 sometimes consider this useful for displaying the image for a
3731 ``disabled'' button.
3732
3733 @item (edge-detection :matrix @var{matrix} :color-adjust @var{adjust})
3734 Specifies a general edge-detection algorithm. @var{matrix} must be
3735 either a nine-element list or a nine-element vector of numbers. A pixel
3736 at position @math{x/y} in the transformed image is computed from
3737 original pixels around that position. @var{matrix} specifies, for each
3738 pixel in the neighborhood of @math{x/y}, a factor with which that pixel
3739 will influence the transformed pixel; element @math{0} specifies the
3740 factor for the pixel at @math{x-1/y-1}, element @math{1} the factor for
3741 the pixel at @math{x/y-1} etc., as shown below:
3742 @iftex
3743 @tex
3744 $$\pmatrix{x-1/y-1 & x/y-1 & x+1/y-1 \cr
3745 x-1/y & x/y & x+1/y \cr
3746 x-1/y+1& x/y+1 & x+1/y+1 \cr}$$
3747 @end tex
3748 @end iftex
3749 @ifnottex
3750 @display
3751 (x-1/y-1 x/y-1 x+1/y-1
3752 x-1/y x/y x+1/y
3753 x-1/y+1 x/y+1 x+1/y+1)
3754 @end display
3755 @end ifnottex
3756
3757 The resulting pixel is computed from the color intensity of the color
3758 resulting from summing up the RGB values of surrounding pixels,
3759 multiplied by the specified factors, and dividing that sum by the sum
3760 of the factors' absolute values.
3761
3762 Laplace edge-detection currently uses a matrix of
3763 @iftex
3764 @tex
3765 $$\pmatrix{1 & 0 & 0 \cr
3766 0& 0 & 0 \cr
3767 9 & 9 & -1 \cr}$$
3768 @end tex
3769 @end iftex
3770 @ifnottex
3771 @display
3772 (1 0 0
3773 0 0 0
3774 9 9 -1)
3775 @end display
3776 @end ifnottex
3777
3778 Emboss edge-detection uses a matrix of
3779 @iftex
3780 @tex
3781 $$\pmatrix{ 2 & -1 & 0 \cr
3782 -1 & 0 & 1 \cr
3783 0 & 1 & -2 \cr}$$
3784 @end tex
3785 @end iftex
3786 @ifnottex
3787 @display
3788 ( 2 -1 0
3789 -1 0 1
3790 0 1 -2)
3791 @end display
3792 @end ifnottex
3793
3794 @item disabled
3795 Specifies transforming the image so that it looks ``disabled.''
3796 @end table
3797
3798 @item :mask @var{mask}
3799 If @var{mask} is @code{heuristic} or @code{(heuristic @var{bg})}, build
3800 a clipping mask for the image, so that the background of a frame is
3801 visible behind the image. If @var{bg} is not specified, or if @var{bg}
3802 is @code{t}, determine the background color of the image by looking at
3803 the four corners of the image, assuming the most frequently occurring
3804 color from the corners is the background color of the image. Otherwise,
3805 @var{bg} must be a list @code{(@var{red} @var{green} @var{blue})}
3806 specifying the color to assume for the background of the image.
3807
3808 If @var{mask} is @code{nil}, remove a mask from the image, if it has
3809 one. Images in some formats include a mask which can be removed by
3810 specifying @code{:mask nil}.
3811
3812 @item :pointer @var{shape}
3813 This specifies the pointer shape when the mouse pointer is over this
3814 image. @xref{Pointer Shape}, for available pointer shapes.
3815
3816 @item :map @var{map}
3817 This associates an image map of @dfn{hot spots} with this image.
3818
3819 An image map is an alist where each element has the format
3820 @code{(@var{area} @var{id} @var{plist})}. An @var{area} is specified
3821 as either a rectangle, a circle, or a polygon.
3822
3823 A rectangle is a cons
3824 @code{(rect . ((@var{x0} . @var{y0}) . (@var{x1} . @var{y1})))}
3825 which specifies the pixel coordinates of the upper left and bottom right
3826 corners of the rectangle area.
3827
3828 A circle is a cons
3829 @code{(circle . ((@var{x0} . @var{y0}) . @var{r}))}
3830 which specifies the center and the radius of the circle; @var{r} may
3831 be a float or integer.
3832
3833 A polygon is a cons
3834 @code{(poly . [@var{x0} @var{y0} @var{x1} @var{y1} ...])}
3835 where each pair in the vector describes one corner in the polygon.
3836
3837 When the mouse pointer lies on a hot-spot area of an image, the
3838 @var{plist} of that hot-spot is consulted; if it contains a @code{help-echo}
3839 property, that defines a tool-tip for the hot-spot, and if it contains
3840 a @code{pointer} property, that defines the shape of the mouse cursor when
3841 it is on the hot-spot.
3842 @xref{Pointer Shape}, for available pointer shapes.
3843
3844 When you click the mouse when the mouse pointer is over a hot-spot, an
3845 event is composed by combining the @var{id} of the hot-spot with the
3846 mouse event; for instance, @code{[area4 mouse-1]} if the hot-spot's
3847 @var{id} is @code{area4}.
3848 @end table
3849
3850 @defun image-mask-p spec &optional frame
3851 This function returns @code{t} if image @var{spec} has a mask bitmap.
3852 @var{frame} is the frame on which the image will be displayed.
3853 @var{frame} @code{nil} or omitted means to use the selected frame
3854 (@pxref{Input Focus}).
3855 @end defun
3856
3857 @node XBM Images
3858 @subsection XBM Images
3859 @cindex XBM
3860
3861 To use XBM format, specify @code{xbm} as the image type. This image
3862 format doesn't require an external library, so images of this type are
3863 always supported.
3864
3865 Additional image properties supported for the @code{xbm} image type are:
3866
3867 @table @code
3868 @item :foreground @var{foreground}
3869 The value, @var{foreground}, should be a string specifying the image
3870 foreground color, or @code{nil} for the default color. This color is
3871 used for each pixel in the XBM that is 1. The default is the frame's
3872 foreground color.
3873
3874 @item :background @var{background}
3875 The value, @var{background}, should be a string specifying the image
3876 background color, or @code{nil} for the default color. This color is
3877 used for each pixel in the XBM that is 0. The default is the frame's
3878 background color.
3879 @end table
3880
3881 If you specify an XBM image using data within Emacs instead of an
3882 external file, use the following three properties:
3883
3884 @table @code
3885 @item :data @var{data}
3886 The value, @var{data}, specifies the contents of the image.
3887 There are three formats you can use for @var{data}:
3888
3889 @itemize @bullet
3890 @item
3891 A vector of strings or bool-vectors, each specifying one line of the
3892 image. Do specify @code{:height} and @code{:width}.
3893
3894 @item
3895 A string containing the same byte sequence as an XBM file would contain.
3896 You must not specify @code{:height} and @code{:width} in this case,
3897 because omitting them is what indicates the data has the format of an
3898 XBM file. The file contents specify the height and width of the image.
3899
3900 @item
3901 A string or a bool-vector containing the bits of the image (plus perhaps
3902 some extra bits at the end that will not be used). It should contain at
3903 least @var{width} * @code{height} bits. In this case, you must specify
3904 @code{:height} and @code{:width}, both to indicate that the string
3905 contains just the bits rather than a whole XBM file, and to specify the
3906 size of the image.
3907 @end itemize
3908
3909 @item :width @var{width}
3910 The value, @var{width}, specifies the width of the image, in pixels.
3911
3912 @item :height @var{height}
3913 The value, @var{height}, specifies the height of the image, in pixels.
3914 @end table
3915
3916 @node XPM Images
3917 @subsection XPM Images
3918 @cindex XPM
3919
3920 To use XPM format, specify @code{xpm} as the image type. The
3921 additional image property @code{:color-symbols} is also meaningful with
3922 the @code{xpm} image type:
3923
3924 @table @code
3925 @item :color-symbols @var{symbols}
3926 The value, @var{symbols}, should be an alist whose elements have the
3927 form @code{(@var{name} . @var{color})}. In each element, @var{name} is
3928 the name of a color as it appears in the image file, and @var{color}
3929 specifies the actual color to use for displaying that name.
3930 @end table
3931
3932 @node GIF Images
3933 @subsection GIF Images
3934 @cindex GIF
3935
3936 For GIF images, specify image type @code{gif}.
3937
3938 @table @code
3939 @item :index @var{index}
3940 You can use @code{:index} to specify one image from a GIF file that
3941 contains more than one image. This property specifies use of image
3942 number @var{index} from the file. If the GIF file doesn't contain an
3943 image with index @var{index}, the image displays as a hollow box.
3944 @end table
3945
3946 @ignore
3947 This could be used to implement limited support for animated GIFs.
3948 For example, the following function displays a multi-image GIF file
3949 at point-min in the current buffer, switching between sub-images
3950 every 0.1 seconds.
3951
3952 (defun show-anim (file max)
3953 "Display multi-image GIF file FILE which contains MAX subimages."
3954 (display-anim (current-buffer) file 0 max t))
3955
3956 (defun display-anim (buffer file idx max first-time)
3957 (when (= idx max)
3958 (setq idx 0))
3959 (let ((img (create-image file nil :image idx)))
3960 (save-excursion
3961 (set-buffer buffer)
3962 (goto-char (point-min))
3963 (unless first-time (delete-char 1))
3964 (insert-image img))
3965 (run-with-timer 0.1 nil 'display-anim buffer file (1+ idx) max nil)))
3966 @end ignore
3967
3968 @node Postscript Images
3969 @subsection Postscript Images
3970 @cindex Postscript images
3971
3972 To use Postscript for an image, specify image type @code{postscript}.
3973 This works only if you have Ghostscript installed. You must always use
3974 these three properties:
3975
3976 @table @code
3977 @item :pt-width @var{width}
3978 The value, @var{width}, specifies the width of the image measured in
3979 points (1/72 inch). @var{width} must be an integer.
3980
3981 @item :pt-height @var{height}
3982 The value, @var{height}, specifies the height of the image in points
3983 (1/72 inch). @var{height} must be an integer.
3984
3985 @item :bounding-box @var{box}
3986 The value, @var{box}, must be a list or vector of four integers, which
3987 specifying the bounding box of the Postscript image, analogous to the
3988 @samp{BoundingBox} comment found in Postscript files.
3989
3990 @example
3991 %%BoundingBox: 22 171 567 738
3992 @end example
3993 @end table
3994
3995 Displaying Postscript images from Lisp data is not currently
3996 implemented, but it may be implemented by the time you read this.
3997 See the @file{etc/NEWS} file to make sure.
3998
3999 @node Other Image Types
4000 @subsection Other Image Types
4001 @cindex PBM
4002
4003 For PBM images, specify image type @code{pbm}. Color, gray-scale and
4004 monochromatic images are supported. For mono PBM images, two additional
4005 image properties are supported.
4006
4007 @table @code
4008 @item :foreground @var{foreground}
4009 The value, @var{foreground}, should be a string specifying the image
4010 foreground color, or @code{nil} for the default color. This color is
4011 used for each pixel in the XBM that is 1. The default is the frame's
4012 foreground color.
4013
4014 @item :background @var{background}
4015 The value, @var{background}, should be a string specifying the image
4016 background color, or @code{nil} for the default color. This color is
4017 used for each pixel in the XBM that is 0. The default is the frame's
4018 background color.
4019 @end table
4020
4021 For JPEG images, specify image type @code{jpeg}.
4022
4023 For TIFF images, specify image type @code{tiff}.
4024
4025 For PNG images, specify image type @code{png}.
4026
4027 @node Defining Images
4028 @subsection Defining Images
4029
4030 The functions @code{create-image}, @code{defimage} and
4031 @code{find-image} provide convenient ways to create image descriptors.
4032
4033 @defun create-image file-or-data &optional type data-p &rest props
4034 This function creates and returns an image descriptor which uses the
4035 data in @var{file-or-data}. @var{file-or-data} can be a file name or
4036 a string containing the image data; @var{data-p} should be @code{nil}
4037 for the former case, non-@code{nil} for the latter case.
4038
4039 The optional argument @var{type} is a symbol specifying the image type.
4040 If @var{type} is omitted or @code{nil}, @code{create-image} tries to
4041 determine the image type from the file's first few bytes, or else
4042 from the file's name.
4043
4044 The remaining arguments, @var{props}, specify additional image
4045 properties---for example,
4046
4047 @example
4048 (create-image "foo.xpm" 'xpm nil :heuristic-mask t)
4049 @end example
4050
4051 The function returns @code{nil} if images of this type are not
4052 supported. Otherwise it returns an image descriptor.
4053 @end defun
4054
4055 @defmac defimage symbol specs &optional doc
4056 This macro defines @var{symbol} as an image name. The arguments
4057 @var{specs} is a list which specifies how to display the image.
4058 The third argument, @var{doc}, is an optional documentation string.
4059
4060 Each argument in @var{specs} has the form of a property list, and each
4061 one should specify at least the @code{:type} property and either the
4062 @code{:file} or the @code{:data} property. The value of @code{:type}
4063 should be a symbol specifying the image type, the value of
4064 @code{:file} is the file to load the image from, and the value of
4065 @code{:data} is a string containing the actual image data. Here is an
4066 example:
4067
4068 @example
4069 (defimage test-image
4070 ((:type xpm :file "~/test1.xpm")
4071 (:type xbm :file "~/test1.xbm")))
4072 @end example
4073
4074 @code{defimage} tests each argument, one by one, to see if it is
4075 usable---that is, if the type is supported and the file exists. The
4076 first usable argument is used to make an image descriptor which is
4077 stored in @var{symbol}.
4078
4079 If none of the alternatives will work, then @var{symbol} is defined
4080 as @code{nil}.
4081 @end defmac
4082
4083 @defun find-image specs
4084 This function provides a convenient way to find an image satisfying one
4085 of a list of image specifications @var{specs}.
4086
4087 Each specification in @var{specs} is a property list with contents
4088 depending on image type. All specifications must at least contain the
4089 properties @code{:type @var{type}} and either @w{@code{:file @var{file}}}
4090 or @w{@code{:data @var{DATA}}}, where @var{type} is a symbol specifying
4091 the image type, e.g.@: @code{xbm}, @var{file} is the file to load the
4092 image from, and @var{data} is a string containing the actual image data.
4093 The first specification in the list whose @var{type} is supported, and
4094 @var{file} exists, is used to construct the image specification to be
4095 returned. If no specification is satisfied, @code{nil} is returned.
4096
4097 The image is looked for in @code{image-load-path}.
4098 @end defun
4099
4100 @defvar image-load-path
4101 This variable's value is a list of locations in which to search for
4102 image files. If an element is a string or a variable symbol whose
4103 value is a string, the string is taken to be the name of a directory
4104 to search. If an element is a variable symbol whose value is a list,
4105 that is taken to be a list of directory names to search.
4106
4107 The default is to search in the @file{images} subdirectory of the
4108 directory specified by @code{data-directory}, then the directory
4109 specified by @code{data-directory}, and finally in the directories in
4110 @code{load-path}. Subdirectories are not automatically included in
4111 the search, so if you put an image file in a subdirectory, you have to
4112 supply the subdirectory name explicitly. For example, to find the
4113 image @file{images/foo/bar.xpm} within @code{data-directory}, you
4114 should specify the image as follows:
4115
4116 @example
4117 (defimage foo-image '((:type xpm :file "foo/bar.xpm")))
4118 @end example
4119 @end defvar
4120
4121 @defun image-load-path-for-library library image &optional path no-error
4122 This function returns a suitable search path for images used by the
4123 Lisp package @var{library}.
4124
4125 The function searches for @var{image} first in @code{image-load-path}
4126 (excluding @file{@code{data-directory}/images}) and then in
4127 @code{load-path}, followed by a path suitable for @var{library}, which
4128 includes @file{../../etc/images} and @file{../etc/images} relative to
4129 the library file itself, and finally in
4130 @file{@code{data-directory}/images}.
4131
4132 Then this function returns a list of directories which contains first
4133 the directory in which @var{image} was found, followed by the value of
4134 @code{load-path}. If @var{path} is given, it is used instead of
4135 @code{load-path}.
4136
4137 If @var{no-error} is non-@code{nil} and a suitable path can't be
4138 found, don't signal an error. Instead, return a list of directories as
4139 before, except that @code{nil} appears in place of the image directory.
4140
4141 Here is an example that uses a common idiom to provide compatibility
4142 with versions of Emacs that lack the variable @code{image-load-path}:
4143
4144 @example
4145 (defvar image-load-path) ; shush compiler
4146 (let* ((load-path (image-load-path-for-library
4147 "mh-e" "mh-logo.xpm"))
4148 (image-load-path (cons (car load-path)
4149 (when (boundp 'image-load-path)
4150 image-load-path))))
4151 (mh-tool-bar-folder-buttons-init))
4152 @end example
4153 @end defun
4154
4155 @node Showing Images
4156 @subsection Showing Images
4157
4158 You can use an image descriptor by setting up the @code{display}
4159 property yourself, but it is easier to use the functions in this
4160 section.
4161
4162 @defun insert-image image &optional string area slice
4163 This function inserts @var{image} in the current buffer at point. The
4164 value @var{image} should be an image descriptor; it could be a value
4165 returned by @code{create-image}, or the value of a symbol defined with
4166 @code{defimage}. The argument @var{string} specifies the text to put
4167 in the buffer to hold the image. If it is omitted or @code{nil},
4168 @code{insert-image} uses @code{" "} by default.
4169
4170 The argument @var{area} specifies whether to put the image in a margin.
4171 If it is @code{left-margin}, the image appears in the left margin;
4172 @code{right-margin} specifies the right margin. If @var{area} is
4173 @code{nil} or omitted, the image is displayed at point within the
4174 buffer's text.
4175
4176 The argument @var{slice} specifies a slice of the image to insert. If
4177 @var{slice} is @code{nil} or omitted the whole image is inserted.
4178 Otherwise, @var{slice} is a list @code{(@var{x} @var{y} @var{width}
4179 @var{height})} which specifies the @var{x} and @var{y} positions and
4180 @var{width} and @var{height} of the image area to insert. Integer
4181 values are in units of pixels. A floating point number in the range
4182 0.0--1.0 stands for that fraction of the width or height of the entire
4183 image.
4184
4185 Internally, this function inserts @var{string} in the buffer, and gives
4186 it a @code{display} property which specifies @var{image}. @xref{Display
4187 Property}.
4188 @end defun
4189
4190 @defun insert-sliced-image image &optional string area rows cols
4191 This function inserts @var{image} in the current buffer at point, like
4192 @code{insert-image}, but splits the image into @var{rows}x@var{cols}
4193 equally sized slices.
4194 @end defun
4195
4196 @defun put-image image pos &optional string area
4197 This function puts image @var{image} in front of @var{pos} in the
4198 current buffer. The argument @var{pos} should be an integer or a
4199 marker. It specifies the buffer position where the image should appear.
4200 The argument @var{string} specifies the text that should hold the image
4201 as an alternative to the default.
4202
4203 The argument @var{image} must be an image descriptor, perhaps returned
4204 by @code{create-image} or stored by @code{defimage}.
4205
4206 The argument @var{area} specifies whether to put the image in a margin.
4207 If it is @code{left-margin}, the image appears in the left margin;
4208 @code{right-margin} specifies the right margin. If @var{area} is
4209 @code{nil} or omitted, the image is displayed at point within the
4210 buffer's text.
4211
4212 Internally, this function creates an overlay, and gives it a
4213 @code{before-string} property containing text that has a @code{display}
4214 property whose value is the image. (Whew!)
4215 @end defun
4216
4217 @defun remove-images start end &optional buffer
4218 This function removes images in @var{buffer} between positions
4219 @var{start} and @var{end}. If @var{buffer} is omitted or @code{nil},
4220 images are removed from the current buffer.
4221
4222 This removes only images that were put into @var{buffer} the way
4223 @code{put-image} does it, not images that were inserted with
4224 @code{insert-image} or in other ways.
4225 @end defun
4226
4227 @defun image-size spec &optional pixels frame
4228 This function returns the size of an image as a pair
4229 @w{@code{(@var{width} . @var{height})}}. @var{spec} is an image
4230 specification. @var{pixels} non-@code{nil} means return sizes
4231 measured in pixels, otherwise return sizes measured in canonical
4232 character units (fractions of the width/height of the frame's default
4233 font). @var{frame} is the frame on which the image will be displayed.
4234 @var{frame} null or omitted means use the selected frame (@pxref{Input
4235 Focus}).
4236 @end defun
4237
4238 @defvar max-image-size
4239 This variable is used to define the maximum size of image that Emacs
4240 will load. Emacs will refuse to load (and display) any image that is
4241 larger than this limit.
4242
4243 If the value is an integer, it directly specifies the maximum
4244 image height and width, measured in pixels. If it is a floating
4245 point number, it specifies the maximum image height and width
4246 as a ratio to the frame height and width. If the value is
4247 non-numeric, there is no explicit limit on the size of images.
4248
4249 The purpose of this variable is to prevent unreasonably large images
4250 from accidentally being loaded into Emacs. It only takes effect the
4251 first time an image is loaded. Once an image is placed in the image
4252 cache, it can always be displayed, even if the value of
4253 @var{max-image-size} is subsequently changed (@pxref{Image Cache}).
4254 @end defvar
4255
4256 @node Image Cache
4257 @subsection Image Cache
4258
4259 Emacs stores images in an image cache when it displays them, so it can
4260 display them again more efficiently. It removes an image from the cache
4261 when it hasn't been displayed for a specified period of time.
4262
4263 When an image is looked up in the cache, its specification is compared
4264 with cached image specifications using @code{equal}. This means that
4265 all images with equal specifications share the same image in the cache.
4266
4267 @defvar image-cache-eviction-delay
4268 This variable specifies the number of seconds an image can remain in the
4269 cache without being displayed. When an image is not displayed for this
4270 length of time, Emacs removes it from the image cache.
4271
4272 If the value is @code{nil}, Emacs does not remove images from the cache
4273 except when you explicitly clear it. This mode can be useful for
4274 debugging.
4275 @end defvar
4276
4277 @defun clear-image-cache &optional frame
4278 This function clears the image cache. If @var{frame} is non-@code{nil},
4279 only the cache for that frame is cleared. Otherwise all frames' caches
4280 are cleared.
4281 @end defun
4282
4283 @node Buttons
4284 @section Buttons
4285 @cindex buttons
4286 @cindex buttons in buffers
4287 @cindex clickable buttons in buffers
4288
4289 The @emph{button} package defines functions for inserting and
4290 manipulating clickable (with the mouse, or via keyboard commands)
4291 buttons in Emacs buffers, such as might be used for help hyper-links,
4292 etc. Emacs uses buttons for the hyper-links in help text and the like.
4293
4294 A button is essentially a set of properties attached (via text
4295 properties or overlays) to a region of text in an Emacs buffer. These
4296 properties are called @dfn{button properties}.
4297
4298 One of these properties (@code{action}) is a function, which will
4299 be called when the user invokes it using the keyboard or the mouse.
4300 The invoked function may then examine the button and use its other
4301 properties as desired.
4302
4303 In some ways the Emacs button package duplicates functionality offered
4304 by the widget package (@pxref{Top, , Introduction, widget, The Emacs
4305 Widget Library}), but the button package has the advantage that it is
4306 much faster, much smaller, and much simpler to use (for elisp
4307 programmers---for users, the result is about the same). The extra
4308 speed and space savings are useful mainly if you need to create many
4309 buttons in a buffer (for instance an @code{*Apropos*} buffer uses
4310 buttons to make entries clickable, and may contain many thousands of
4311 entries).
4312
4313 @menu
4314 * Button Properties:: Button properties with special meanings.
4315 * Button Types:: Defining common properties for classes of buttons.
4316 * Making Buttons:: Adding buttons to Emacs buffers.
4317 * Manipulating Buttons:: Getting and setting properties of buttons.
4318 * Button Buffer Commands:: Buffer-wide commands and bindings for buttons.
4319 @end menu
4320
4321 @node Button Properties
4322 @subsection Button Properties
4323 @cindex button properties
4324
4325 Buttons have an associated list of properties defining their
4326 appearance and behavior, and other arbitrary properties may be used
4327 for application specific purposes. Some properties that have special
4328 meaning to the button package include:
4329
4330 @table @code
4331 @item action
4332 @kindex action @r{(button property)}
4333 The function to call when the user invokes the button, which is passed
4334 the single argument @var{button}. By default this is @code{ignore},
4335 which does nothing.
4336
4337 @item mouse-action
4338 @kindex mouse-action @r{(button property)}
4339 This is similar to @code{action}, and when present, will be used
4340 instead of @code{action} for button invocations resulting from
4341 mouse-clicks (instead of the user hitting @key{RET}). If not
4342 present, mouse-clicks use @code{action} instead.
4343
4344 @item face
4345 @kindex face @r{(button property)}
4346 This is an Emacs face controlling how buttons of this type are
4347 displayed; by default this is the @code{button} face.
4348
4349 @item mouse-face
4350 @kindex mouse-face @r{(button property)}
4351 This is an additional face which controls appearance during
4352 mouse-overs (merged with the usual button face); by default this is
4353 the usual Emacs @code{highlight} face.
4354
4355 @item keymap
4356 @kindex keymap @r{(button property)}
4357 The button's keymap, defining bindings active within the button
4358 region. By default this is the usual button region keymap, stored
4359 in the variable @code{button-map}, which defines @key{RET} and
4360 @key{mouse-2} to invoke the button.
4361
4362 @item type
4363 @kindex type @r{(button property)}
4364 The button-type of the button. When creating a button, this is
4365 usually specified using the @code{:type} keyword argument.
4366 @xref{Button Types}.
4367
4368 @item help-echo
4369 @kindex help-index @r{(button property)}
4370 A string displayed by the Emacs tool-tip help system; by default,
4371 @code{"mouse-2, RET: Push this button"}.
4372
4373 @item follow-link
4374 @kindex follow-link @r{(button property)}
4375 The follow-link property, defining how a @key{Mouse-1} click behaves
4376 on this button, @xref{Links and Mouse-1}.
4377
4378 @item button
4379 @kindex button @r{(button property)}
4380 All buttons have a non-@code{nil} @code{button} property, which may be useful
4381 in finding regions of text that comprise buttons (which is what the
4382 standard button functions do).
4383 @end table
4384
4385 There are other properties defined for the regions of text in a
4386 button, but these are not generally interesting for typical uses.
4387
4388 @node Button Types
4389 @subsection Button Types
4390 @cindex button types
4391
4392 Every button has a button @emph{type}, which defines default values
4393 for the button's properties. Button types are arranged in a
4394 hierarchy, with specialized types inheriting from more general types,
4395 so that it's easy to define special-purpose types of buttons for
4396 specific tasks.
4397
4398 @defun define-button-type name &rest properties
4399 Define a `button type' called @var{name}. The remaining arguments
4400 form a sequence of @var{property value} pairs, specifying default
4401 property values for buttons with this type (a button's type may be set
4402 by giving it a @code{type} property when creating the button, using
4403 the @code{:type} keyword argument).
4404
4405 In addition, the keyword argument @code{:supertype} may be used to
4406 specify a button-type from which @var{name} inherits its default
4407 property values. Note that this inheritance happens only when
4408 @var{name} is defined; subsequent changes to a supertype are not
4409 reflected in its subtypes.
4410 @end defun
4411
4412 Using @code{define-button-type} to define default properties for
4413 buttons is not necessary---buttons without any specified type use the
4414 built-in button-type @code{button}---but it is encouraged, since
4415 doing so usually makes the resulting code clearer and more efficient.
4416
4417 @node Making Buttons
4418 @subsection Making Buttons
4419 @cindex making buttons
4420
4421 Buttons are associated with a region of text, using an overlay or
4422 text properties to hold button-specific information, all of which are
4423 initialized from the button's type (which defaults to the built-in
4424 button type @code{button}). Like all Emacs text, the appearance of
4425 the button is governed by the @code{face} property; by default (via
4426 the @code{face} property inherited from the @code{button} button-type)
4427 this is a simple underline, like a typical web-page link.
4428
4429 For convenience, there are two sorts of button-creation functions,
4430 those that add button properties to an existing region of a buffer,
4431 called @code{make-...button}, and those that also insert the button
4432 text, called @code{insert-...button}.
4433
4434 The button-creation functions all take the @code{&rest} argument
4435 @var{properties}, which should be a sequence of @var{property value}
4436 pairs, specifying properties to add to the button; see @ref{Button
4437 Properties}. In addition, the keyword argument @code{:type} may be
4438 used to specify a button-type from which to inherit other properties;
4439 see @ref{Button Types}. Any properties not explicitly specified
4440 during creation will be inherited from the button's type (if the type
4441 defines such a property).
4442
4443 The following functions add a button using an overlay
4444 (@pxref{Overlays}) to hold the button properties:
4445
4446 @defun make-button beg end &rest properties
4447 This makes a button from @var{beg} to @var{end} in the
4448 current buffer, and returns it.
4449 @end defun
4450
4451 @defun insert-button label &rest properties
4452 This insert a button with the label @var{label} at point,
4453 and returns it.
4454 @end defun
4455
4456 The following functions are similar, but use Emacs text properties
4457 (@pxref{Text Properties}) to hold the button properties, making the
4458 button actually part of the text instead of being a property of the
4459 buffer. Buttons using text properties do not create markers into the
4460 buffer, which is important for speed when you use extremely large
4461 numbers of buttons. Both functions return the position of the start
4462 of the new button:
4463
4464 @defun make-text-button beg end &rest properties
4465 This makes a button from @var{beg} to @var{end} in the current buffer, using
4466 text properties.
4467 @end defun
4468
4469 @defun insert-text-button label &rest properties
4470 This inserts a button with the label @var{label} at point, using text
4471 properties.
4472 @end defun
4473
4474 @node Manipulating Buttons
4475 @subsection Manipulating Buttons
4476 @cindex manipulating buttons
4477
4478 These are functions for getting and setting properties of buttons.
4479 Often these are used by a button's invocation function to determine
4480 what to do.
4481
4482 Where a @var{button} parameter is specified, it means an object
4483 referring to a specific button, either an overlay (for overlay
4484 buttons), or a buffer-position or marker (for text property buttons).
4485 Such an object is passed as the first argument to a button's
4486 invocation function when it is invoked.
4487
4488 @defun button-start button
4489 Return the position at which @var{button} starts.
4490 @end defun
4491
4492 @defun button-end button
4493 Return the position at which @var{button} ends.
4494 @end defun
4495
4496 @defun button-get button prop
4497 Get the property of button @var{button} named @var{prop}.
4498 @end defun
4499
4500 @defun button-put button prop val
4501 Set @var{button}'s @var{prop} property to @var{val}.
4502 @end defun
4503
4504 @defun button-activate button &optional use-mouse-action
4505 Call @var{button}'s @code{action} property (i.e., invoke it). If
4506 @var{use-mouse-action} is non-@code{nil}, try to invoke the button's
4507 @code{mouse-action} property instead of @code{action}; if the button
4508 has no @code{mouse-action} property, use @code{action} as normal.
4509 @end defun
4510
4511 @defun button-label button
4512 Return @var{button}'s text label.
4513 @end defun
4514
4515 @defun button-type button
4516 Return @var{button}'s button-type.
4517 @end defun
4518
4519 @defun button-has-type-p button type
4520 Return @code{t} if @var{button} has button-type @var{type}, or one of
4521 @var{type}'s subtypes.
4522 @end defun
4523
4524 @defun button-at pos
4525 Return the button at position @var{pos} in the current buffer, or @code{nil}.
4526 @end defun
4527
4528 @defun button-type-put type prop val
4529 Set the button-type @var{type}'s @var{prop} property to @var{val}.
4530 @end defun
4531
4532 @defun button-type-get type prop
4533 Get the property of button-type @var{type} named @var{prop}.
4534 @end defun
4535
4536 @defun button-type-subtype-p type supertype
4537 Return @code{t} if button-type @var{type} is a subtype of @var{supertype}.
4538 @end defun
4539
4540 @node Button Buffer Commands
4541 @subsection Button Buffer Commands
4542 @cindex button buffer commands
4543
4544 These are commands and functions for locating and operating on
4545 buttons in an Emacs buffer.
4546
4547 @code{push-button} is the command that a user uses to actually `push'
4548 a button, and is bound by default in the button itself to @key{RET}
4549 and to @key{mouse-2} using a region-specific keymap. Commands
4550 that are useful outside the buttons itself, such as
4551 @code{forward-button} and @code{backward-button} are additionally
4552 available in the keymap stored in @code{button-buffer-map}; a mode
4553 which uses buttons may want to use @code{button-buffer-map} as a
4554 parent keymap for its keymap.
4555
4556 If the button has a non-@code{nil} @code{follow-link} property, and
4557 @var{mouse-1-click-follows-link} is set, a quick @key{Mouse-1} click
4558 will also activate the @code{push-button} command.
4559 @xref{Links and Mouse-1}.
4560
4561 @deffn Command push-button &optional pos use-mouse-action
4562 Perform the action specified by a button at location @var{pos}.
4563 @var{pos} may be either a buffer position or a mouse-event. If
4564 @var{use-mouse-action} is non-@code{nil}, or @var{pos} is a
4565 mouse-event (@pxref{Mouse Events}), try to invoke the button's
4566 @code{mouse-action} property instead of @code{action}; if the button
4567 has no @code{mouse-action} property, use @code{action} as normal.
4568 @var{pos} defaults to point, except when @code{push-button} is invoked
4569 interactively as the result of a mouse-event, in which case, the mouse
4570 event's position is used. If there's no button at @var{pos}, do
4571 nothing and return @code{nil}, otherwise return @code{t}.
4572 @end deffn
4573
4574 @deffn Command forward-button n &optional wrap display-message
4575 Move to the @var{n}th next button, or @var{n}th previous button if
4576 @var{n} is negative. If @var{n} is zero, move to the start of any
4577 button at point. If @var{wrap} is non-@code{nil}, moving past either
4578 end of the buffer continues from the other end. If
4579 @var{display-message} is non-@code{nil}, the button's help-echo string
4580 is displayed. Any button with a non-@code{nil} @code{skip} property
4581 is skipped over. Returns the button found.
4582 @end deffn
4583
4584 @deffn Command backward-button n &optional wrap display-message
4585 Move to the @var{n}th previous button, or @var{n}th next button if
4586 @var{n} is negative. If @var{n} is zero, move to the start of any
4587 button at point. If @var{wrap} is non-@code{nil}, moving past either
4588 end of the buffer continues from the other end. If
4589 @var{display-message} is non-@code{nil}, the button's help-echo string
4590 is displayed. Any button with a non-@code{nil} @code{skip} property
4591 is skipped over. Returns the button found.
4592 @end deffn
4593
4594 @defun next-button pos &optional count-current
4595 Return the next button after position @var{pos} in the current buffer.
4596 If @var{count-current} is non-@code{nil}, count any button at
4597 @var{pos} in the search, instead of starting at the next button.
4598 @end defun
4599
4600 @defun previous-button pos &optional count-current
4601 Return the @var{n}th button before position @var{pos} in the current
4602 buffer. If @var{count-current} is non-@code{nil}, count any button at
4603 @var{pos} in the search, instead of starting at the next button.
4604 @end defun
4605
4606 @node Abstract Display
4607 @section Abstract Display
4608 @cindex ewoc
4609 @cindex display, abstract
4610 @cindex display, arbitrary objects
4611 @cindex model/view/controller
4612 @cindex view part, model/view/controller
4613
4614 The Ewoc package constructs buffer text that represents a structure
4615 of Lisp objects, and updates the text to follow changes in that
4616 structure. This is like the ``view'' component in the
4617 ``model/view/controller'' design paradigm.
4618
4619 An @dfn{ewoc} is a structure that organizes information required to
4620 construct buffer text that represents certain Lisp data. The buffer
4621 text of the ewoc has three parts, in order: first, fixed @dfn{header}
4622 text; next, textual descriptions of a series of data elements (Lisp
4623 objects that you specify); and last, fixed @dfn{footer} text.
4624 Specifically, an ewoc contains information on:
4625
4626 @itemize @bullet
4627 @item
4628 The buffer which its text is generated in.
4629
4630 @item
4631 The text's start position in the buffer.
4632
4633 @item
4634 The header and footer strings.
4635
4636 @item
4637 A doubly-linked chain of @dfn{nodes}, each of which contains:
4638
4639 @itemize
4640 @item
4641 A @dfn{data element}, a single Lisp object.
4642
4643 @item
4644 Links to the preceding and following nodes in the chain.
4645 @end itemize
4646
4647 @item
4648 A @dfn{pretty-printer} function which is responsible for
4649 inserting the textual representation of a data
4650 element value into the current buffer.
4651 @end itemize
4652
4653 Typically, you define an ewoc with @code{ewoc-create}, and then pass
4654 the resulting ewoc structure to other functions in the Ewoc package to
4655 build nodes within it, and display it in the buffer. Once it is
4656 displayed in the buffer, other functions determine the correspondance
4657 between buffer positions and nodes, move point from one node's textual
4658 representation to another, and so forth. @xref{Abstract Display
4659 Functions}.
4660
4661 A node @dfn{encapsulates} a data element much the way a variable
4662 holds a value. Normally, encapsulation occurs as a part of adding a
4663 node to the ewoc. You can retrieve the data element value and place a
4664 new value in its place, like so:
4665
4666 @lisp
4667 (ewoc-data @var{node})
4668 @result{} value
4669
4670 (ewoc-set-data @var{node} @var{new-value})
4671 @result{} @var{new-value}
4672 @end lisp
4673
4674 @noindent
4675 You can also use, as the data element value, a Lisp object (list or
4676 vector) that is a container for the ``real'' value, or an index into
4677 some other structure. The example (@pxref{Abstract Display Example})
4678 uses the latter approach.
4679
4680 When the data changes, you will want to update the text in the
4681 buffer. You can update all nodes by calling @code{ewoc-refresh}, or
4682 just specific nodes using @code{ewoc-invalidate}, or all nodes
4683 satisfying a predicate using @code{ewoc-map}. Alternatively, you can
4684 delete invalid nodes using @code{ewoc-delete} or @code{ewoc-filter},
4685 and add new nodes in their place. Deleting a node from an ewoc deletes
4686 its associated textual description from buffer, as well.
4687
4688 @menu
4689 * Abstract Display Functions::
4690 * Abstract Display Example::
4691 @end menu
4692
4693 @node Abstract Display Functions
4694 @subsection Abstract Display Functions
4695
4696 In this subsection, @var{ewoc} and @var{node} stand for the
4697 structures described above (@pxref{Abstract Display}), while
4698 @var{data} stands for an arbitrary Lisp object used as a data element.
4699
4700 @defun ewoc-create pretty-printer &optional header footer nosep
4701 This constructs and returns a new ewoc, with no nodes (and thus no data
4702 elements). @var{pretty-printer} should be a function that takes one
4703 argument, a data element of the sort you plan to use in this ewoc, and
4704 inserts its textual description at point using @code{insert} (and never
4705 @code{insert-before-markers}, because that would interfere with the
4706 Ewoc package's internal mechanisms).
4707
4708 Normally, a newline is automatically inserted after the header,
4709 the footer and every node's textual description. If @var{nosep}
4710 is non-@code{nil}, no newline is inserted. This may be useful for
4711 displaying an entire ewoc on a single line, for example, or for
4712 making nodes ``invisible'' by arranging for @var{pretty-printer}
4713 to do nothing for those nodes.
4714
4715 An ewoc maintains its text in the buffer that is current when
4716 you create it, so switch to the intended buffer before calling
4717 @code{ewoc-create}.
4718 @end defun
4719
4720 @defun ewoc-buffer ewoc
4721 This returns the buffer where @var{ewoc} maintains its text.
4722 @end defun
4723
4724 @defun ewoc-get-hf ewoc
4725 This returns a cons cell @code{(@var{header} . @var{footer})}
4726 made from @var{ewoc}'s header and footer.
4727 @end defun
4728
4729 @defun ewoc-set-hf ewoc header footer
4730 This sets the header and footer of @var{ewoc} to the strings
4731 @var{header} and @var{footer}, respectively.
4732 @end defun
4733
4734 @defun ewoc-enter-first ewoc data
4735 @defunx ewoc-enter-last ewoc data
4736 These add a new node encapsulating @var{data}, putting it, respectively,
4737 at the beginning or end of @var{ewoc}'s chain of nodes.
4738 @end defun
4739
4740 @defun ewoc-enter-before ewoc node data
4741 @defunx ewoc-enter-after ewoc node data
4742 These add a new node encapsulating @var{data}, adding it to
4743 @var{ewoc} before or after @var{node}, respectively.
4744 @end defun
4745
4746 @defun ewoc-prev ewoc node
4747 @defunx ewoc-next ewoc node
4748 These return, respectively, the previous node and the next node of @var{node}
4749 in @var{ewoc}.
4750 @end defun
4751
4752 @defun ewoc-nth ewoc n
4753 This returns the node in @var{ewoc} found at zero-based index @var{n}.
4754 A negative @var{n} means count from the end. @code{ewoc-nth} returns
4755 @code{nil} if @var{n} is out of range.
4756 @end defun
4757
4758 @defun ewoc-data node
4759 This extracts the data encapsulated by @var{node} and returns it.
4760 @end defun
4761
4762 @defun ewoc-set-data node data
4763 This sets the data encapsulated by @var{node} to @var{data}.
4764 @end defun
4765
4766 @defun ewoc-locate ewoc &optional pos guess
4767 This determines the node in @var{ewoc} which contains point (or
4768 @var{pos} if specified), and returns that node. If @var{ewoc} has no
4769 nodes, it returns @code{nil}. If @var{pos} is before the first node,
4770 it returns the first node; if @var{pos} is after the last node, it returns
4771 the last node. The optional third arg @var{guess}
4772 should be a node that is likely to be near @var{pos}; this doesn't
4773 alter the result, but makes the function run faster.
4774 @end defun
4775
4776 @defun ewoc-location node
4777 This returns the start position of @var{node}.
4778 @end defun
4779
4780 @defun ewoc-goto-prev ewoc arg
4781 @defunx ewoc-goto-next ewoc arg
4782 These move point to the previous or next, respectively, @var{arg}th node
4783 in @var{ewoc}. @code{ewoc-goto-prev} does not move if it is already at
4784 the first node or if @var{ewoc} is empty, whereas @code{ewoc-goto-next}
4785 moves past the last node, returning @code{nil}. Excepting this special
4786 case, these functions return the node moved to.
4787 @end defun
4788
4789 @defun ewoc-goto-node ewoc node
4790 This moves point to the start of @var{node} in @var{ewoc}.
4791 @end defun
4792
4793 @defun ewoc-refresh ewoc
4794 This function regenerates the text of @var{ewoc}. It works by
4795 deleting the text between the header and the footer, i.e., all the
4796 data elements' representations, and then calling the pretty-printer
4797 function for each node, one by one, in order.
4798 @end defun
4799
4800 @defun ewoc-invalidate ewoc &rest nodes
4801 This is similar to @code{ewoc-refresh}, except that only @var{nodes} in
4802 @var{ewoc} are updated instead of the entire set.
4803 @end defun
4804
4805 @defun ewoc-delete ewoc &rest nodes
4806 This deletes each node in @var{nodes} from @var{ewoc}.
4807 @end defun
4808
4809 @defun ewoc-filter ewoc predicate &rest args
4810 This calls @var{predicate} for each data element in @var{ewoc} and
4811 deletes those nodes for which @var{predicate} returns @code{nil}.
4812 Any @var{args} are passed to @var{predicate}.
4813 @end defun
4814
4815 @defun ewoc-collect ewoc predicate &rest args
4816 This calls @var{predicate} for each data element in @var{ewoc}
4817 and returns a list of those elements for which @var{predicate}
4818 returns non-@code{nil}. The elements in the list are ordered
4819 as in the buffer. Any @var{args} are passed to @var{predicate}.
4820 @end defun
4821
4822 @defun ewoc-map map-function ewoc &rest args
4823 This calls @var{map-function} for each data element in @var{ewoc} and
4824 updates those nodes for which @var{map-function} returns non-@code{nil}.
4825 Any @var{args} are passed to @var{map-function}.
4826 @end defun
4827
4828 @node Abstract Display Example
4829 @subsection Abstract Display Example
4830
4831 Here is a simple example using functions of the ewoc package to
4832 implement a ``color components display,'' an area in a buffer that
4833 represents a vector of three integers (itself representing a 24-bit RGB
4834 value) in various ways.
4835
4836 @example
4837 (setq colorcomp-ewoc nil
4838 colorcomp-data nil
4839 colorcomp-mode-map nil
4840 colorcomp-labels ["Red" "Green" "Blue"])
4841
4842 (defun colorcomp-pp (data)
4843 (if data
4844 (let ((comp (aref colorcomp-data data)))
4845 (insert (aref colorcomp-labels data) "\t: #x"
4846 (format "%02X" comp) " "
4847 (make-string (ash comp -2) ?#) "\n"))
4848 (let ((cstr (format "#%02X%02X%02X"
4849 (aref colorcomp-data 0)
4850 (aref colorcomp-data 1)
4851 (aref colorcomp-data 2)))
4852 (samp " (sample text) "))
4853 (insert "Color\t: "
4854 (propertize samp 'face `(foreground-color . ,cstr))
4855 (propertize samp 'face `(background-color . ,cstr))
4856 "\n"))))
4857
4858 (defun colorcomp (color)
4859 "Allow fiddling with COLOR in a new buffer.
4860 The buffer is in Color Components mode."
4861 (interactive "sColor (name or #RGB or #RRGGBB): ")
4862 (when (string= "" color)
4863 (setq color "green"))
4864 (unless (color-values color)
4865 (error "No such color: %S" color))
4866 (switch-to-buffer
4867 (generate-new-buffer (format "originally: %s" color)))
4868 (kill-all-local-variables)
4869 (setq major-mode 'colorcomp-mode
4870 mode-name "Color Components")
4871 (use-local-map colorcomp-mode-map)
4872 (erase-buffer)
4873 (buffer-disable-undo)
4874 (let ((data (apply 'vector (mapcar (lambda (n) (ash n -8))
4875 (color-values color))))
4876 (ewoc (ewoc-create 'colorcomp-pp
4877 "\nColor Components\n\n"
4878 (substitute-command-keys
4879 "\n\\@{colorcomp-mode-map@}"))))
4880 (set (make-local-variable 'colorcomp-data) data)
4881 (set (make-local-variable 'colorcomp-ewoc) ewoc)
4882 (ewoc-enter-last ewoc 0)
4883 (ewoc-enter-last ewoc 1)
4884 (ewoc-enter-last ewoc 2)
4885 (ewoc-enter-last ewoc nil)))
4886 @end example
4887
4888 @cindex controller part, model/view/controller
4889 This example can be extended to be a ``color selection widget'' (in
4890 other words, the controller part of the ``model/view/controller''
4891 design paradigm) by defining commands to modify @code{colorcomp-data}
4892 and to ``finish'' the selection process, and a keymap to tie it all
4893 together conveniently.
4894
4895 @smallexample
4896 (defun colorcomp-mod (index limit delta)
4897 (let ((cur (aref colorcomp-data index)))
4898 (unless (= limit cur)
4899 (aset colorcomp-data index (+ cur delta)))
4900 (ewoc-invalidate
4901 colorcomp-ewoc
4902 (ewoc-nth colorcomp-ewoc index)
4903 (ewoc-nth colorcomp-ewoc -1))))
4904
4905 (defun colorcomp-R-more () (interactive) (colorcomp-mod 0 255 1))
4906 (defun colorcomp-G-more () (interactive) (colorcomp-mod 1 255 1))
4907 (defun colorcomp-B-more () (interactive) (colorcomp-mod 2 255 1))
4908 (defun colorcomp-R-less () (interactive) (colorcomp-mod 0 0 -1))
4909 (defun colorcomp-G-less () (interactive) (colorcomp-mod 1 0 -1))
4910 (defun colorcomp-B-less () (interactive) (colorcomp-mod 2 0 -1))
4911
4912 (defun colorcomp-copy-as-kill-and-exit ()
4913 "Copy the color components into the kill ring and kill the buffer.
4914 The string is formatted #RRGGBB (hash followed by six hex digits)."
4915 (interactive)
4916 (kill-new (format "#%02X%02X%02X"
4917 (aref colorcomp-data 0)
4918 (aref colorcomp-data 1)
4919 (aref colorcomp-data 2)))
4920 (kill-buffer nil))
4921
4922 (setq colorcomp-mode-map
4923 (let ((m (make-sparse-keymap)))
4924 (suppress-keymap m)
4925 (define-key m "i" 'colorcomp-R-less)
4926 (define-key m "o" 'colorcomp-R-more)
4927 (define-key m "k" 'colorcomp-G-less)
4928 (define-key m "l" 'colorcomp-G-more)
4929 (define-key m "," 'colorcomp-B-less)
4930 (define-key m "." 'colorcomp-B-more)
4931 (define-key m " " 'colorcomp-copy-as-kill-and-exit)
4932 m))
4933 @end smallexample
4934
4935 Note that we never modify the data in each node, which is fixed when the
4936 ewoc is created to be either @code{nil} or an index into the vector
4937 @code{colorcomp-data}, the actual color components.
4938
4939 @node Blinking
4940 @section Blinking Parentheses
4941 @cindex parenthesis matching
4942 @cindex blinking
4943 @cindex balancing parentheses
4944 @cindex close parenthesis
4945
4946 This section describes the mechanism by which Emacs shows a matching
4947 open parenthesis when the user inserts a close parenthesis.
4948
4949 @defvar blink-paren-function
4950 The value of this variable should be a function (of no arguments) to
4951 be called whenever a character with close parenthesis syntax is inserted.
4952 The value of @code{blink-paren-function} may be @code{nil}, in which
4953 case nothing is done.
4954 @end defvar
4955
4956 @defopt blink-matching-paren
4957 If this variable is @code{nil}, then @code{blink-matching-open} does
4958 nothing.
4959 @end defopt
4960
4961 @defopt blink-matching-paren-distance
4962 This variable specifies the maximum distance to scan for a matching
4963 parenthesis before giving up.
4964 @end defopt
4965
4966 @defopt blink-matching-delay
4967 This variable specifies the number of seconds for the cursor to remain
4968 at the matching parenthesis. A fraction of a second often gives
4969 good results, but the default is 1, which works on all systems.
4970 @end defopt
4971
4972 @deffn Command blink-matching-open
4973 This function is the default value of @code{blink-paren-function}. It
4974 assumes that point follows a character with close parenthesis syntax and
4975 moves the cursor momentarily to the matching opening character. If that
4976 character is not already on the screen, it displays the character's
4977 context in the echo area. To avoid long delays, this function does not
4978 search farther than @code{blink-matching-paren-distance} characters.
4979
4980 Here is an example of calling this function explicitly.
4981
4982 @smallexample
4983 @group
4984 (defun interactive-blink-matching-open ()
4985 @c Do not break this line! -- rms.
4986 @c The first line of a doc string
4987 @c must stand alone.
4988 "Indicate momentarily the start of sexp before point."
4989 (interactive)
4990 @end group
4991 @group
4992 (let ((blink-matching-paren-distance
4993 (buffer-size))
4994 (blink-matching-paren t))
4995 (blink-matching-open)))
4996 @end group
4997 @end smallexample
4998 @end deffn
4999
5000 @node Usual Display
5001 @section Usual Display Conventions
5002
5003 The usual display conventions define how to display each character
5004 code. You can override these conventions by setting up a display table
5005 (@pxref{Display Tables}). Here are the usual display conventions:
5006
5007 @itemize @bullet
5008 @item
5009 Character codes 32 through 126 map to glyph codes 32 through 126.
5010 Normally this means they display as themselves.
5011
5012 @item
5013 Character code 9 is a horizontal tab. It displays as whitespace
5014 up to a position determined by @code{tab-width}.
5015
5016 @item
5017 Character code 10 is a newline.
5018
5019 @item
5020 All other codes in the range 0 through 31, and code 127, display in one
5021 of two ways according to the value of @code{ctl-arrow}. If it is
5022 non-@code{nil}, these codes map to sequences of two glyphs, where the
5023 first glyph is the @acronym{ASCII} code for @samp{^}. (A display table can
5024 specify a glyph to use instead of @samp{^}.) Otherwise, these codes map
5025 just like the codes in the range 128 to 255.
5026
5027 On MS-DOS terminals, Emacs arranges by default for the character code
5028 127 to be mapped to the glyph code 127, which normally displays as an
5029 empty polygon. This glyph is used to display non-@acronym{ASCII} characters
5030 that the MS-DOS terminal doesn't support. @xref{MS-DOS and MULE,,,
5031 emacs, The GNU Emacs Manual}.
5032
5033 @item
5034 Character codes 128 through 255 map to sequences of four glyphs, where
5035 the first glyph is the @acronym{ASCII} code for @samp{\}, and the others are
5036 digit characters representing the character code in octal. (A display
5037 table can specify a glyph to use instead of @samp{\}.)
5038
5039 @item
5040 Multibyte character codes above 256 are displayed as themselves, or as a
5041 question mark or empty box if the terminal cannot display that
5042 character.
5043 @end itemize
5044
5045 The usual display conventions apply even when there is a display
5046 table, for any character whose entry in the active display table is
5047 @code{nil}. Thus, when you set up a display table, you need only
5048 specify the characters for which you want special behavior.
5049
5050 These display rules apply to carriage return (character code 13), when
5051 it appears in the buffer. But that character may not appear in the
5052 buffer where you expect it, if it was eliminated as part of end-of-line
5053 conversion (@pxref{Coding System Basics}).
5054
5055 These variables affect the way certain characters are displayed on the
5056 screen. Since they change the number of columns the characters occupy,
5057 they also affect the indentation functions. These variables also affect
5058 how the mode line is displayed; if you want to force redisplay of the
5059 mode line using the new values, call the function
5060 @code{force-mode-line-update} (@pxref{Mode Line Format}).
5061
5062 @defopt ctl-arrow
5063 @cindex control characters in display
5064 This buffer-local variable controls how control characters are
5065 displayed. If it is non-@code{nil}, they are displayed as a caret
5066 followed by the character: @samp{^A}. If it is @code{nil}, they are
5067 displayed as a backslash followed by three octal digits: @samp{\001}.
5068 @end defopt
5069
5070 @c Following may have overfull hbox.
5071 @defvar default-ctl-arrow
5072 The value of this variable is the default value for @code{ctl-arrow} in
5073 buffers that do not override it. @xref{Default Value}.
5074 @end defvar
5075
5076 @defopt tab-width
5077 The value of this buffer-local variable is the spacing between tab
5078 stops used for displaying tab characters in Emacs buffers. The value
5079 is in units of columns, and the default is 8. Note that this feature
5080 is completely independent of the user-settable tab stops used by the
5081 command @code{tab-to-tab-stop}. @xref{Indent Tabs}.
5082 @end defopt
5083
5084 @node Display Tables
5085 @section Display Tables
5086
5087 @cindex display table
5088 You can use the @dfn{display table} feature to control how all possible
5089 character codes display on the screen. This is useful for displaying
5090 European languages that have letters not in the @acronym{ASCII} character
5091 set.
5092
5093 The display table maps each character code into a sequence of
5094 @dfn{glyphs}, each glyph being a graphic that takes up one character
5095 position on the screen. You can also define how to display each glyph
5096 on your terminal, using the @dfn{glyph table}.
5097
5098 Display tables affect how the mode line is displayed; if you want to
5099 force redisplay of the mode line using a new display table, call
5100 @code{force-mode-line-update} (@pxref{Mode Line Format}).
5101
5102 @menu
5103 * Display Table Format:: What a display table consists of.
5104 * Active Display Table:: How Emacs selects a display table to use.
5105 * Glyphs:: How to define a glyph, and what glyphs mean.
5106 @end menu
5107
5108 @node Display Table Format
5109 @subsection Display Table Format
5110
5111 A display table is actually a char-table (@pxref{Char-Tables}) with
5112 @code{display-table} as its subtype.
5113
5114 @defun make-display-table
5115 This creates and returns a display table. The table initially has
5116 @code{nil} in all elements.
5117 @end defun
5118
5119 The ordinary elements of the display table are indexed by character
5120 codes; the element at index @var{c} says how to display the character
5121 code @var{c}. The value should be @code{nil} or a vector of the
5122 glyphs to be output (@pxref{Glyphs}). @code{nil} says to display the
5123 character @var{c} according to the usual display conventions
5124 (@pxref{Usual Display}).
5125
5126 @strong{Warning:} if you use the display table to change the display
5127 of newline characters, the whole buffer will be displayed as one long
5128 ``line.''
5129
5130 The display table also has six ``extra slots'' which serve special
5131 purposes. Here is a table of their meanings; @code{nil} in any slot
5132 means to use the default for that slot, as stated below.
5133
5134 @table @asis
5135 @item 0
5136 The glyph for the end of a truncated screen line (the default for this
5137 is @samp{$}). @xref{Glyphs}. On graphical terminals, Emacs uses
5138 arrows in the fringes to indicate truncation, so the display table has
5139 no effect.
5140
5141 @item 1
5142 The glyph for the end of a continued line (the default is @samp{\}).
5143 On graphical terminals, Emacs uses curved arrows in the fringes to
5144 indicate continuation, so the display table has no effect.
5145
5146 @item 2
5147 The glyph for indicating a character displayed as an octal character
5148 code (the default is @samp{\}).
5149
5150 @item 3
5151 The glyph for indicating a control character (the default is @samp{^}).
5152
5153 @item 4
5154 A vector of glyphs for indicating the presence of invisible lines (the
5155 default is @samp{...}). @xref{Selective Display}.
5156
5157 @item 5
5158 The glyph used to draw the border between side-by-side windows (the
5159 default is @samp{|}). @xref{Splitting Windows}. This takes effect only
5160 when there are no scroll bars; if scroll bars are supported and in use,
5161 a scroll bar separates the two windows.
5162 @end table
5163
5164 For example, here is how to construct a display table that mimics the
5165 effect of setting @code{ctl-arrow} to a non-@code{nil} value:
5166
5167 @example
5168 (setq disptab (make-display-table))
5169 (let ((i 0))
5170 (while (< i 32)
5171 (or (= i ?\t) (= i ?\n)
5172 (aset disptab i (vector ?^ (+ i 64))))
5173 (setq i (1+ i)))
5174 (aset disptab 127 (vector ?^ ??)))
5175 @end example
5176
5177 @defun display-table-slot display-table slot
5178 This function returns the value of the extra slot @var{slot} of
5179 @var{display-table}. The argument @var{slot} may be a number from 0 to
5180 5 inclusive, or a slot name (symbol). Valid symbols are
5181 @code{truncation}, @code{wrap}, @code{escape}, @code{control},
5182 @code{selective-display}, and @code{vertical-border}.
5183 @end defun
5184
5185 @defun set-display-table-slot display-table slot value
5186 This function stores @var{value} in the extra slot @var{slot} of
5187 @var{display-table}. The argument @var{slot} may be a number from 0 to
5188 5 inclusive, or a slot name (symbol). Valid symbols are
5189 @code{truncation}, @code{wrap}, @code{escape}, @code{control},
5190 @code{selective-display}, and @code{vertical-border}.
5191 @end defun
5192
5193 @defun describe-display-table display-table
5194 This function displays a description of the display table
5195 @var{display-table} in a help buffer.
5196 @end defun
5197
5198 @deffn Command describe-current-display-table
5199 This command displays a description of the current display table in a
5200 help buffer.
5201 @end deffn
5202
5203 @node Active Display Table
5204 @subsection Active Display Table
5205 @cindex active display table
5206
5207 Each window can specify a display table, and so can each buffer. When
5208 a buffer @var{b} is displayed in window @var{w}, display uses the
5209 display table for window @var{w} if it has one; otherwise, the display
5210 table for buffer @var{b} if it has one; otherwise, the standard display
5211 table if any. The display table chosen is called the @dfn{active}
5212 display table.
5213
5214 @defun window-display-table &optional window
5215 This function returns @var{window}'s display table, or @code{nil}
5216 if @var{window} does not have an assigned display table. The default
5217 for @var{window} is the selected window.
5218 @end defun
5219
5220 @defun set-window-display-table window table
5221 This function sets the display table of @var{window} to @var{table}.
5222 The argument @var{table} should be either a display table or
5223 @code{nil}.
5224 @end defun
5225
5226 @defvar buffer-display-table
5227 This variable is automatically buffer-local in all buffers; its value in
5228 a particular buffer specifies the display table for that buffer. If it
5229 is @code{nil}, that means the buffer does not have an assigned display
5230 table.
5231 @end defvar
5232
5233 @defvar standard-display-table
5234 This variable's value is the default display table, used whenever a
5235 window has no display table and neither does the buffer displayed in
5236 that window. This variable is @code{nil} by default.
5237 @end defvar
5238
5239 If there is no display table to use for a particular window---that is,
5240 if the window specifies none, its buffer specifies none, and
5241 @code{standard-display-table} is @code{nil}---then Emacs uses the usual
5242 display conventions for all character codes in that window. @xref{Usual
5243 Display}.
5244
5245 A number of functions for changing the standard display table
5246 are defined in the library @file{disp-table}.
5247
5248 @node Glyphs
5249 @subsection Glyphs
5250
5251 @cindex glyph
5252 A @dfn{glyph} is a generalization of a character; it stands for an
5253 image that takes up a single character position on the screen. Glyphs
5254 are represented in Lisp as integers, just as characters are. Normally
5255 glyph come from vectors in the display table (@pxref{Display Tables}).
5256
5257 A glyph code can be @dfn{simple} or it can be defined by the
5258 @dfn{glyph table}. A simple glyph code is just a way of specifying a
5259 character and a face to output it in. When a glyph code is simple,
5260 the code, mod 524288, is the character to output, and the code divided
5261 by 524288 specifies the face number (@pxref{Face Functions}) to use
5262 while outputting it. (524288 is
5263 @ifnottex
5264 2**19.)
5265 @end ifnottex
5266 @tex
5267 $2^{19}$.)
5268 @end tex
5269 @xref{Faces}.
5270
5271 On character terminals, you can set up a @dfn{glyph table} to define
5272 the meaning of glyph codes.
5273
5274 @defvar glyph-table
5275 The value of this variable is the current glyph table. It should be
5276 @code{nil} or a vector whose @var{g}th element defines glyph code
5277 @var{g}.
5278
5279 If a glyph code is greater than or equal to the length of the glyph
5280 table, that code is automatically simple. If @code{glyph-table} is
5281 @code{nil} then all glyph codes are simple.
5282
5283 The glyph table is used only on character terminals. On graphical
5284 displays, all glyph codes are simple.
5285 @end defvar
5286
5287 Here are the meaningful types of elements in the glyph table:
5288
5289 @table @asis
5290 @item @var{string}
5291 Send the characters in @var{string} to the terminal to output
5292 this glyph code.
5293
5294 @item @var{integer}
5295 Define this glyph code as an alias for glyph code @var{integer}. You
5296 can use such an alias to define a small-numbered glyph code which
5297 specifies a face.
5298
5299 @item @code{nil}
5300 This glyph code is simple.
5301 @end table
5302
5303 @defun create-glyph string
5304 This function returns a newly-allocated glyph code which is set up to
5305 display by sending @var{string} to the terminal.
5306 @end defun
5307
5308 @node Beeping
5309 @section Beeping
5310 @cindex beeping
5311 @cindex bell
5312
5313 This section describes how to make Emacs ring the bell (or blink the
5314 screen) to attract the user's attention. Be conservative about how
5315 often you do this; frequent bells can become irritating. Also be
5316 careful not to use just beeping when signaling an error is more
5317 appropriate. (@xref{Errors}.)
5318
5319 @defun ding &optional do-not-terminate
5320 @cindex keyboard macro termination
5321 This function beeps, or flashes the screen (see @code{visible-bell} below).
5322 It also terminates any keyboard macro currently executing unless
5323 @var{do-not-terminate} is non-@code{nil}.
5324 @end defun
5325
5326 @defun beep &optional do-not-terminate
5327 This is a synonym for @code{ding}.
5328 @end defun
5329
5330 @defopt visible-bell
5331 This variable determines whether Emacs should flash the screen to
5332 represent a bell. Non-@code{nil} means yes, @code{nil} means no. This
5333 is effective on graphical displays, and on text-only terminals
5334 provided the terminal's Termcap entry defines the visible bell
5335 capability (@samp{vb}).
5336 @end defopt
5337
5338 @defvar ring-bell-function
5339 If this is non-@code{nil}, it specifies how Emacs should ``ring the
5340 bell.'' Its value should be a function of no arguments. If this is
5341 non-@code{nil}, it takes precedence over the @code{visible-bell}
5342 variable.
5343 @end defvar
5344
5345 @node Window Systems
5346 @section Window Systems
5347
5348 Emacs works with several window systems, most notably the X Window
5349 System. Both Emacs and X use the term ``window,'' but use it
5350 differently. An Emacs frame is a single window as far as X is
5351 concerned; the individual Emacs windows are not known to X at all.
5352
5353 @defvar window-system
5354 This variable tells Lisp programs what window system Emacs is running
5355 under. The possible values are
5356
5357 @table @code
5358 @item x
5359 @cindex X Window System
5360 Emacs is displaying using X.
5361 @item pc
5362 Emacs is displaying using MS-DOS.
5363 @item w32
5364 Emacs is displaying using Windows.
5365 @item mac
5366 Emacs is displaying using a Macintosh.
5367 @item nil
5368 Emacs is using a character-based terminal.
5369 @end table
5370 @end defvar
5371
5372 @defvar window-setup-hook
5373 This variable is a normal hook which Emacs runs after handling the
5374 initialization files. Emacs runs this hook after it has completed
5375 loading your init file, the default initialization file (if
5376 any), and the terminal-specific Lisp code, and running the hook
5377 @code{term-setup-hook}.
5378
5379 This hook is used for internal purposes: setting up communication with
5380 the window system, and creating the initial window. Users should not
5381 interfere with it.
5382 @end defvar
5383
5384 @ignore
5385 arch-tag: ffdf5714-7ecf-415b-9023-fbc6b409c2c6
5386 @end ignore