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