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