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