]> code.delx.au - gnu-emacs/blob - doc/lispref/display.texi
Merge from origin/emacs-24
[gnu-emacs] / doc / lispref / display.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-2015 Free Software Foundation, Inc.
4 @c See the file elisp.texi for copying conditions.
5 @node Display
6 @chapter Emacs Display
7
8 This chapter describes a number of features related to the display
9 that Emacs presents to the user.
10
11 @menu
12 * Refresh Screen:: Clearing the screen and redrawing everything on it.
13 * Forcing Redisplay:: Forcing redisplay.
14 * Truncation:: Folding or wrapping long text lines.
15 * The Echo Area:: Displaying messages at the bottom of the screen.
16 * Warnings:: Displaying warning messages for the user.
17 * Invisible Text:: Hiding part of the buffer text.
18 * Selective Display:: Hiding part of the buffer text (the old way).
19 * Temporary Displays:: Displays that go away automatically.
20 * Overlays:: Use overlays to highlight parts of the buffer.
21 * Size of Displayed Text:: How large displayed text is.
22 * Line Height:: Controlling the height of lines.
23 * Faces:: A face defines a graphics style for text characters:
24 font, colors, etc.
25 * Fringes:: Controlling window fringes.
26 * Scroll Bars:: Controlling scroll bars.
27 * Window Dividers:: Separating windows visually.
28 * Display Property:: Enabling special display features.
29 * Images:: Displaying images in Emacs buffers.
30 * Buttons:: Adding clickable buttons to Emacs buffers.
31 * Abstract Display:: Emacs's Widget for Object Collections.
32 * Blinking:: How Emacs shows the matching open parenthesis.
33 * Character Display:: How Emacs displays individual characters.
34 * Beeping:: Audible signal to the user.
35 * Window Systems:: Which window system is being used.
36 * Bidirectional Display:: Display of bidirectional scripts, such as
37 Arabic and Farsi.
38 @end menu
39
40 @node Refresh Screen
41 @section Refreshing the Screen
42 @cindex refresh the screen
43 @cindex screen refresh
44
45 The function @code{redraw-frame} clears and redisplays the entire
46 contents of a given frame (@pxref{Frames}). This is useful if the
47 screen is corrupted.
48
49 @defun redraw-frame frame
50 This function clears and redisplays frame @var{frame}.
51 @end defun
52
53 Even more powerful is @code{redraw-display}:
54
55 @deffn Command redraw-display
56 This function clears and redisplays all visible frames.
57 @end deffn
58
59 In Emacs, processing user input takes priority over redisplay. If
60 you call these functions when input is available, they don't redisplay
61 immediately, but the requested redisplay does happen
62 eventually---after all the input has been processed.
63
64 On text terminals, suspending and resuming Emacs normally also
65 refreshes the screen. Some terminal emulators record separate
66 contents for display-oriented programs such as Emacs and for ordinary
67 sequential display. If you are using such a terminal, you might want
68 to inhibit the redisplay on resumption.
69
70 @defopt no-redraw-on-reenter
71 @cindex suspend (cf. @code{no-redraw-on-reenter})
72 @cindex resume (cf. @code{no-redraw-on-reenter})
73 This variable controls whether Emacs redraws the entire screen after it
74 has been suspended and resumed. Non-@code{nil} means there is no need
75 to redraw, @code{nil} means redrawing is needed. The default is @code{nil}.
76 @end defopt
77
78 @node Forcing Redisplay
79 @section Forcing Redisplay
80 @cindex forcing redisplay
81
82 Emacs normally tries to redisplay the screen whenever it waits for
83 input. With the following function, you can request an immediate
84 attempt to redisplay, in the middle of Lisp code, without actually
85 waiting for input.
86
87 @defun redisplay &optional force
88 This function tries immediately to redisplay. The optional argument
89 @var{force}, if non-@code{nil}, forces the redisplay to be performed,
90 instead of being preempted if input is pending.
91
92 The function returns @code{t} if it actually tried to redisplay, and
93 @code{nil} otherwise. A value of @code{t} does not mean that
94 redisplay proceeded to completion; it could have been preempted by
95 newly arriving input.
96 @end defun
97
98 @defvar pre-redisplay-function
99 A function run just before redisplay. It is called with one argument,
100 the set of windows to redisplay.
101 @end defvar
102
103 Although @code{redisplay} tries immediately to redisplay, it does
104 not change how Emacs decides which parts of its frame(s) to redisplay.
105 By contrast, the following function adds certain windows to the
106 pending redisplay work (as if their contents had completely changed),
107 but does not immediately try to perform redisplay.
108
109 @defun force-window-update &optional object
110 This function forces some or all windows to be updated the next time
111 Emacs does a redisplay. If @var{object} is a window, that window is
112 to be updated. If @var{object} is a buffer or buffer name, all
113 windows displaying that buffer are to be updated. If @var{object} is
114 @code{nil} (or omitted), all windows are to be updated.
115
116 This function does not do a redisplay immediately; Emacs does that as
117 it waits for input, or when the function @code{redisplay} is called.
118 @end defun
119
120 @node Truncation
121 @section Truncation
122 @cindex line wrapping
123 @cindex line truncation
124 @cindex continuation lines
125 @cindex @samp{$} in display
126 @cindex @samp{\} in display
127
128 When a line of text extends beyond the right edge of a window, Emacs
129 can @dfn{continue} the line (make it ``wrap'' to the next screen
130 line), or @dfn{truncate} the line (limit it to one screen line). The
131 additional screen lines used to display a long text line are called
132 @dfn{continuation} lines. Continuation is not the same as filling;
133 continuation happens on the screen only, not in the buffer contents,
134 and it breaks a line precisely at the right margin, not at a word
135 boundary. @xref{Filling}.
136
137 On a graphical display, tiny arrow images in the window fringes
138 indicate truncated and continued lines (@pxref{Fringes}). On a text
139 terminal, a @samp{$} in the rightmost column of the window indicates
140 truncation; a @samp{\} on the rightmost column indicates a line that
141 ``wraps''. (The display table can specify alternate characters to use
142 for this; @pxref{Display Tables}).
143
144 @defopt truncate-lines
145 If this buffer-local variable is non-@code{nil}, lines that extend
146 beyond the right edge of the window are truncated; otherwise, they are
147 continued. As a special exception, the variable
148 @code{truncate-partial-width-windows} takes precedence in
149 @dfn{partial-width} windows (i.e., windows that do not occupy the
150 entire frame width).
151 @end defopt
152
153 @defopt truncate-partial-width-windows
154 @cindex partial-width windows
155 This variable controls line truncation in @dfn{partial-width} windows.
156 A partial-width window is one that does not occupy the entire frame
157 width (@pxref{Splitting Windows}). If the value is @code{nil}, line
158 truncation is determined by the variable @code{truncate-lines} (see
159 above). If the value is an integer @var{n}, lines are truncated if
160 the partial-width window has fewer than @var{n} columns, regardless of
161 the value of @code{truncate-lines}; if the partial-width window has
162 @var{n} or more columns, line truncation is determined by
163 @code{truncate-lines}. For any other non-@code{nil} value, lines are
164 truncated in every partial-width window, regardless of the value of
165 @code{truncate-lines}.
166 @end defopt
167
168 When horizontal scrolling (@pxref{Horizontal Scrolling}) is in use in
169 a window, that forces truncation.
170
171 @defvar wrap-prefix
172 If this buffer-local variable is non-@code{nil}, it defines a
173 @dfn{wrap prefix} which Emacs displays at the start of every
174 continuation line. (If lines are truncated, @code{wrap-prefix} is
175 never used.) Its value may be a string or an image (@pxref{Other
176 Display Specs}), or a stretch of whitespace such as specified by the
177 @code{:width} or @code{:align-to} display properties (@pxref{Specified
178 Space}). The value is interpreted in the same way as a @code{display}
179 text property. @xref{Display Property}.
180
181 A wrap prefix may also be specified for regions of text, using the
182 @code{wrap-prefix} text or overlay property. This takes precedence
183 over the @code{wrap-prefix} variable. @xref{Special Properties}.
184 @end defvar
185
186 @defvar line-prefix
187 If this buffer-local variable is non-@code{nil}, it defines a
188 @dfn{line prefix} which Emacs displays at the start of every
189 non-continuation line. Its value may be a string or an image
190 (@pxref{Other Display Specs}), or a stretch of whitespace such as
191 specified by the @code{:width} or @code{:align-to} display properties
192 (@pxref{Specified Space}). The value is interpreted in the same way
193 as a @code{display} text property. @xref{Display Property}.
194
195 A line prefix may also be specified for regions of text using the
196 @code{line-prefix} text or overlay property. This takes precedence
197 over the @code{line-prefix} variable. @xref{Special Properties}.
198 @end defvar
199
200 @ignore
201 If your buffer contains only very short lines, you might find it
202 advisable to set @code{cache-long-scans} to @code{nil}.
203
204 @defvar cache-long-scans
205 If this variable is non-@code{nil} (the default), various indentation
206 and motion functions, and Emacs redisplay, cache the results of
207 scanning the buffer, and consult the cache to avoid rescanning regions
208 of the buffer unless they are modified.
209
210 Turning off the cache speeds up processing of short lines somewhat.
211
212 This variable is automatically buffer-local in every buffer.
213 @end defvar
214 @end ignore
215
216 @node The Echo Area
217 @section The Echo Area
218 @cindex error display
219 @cindex echo area
220
221 @c FIXME: Why not use @xref{Minibuffers} directly? --xfq
222 The @dfn{echo area} is used for displaying error messages
223 (@pxref{Errors}), for messages made with the @code{message} primitive,
224 and for echoing keystrokes. It is not the same as the minibuffer,
225 despite the fact that the minibuffer appears (when active) in the same
226 place on the screen as the echo area. @xref{Minibuffer,, The
227 Minibuffer, emacs, The GNU Emacs Manual}.
228
229 Apart from the functions documented in this section, you can print
230 Lisp objects to the echo area by specifying @code{t} as the output
231 stream. @xref{Output Streams}.
232
233 @menu
234 * Displaying Messages:: Explicitly displaying text in the echo area.
235 * Progress:: Informing user about progress of a long operation.
236 * Logging Messages:: Echo area messages are logged for the user.
237 * Echo Area Customization:: Controlling the echo area.
238 @end menu
239
240 @node Displaying Messages
241 @subsection Displaying Messages in the Echo Area
242 @cindex display message in echo area
243
244 This section describes the standard functions for displaying
245 messages in the echo area.
246
247 @defun message format-string &rest arguments
248 This function displays a message in the echo area.
249 @var{format-string} is a format string, and @var{arguments} are the
250 objects for its format specifications, like in the @code{format}
251 function (@pxref{Formatting Strings}). The resulting formatted string
252 is displayed in the echo area; if it contains @code{face} text
253 properties, it is displayed with the specified faces (@pxref{Faces}).
254 The string is also added to the @file{*Messages*} buffer, but without
255 text properties (@pxref{Logging Messages}).
256
257 In batch mode, the message is printed to the standard error stream,
258 followed by a newline.
259
260 If @var{format-string} is @code{nil} or the empty string,
261 @code{message} clears the echo area; if the echo area has been
262 expanded automatically, this brings it back to its normal size. If
263 the minibuffer is active, this brings the minibuffer contents back
264 onto the screen immediately.
265
266 @example
267 @group
268 (message "Minibuffer depth is %d."
269 (minibuffer-depth))
270 @print{} Minibuffer depth is 0.
271 @result{} "Minibuffer depth is 0."
272 @end group
273
274 @group
275 ---------- Echo Area ----------
276 Minibuffer depth is 0.
277 ---------- Echo Area ----------
278 @end group
279 @end example
280
281 To automatically display a message in the echo area or in a pop-buffer,
282 depending on its size, use @code{display-message-or-buffer} (see below).
283 @end defun
284
285 @defmac with-temp-message message &rest body
286 This construct displays a message in the echo area temporarily, during
287 the execution of @var{body}. It displays @var{message}, executes
288 @var{body}, then returns the value of the last body form while restoring
289 the previous echo area contents.
290 @end defmac
291
292 @defun message-or-box format-string &rest arguments
293 This function displays a message like @code{message}, but may display it
294 in a dialog box instead of the echo area. If this function is called in
295 a command that was invoked using the mouse---more precisely, if
296 @code{last-nonmenu-event} (@pxref{Command Loop Info}) is either
297 @code{nil} or a list---then it uses a dialog box or pop-up menu to
298 display the message. Otherwise, it uses the echo area. (This is the
299 same criterion that @code{y-or-n-p} uses to make a similar decision; see
300 @ref{Yes-or-No Queries}.)
301
302 You can force use of the mouse or of the echo area by binding
303 @code{last-nonmenu-event} to a suitable value around the call.
304 @end defun
305
306 @defun message-box format-string &rest arguments
307 @anchor{message-box}
308 This function displays a message like @code{message}, but uses a dialog
309 box (or a pop-up menu) whenever that is possible. If it is impossible
310 to use a dialog box or pop-up menu, because the terminal does not
311 support them, then @code{message-box} uses the echo area, like
312 @code{message}.
313 @end defun
314
315 @defun display-message-or-buffer message &optional buffer-name not-this-window frame
316 This function displays the message @var{message}, which may be either a
317 string or a buffer. If it is shorter than the maximum height of the
318 echo area, as defined by @code{max-mini-window-height}, it is displayed
319 in the echo area, using @code{message}. Otherwise,
320 @code{display-buffer} is used to show it in a pop-up buffer.
321
322 Returns either the string shown in the echo area, or when a pop-up
323 buffer is used, the window used to display it.
324
325 If @var{message} is a string, then the optional argument
326 @var{buffer-name} is the name of the buffer used to display it when a
327 pop-up buffer is used, defaulting to @file{*Message*}. In the case
328 where @var{message} is a string and displayed in the echo area, it is
329 not specified whether the contents are inserted into the buffer anyway.
330
331 The optional arguments @var{not-this-window} and @var{frame} are as for
332 @code{display-buffer}, and only used if a buffer is displayed.
333 @end defun
334
335 @defun current-message
336 This function returns the message currently being displayed in the
337 echo area, or @code{nil} if there is none.
338 @end defun
339
340 @node Progress
341 @subsection Reporting Operation Progress
342 @cindex progress reporting
343
344 When an operation can take a while to finish, you should inform the
345 user about the progress it makes. This way the user can estimate
346 remaining time and clearly see that Emacs is busy working, not hung.
347 A convenient way to do this is to use a @dfn{progress reporter}.
348
349 Here is a working example that does nothing useful:
350
351 @smallexample
352 (let ((progress-reporter
353 (make-progress-reporter "Collecting mana for Emacs..."
354 0 500)))
355 (dotimes (k 500)
356 (sit-for 0.01)
357 (progress-reporter-update progress-reporter k))
358 (progress-reporter-done progress-reporter))
359 @end smallexample
360
361 @defun make-progress-reporter message &optional min-value max-value current-value min-change min-time
362 This function creates and returns a progress reporter object, which
363 you will use as an argument for the other functions listed below. The
364 idea is to precompute as much data as possible to make progress
365 reporting very fast.
366
367 When this progress reporter is subsequently used, it will display
368 @var{message} in the echo area, followed by progress percentage.
369 @var{message} is treated as a simple string. If you need it to depend
370 on a filename, for instance, use @code{format} before calling this
371 function.
372
373 The arguments @var{min-value} and @var{max-value} should be numbers
374 standing for the starting and final states of the operation. For
375 instance, an operation that ``scans'' a buffer should set these to the
376 results of @code{point-min} and @code{point-max} correspondingly.
377 @var{max-value} should be greater than @var{min-value}.
378
379 Alternatively, you can set @var{min-value} and @var{max-value} to
380 @code{nil}. In that case, the progress reporter does not report
381 process percentages; it instead displays a ``spinner'' that rotates a
382 notch each time you update the progress reporter.
383
384 If @var{min-value} and @var{max-value} are numbers, you can give the
385 argument @var{current-value} a numerical value specifying the initial
386 progress; if omitted, this defaults to @var{min-value}.
387
388 The remaining arguments control the rate of echo area updates. The
389 progress reporter will wait for at least @var{min-change} more
390 percents of the operation to be completed before printing next
391 message; the default is one percent. @var{min-time} specifies the
392 minimum time in seconds to pass between successive prints; the default
393 is 0.2 seconds. (On some operating systems, the progress reporter may
394 handle fractions of seconds with varying precision).
395
396 This function calls @code{progress-reporter-update}, so the first
397 message is printed immediately.
398 @end defun
399
400 @defun progress-reporter-update reporter &optional value
401 This function does the main work of reporting progress of your
402 operation. It displays the message of @var{reporter}, followed by
403 progress percentage determined by @var{value}. If percentage is zero,
404 or close enough according to the @var{min-change} and @var{min-time}
405 arguments, then it is omitted from the output.
406
407 @var{reporter} must be the result of a call to
408 @code{make-progress-reporter}. @var{value} specifies the current
409 state of your operation and must be between @var{min-value} and
410 @var{max-value} (inclusive) as passed to
411 @code{make-progress-reporter}. For instance, if you scan a buffer,
412 then @var{value} should be the result of a call to @code{point}.
413
414 This function respects @var{min-change} and @var{min-time} as passed
415 to @code{make-progress-reporter} and so does not output new messages
416 on every invocation. It is thus very fast and normally you should not
417 try to reduce the number of calls to it: resulting overhead will most
418 likely negate your effort.
419 @end defun
420
421 @defun progress-reporter-force-update reporter &optional value new-message
422 This function is similar to @code{progress-reporter-update} except
423 that it prints a message in the echo area unconditionally.
424
425 The first two arguments have the same meaning as for
426 @code{progress-reporter-update}. Optional @var{new-message} allows
427 you to change the message of the @var{reporter}. Since this function
428 always updates the echo area, such a change will be immediately
429 presented to the user.
430 @end defun
431
432 @defun progress-reporter-done reporter
433 This function should be called when the operation is finished. It
434 prints the message of @var{reporter} followed by word ``done'' in the
435 echo area.
436
437 You should always call this function and not hope for
438 @code{progress-reporter-update} to print ``100%''. Firstly, it may
439 never print it, there are many good reasons for this not to happen.
440 Secondly, ``done'' is more explicit.
441 @end defun
442
443 @defmac dotimes-with-progress-reporter (var count [result]) message body@dots{}
444 This is a convenience macro that works the same way as @code{dotimes}
445 does, but also reports loop progress using the functions described
446 above. It allows you to save some typing.
447
448 You can rewrite the example in the beginning of this node using
449 this macro this way:
450
451 @example
452 (dotimes-with-progress-reporter
453 (k 500)
454 "Collecting some mana for Emacs..."
455 (sit-for 0.01))
456 @end example
457 @end defmac
458
459 @node Logging Messages
460 @subsection Logging Messages in @file{*Messages*}
461 @cindex logging echo-area messages
462
463 Almost all the messages displayed in the echo area are also recorded
464 in the @file{*Messages*} buffer so that the user can refer back to
465 them. This includes all the messages that are output with
466 @code{message}. By default, this buffer is read-only and uses the major
467 mode @code{messages-buffer-mode}. Nothing prevents the user from
468 killing the @file{*Messages*} buffer, but the next display of a message
469 recreates it. Any Lisp code that needs to access the
470 @file{*Messages*} buffer directly and wants to ensure that it exists
471 should use the function @code{messages-buffer}.
472
473 @defun messages-buffer
474 This function returns the @file{*Messages*} buffer. If it does not
475 exist, it creates it, and switches it to @code{messages-buffer-mode}.
476 @end defun
477
478 @defopt message-log-max
479 This variable specifies how many lines to keep in the @file{*Messages*}
480 buffer. The value @code{t} means there is no limit on how many lines to
481 keep. The value @code{nil} disables message logging entirely. Here's
482 how to display a message and prevent it from being logged:
483
484 @example
485 (let (message-log-max)
486 (message @dots{}))
487 @end example
488 @end defopt
489
490 To make @file{*Messages*} more convenient for the user, the logging
491 facility combines successive identical messages. It also combines
492 successive related messages for the sake of two cases: question
493 followed by answer, and a series of progress messages.
494
495 A ``question followed by an answer'' means two messages like the
496 ones produced by @code{y-or-n-p}: the first is @samp{@var{question}},
497 and the second is @samp{@var{question}...@var{answer}}. The first
498 message conveys no additional information beyond what's in the second,
499 so logging the second message discards the first from the log.
500
501 A ``series of progress messages'' means successive messages like
502 those produced by @code{make-progress-reporter}. They have the form
503 @samp{@var{base}...@var{how-far}}, where @var{base} is the same each
504 time, while @var{how-far} varies. Logging each message in the series
505 discards the previous one, provided they are consecutive.
506
507 The functions @code{make-progress-reporter} and @code{y-or-n-p}
508 don't have to do anything special to activate the message log
509 combination feature. It operates whenever two consecutive messages
510 are logged that share a common prefix ending in @samp{...}.
511
512 @node Echo Area Customization
513 @subsection Echo Area Customization
514 @cindex echo area customization
515
516 These variables control details of how the echo area works.
517
518 @defvar cursor-in-echo-area
519 This variable controls where the cursor appears when a message is
520 displayed in the echo area. If it is non-@code{nil}, then the cursor
521 appears at the end of the message. Otherwise, the cursor appears at
522 point---not in the echo area at all.
523
524 The value is normally @code{nil}; Lisp programs bind it to @code{t}
525 for brief periods of time.
526 @end defvar
527
528 @defvar echo-area-clear-hook
529 This normal hook is run whenever the echo area is cleared---either by
530 @code{(message nil)} or for any other reason.
531 @end defvar
532
533 @defopt echo-keystrokes
534 This variable determines how much time should elapse before command
535 characters echo. Its value must be a number, and specifies the
536 number of seconds to wait before echoing. If the user types a prefix
537 key (such as @kbd{C-x}) and then delays this many seconds before
538 continuing, the prefix key is echoed in the echo area. (Once echoing
539 begins in a key sequence, all subsequent characters in the same key
540 sequence are echoed immediately.)
541
542 If the value is zero, then command input is not echoed.
543 @end defopt
544
545 @defvar message-truncate-lines
546 Normally, displaying a long message resizes the echo area to display
547 the entire message. But if the variable @code{message-truncate-lines}
548 is non-@code{nil}, the echo area does not resize, and the message is
549 truncated to fit it.
550 @end defvar
551
552 The variable @code{max-mini-window-height}, which specifies the
553 maximum height for resizing minibuffer windows, also applies to the
554 echo area (which is really a special use of the minibuffer window;
555 @pxref{Minibuffer Misc}).
556
557 @node Warnings
558 @section Reporting Warnings
559 @cindex warnings
560
561 @dfn{Warnings} are a facility for a program to inform the user of a
562 possible problem, but continue running.
563
564 @menu
565 * Warning Basics:: Warnings concepts and functions to report them.
566 * Warning Variables:: Variables programs bind to customize their warnings.
567 * Warning Options:: Variables users set to control display of warnings.
568 * Delayed Warnings:: Deferring a warning until the end of a command.
569 @end menu
570
571 @node Warning Basics
572 @subsection Warning Basics
573 @cindex severity level
574
575 Every warning has a textual message, which explains the problem for
576 the user, and a @dfn{severity level} which is a symbol. Here are the
577 possible severity levels, in order of decreasing severity, and their
578 meanings:
579
580 @table @code
581 @item :emergency
582 A problem that will seriously impair Emacs operation soon
583 if you do not attend to it promptly.
584 @item :error
585 A report of data or circumstances that are inherently wrong.
586 @item :warning
587 A report of data or circumstances that are not inherently wrong, but
588 raise suspicion of a possible problem.
589 @item :debug
590 A report of information that may be useful if you are debugging.
591 @end table
592
593 When your program encounters invalid input data, it can either
594 signal a Lisp error by calling @code{error} or @code{signal} or report
595 a warning with severity @code{:error}. Signaling a Lisp error is the
596 easiest thing to do, but it means the program cannot continue
597 processing. If you want to take the trouble to implement a way to
598 continue processing despite the bad data, then reporting a warning of
599 severity @code{:error} is the right way to inform the user of the
600 problem. For instance, the Emacs Lisp byte compiler can report an
601 error that way and continue compiling other functions. (If the
602 program signals a Lisp error and then handles it with
603 @code{condition-case}, the user won't see the error message; it could
604 show the message to the user by reporting it as a warning.)
605
606 @c FIXME: Why use "(bytecomp)" instead of "'bytecomp" or simply
607 @c "bytecomp" here? The parens are part of warning-type-format but
608 @c not part of the warning type. --xfq
609 @cindex warning type
610 Each warning has a @dfn{warning type} to classify it. The type is a
611 list of symbols. The first symbol should be the custom group that you
612 use for the program's user options. For example, byte compiler
613 warnings use the warning type @code{(bytecomp)}. You can also
614 subcategorize the warnings, if you wish, by using more symbols in the
615 list.
616
617 @defun display-warning type message &optional level buffer-name
618 This function reports a warning, using @var{message} as the message
619 and @var{type} as the warning type. @var{level} should be the
620 severity level, with @code{:warning} being the default.
621
622 @var{buffer-name}, if non-@code{nil}, specifies the name of the buffer
623 for logging the warning. By default, it is @file{*Warnings*}.
624 @end defun
625
626 @defun lwarn type level message &rest args
627 This function reports a warning using the value of @code{(format
628 @var{message} @var{args}...)} as the message in the @file{*Warnings*}
629 buffer. In other respects it is equivalent to @code{display-warning}.
630 @end defun
631
632 @defun warn message &rest args
633 This function reports a warning using the value of @code{(format
634 @var{message} @var{args}...)} as the message, @code{(emacs)} as the
635 type, and @code{:warning} as the severity level. It exists for
636 compatibility only; we recommend not using it, because you should
637 specify a specific warning type.
638 @end defun
639
640 @node Warning Variables
641 @subsection Warning Variables
642 @cindex warning variables
643
644 Programs can customize how their warnings appear by binding
645 the variables described in this section.
646
647 @defvar warning-levels
648 This list defines the meaning and severity order of the warning
649 severity levels. Each element defines one severity level,
650 and they are arranged in order of decreasing severity.
651
652 Each element has the form @code{(@var{level} @var{string}
653 @var{function})}, where @var{level} is the severity level it defines.
654 @var{string} specifies the textual description of this level.
655 @var{string} should use @samp{%s} to specify where to put the warning
656 type information, or it can omit the @samp{%s} so as not to include
657 that information.
658
659 The optional @var{function}, if non-@code{nil}, is a function to call
660 with no arguments, to get the user's attention.
661
662 Normally you should not change the value of this variable.
663 @end defvar
664
665 @defvar warning-prefix-function
666 If non-@code{nil}, the value is a function to generate prefix text for
667 warnings. Programs can bind the variable to a suitable function.
668 @code{display-warning} calls this function with the warnings buffer
669 current, and the function can insert text in it. That text becomes
670 the beginning of the warning message.
671
672 The function is called with two arguments, the severity level and its
673 entry in @code{warning-levels}. It should return a list to use as the
674 entry (this value need not be an actual member of
675 @code{warning-levels}). By constructing this value, the function can
676 change the severity of the warning, or specify different handling for
677 a given severity level.
678
679 If the variable's value is @code{nil} then there is no function
680 to call.
681 @end defvar
682
683 @defvar warning-series
684 Programs can bind this variable to @code{t} to say that the next
685 warning should begin a series. When several warnings form a series,
686 that means to leave point on the first warning of the series, rather
687 than keep moving it for each warning so that it appears on the last one.
688 The series ends when the local binding is unbound and
689 @code{warning-series} becomes @code{nil} again.
690
691 The value can also be a symbol with a function definition. That is
692 equivalent to @code{t}, except that the next warning will also call
693 the function with no arguments with the warnings buffer current. The
694 function can insert text which will serve as a header for the series
695 of warnings.
696
697 Once a series has begun, the value is a marker which points to the
698 buffer position in the warnings buffer of the start of the series.
699
700 The variable's normal value is @code{nil}, which means to handle
701 each warning separately.
702 @end defvar
703
704 @defvar warning-fill-prefix
705 When this variable is non-@code{nil}, it specifies a fill prefix to
706 use for filling each warning's text.
707 @end defvar
708
709 @defvar warning-type-format
710 This variable specifies the format for displaying the warning type
711 in the warning message. The result of formatting the type this way
712 gets included in the message under the control of the string in the
713 entry in @code{warning-levels}. The default value is @code{" (%s)"}.
714 If you bind it to @code{""} then the warning type won't appear at
715 all.
716 @end defvar
717
718 @node Warning Options
719 @subsection Warning Options
720 @cindex warning options
721
722 These variables are used by users to control what happens
723 when a Lisp program reports a warning.
724
725 @defopt warning-minimum-level
726 This user option specifies the minimum severity level that should be
727 shown immediately to the user. The default is @code{:warning}, which
728 means to immediately display all warnings except @code{:debug}
729 warnings.
730 @end defopt
731
732 @defopt warning-minimum-log-level
733 This user option specifies the minimum severity level that should be
734 logged in the warnings buffer. The default is @code{:warning}, which
735 means to log all warnings except @code{:debug} warnings.
736 @end defopt
737
738 @defopt warning-suppress-types
739 This list specifies which warning types should not be displayed
740 immediately for the user. Each element of the list should be a list
741 of symbols. If its elements match the first elements in a warning
742 type, then that warning is not displayed immediately.
743 @end defopt
744
745 @defopt warning-suppress-log-types
746 This list specifies which warning types should not be logged in the
747 warnings buffer. Each element of the list should be a list of
748 symbols. If it matches the first few elements in a warning type, then
749 that warning is not logged.
750 @end defopt
751
752 @node Delayed Warnings
753 @subsection Delayed Warnings
754 @cindex delayed warnings
755
756 Sometimes, you may wish to avoid showing a warning while a command is
757 running, and only show it only after the end of the command. You can
758 use the variable @code{delayed-warnings-list} for this.
759
760 @defvar delayed-warnings-list
761 The value of this variable is a list of warnings to be displayed after
762 the current command has finished. Each element must be a list
763
764 @smallexample
765 (@var{type} @var{message} [@var{level} [@var{buffer-name}]])
766 @end smallexample
767
768 @noindent
769 with the same form, and the same meanings, as the argument list of
770 @code{display-warning} (@pxref{Warning Basics}). Immediately after
771 running @code{post-command-hook} (@pxref{Command Overview}), the Emacs
772 command loop displays all the warnings specified by this variable,
773 then resets it to @code{nil}.
774 @end defvar
775
776 Programs which need to further customize the delayed warnings
777 mechanism can change the variable @code{delayed-warnings-hook}:
778
779 @defvar delayed-warnings-hook
780 This is a normal hook which is run by the Emacs command loop, after
781 @code{post-command-hook}, in order to to process and display delayed
782 warnings.
783
784 Its default value is a list of two functions:
785
786 @smallexample
787 (collapse-delayed-warnings display-delayed-warnings)
788 @end smallexample
789
790 @findex collapse-delayed-warnings
791 @findex display-delayed-warnings
792 @noindent
793 The function @code{collapse-delayed-warnings} removes repeated entries
794 from @code{delayed-warnings-list}. The function
795 @code{display-delayed-warnings} calls @code{display-warning} on each
796 of the entries in @code{delayed-warnings-list}, in turn, and then sets
797 @code{delayed-warnings-list} to @code{nil}.
798 @end defvar
799
800 @node Invisible Text
801 @section Invisible Text
802
803 @cindex invisible text
804 You can make characters @dfn{invisible}, so that they do not appear on
805 the screen, with the @code{invisible} property. This can be either a
806 text property (@pxref{Text Properties}) or an overlay property
807 (@pxref{Overlays}). Cursor motion also partly ignores these
808 characters; if the command loop finds that point is inside a range of
809 invisible text after a command, it relocates point to the other side
810 of the text.
811
812 In the simplest case, any non-@code{nil} @code{invisible} property makes
813 a character invisible. This is the default case---if you don't alter
814 the default value of @code{buffer-invisibility-spec}, this is how the
815 @code{invisible} property works. You should normally use @code{t}
816 as the value of the @code{invisible} property if you don't plan
817 to set @code{buffer-invisibility-spec} yourself.
818
819 More generally, you can use the variable @code{buffer-invisibility-spec}
820 to control which values of the @code{invisible} property make text
821 invisible. This permits you to classify the text into different subsets
822 in advance, by giving them different @code{invisible} values, and
823 subsequently make various subsets visible or invisible by changing the
824 value of @code{buffer-invisibility-spec}.
825
826 Controlling visibility with @code{buffer-invisibility-spec} is
827 especially useful in a program to display the list of entries in a
828 database. It permits the implementation of convenient filtering
829 commands to view just a part of the entries in the database. Setting
830 this variable is very fast, much faster than scanning all the text in
831 the buffer looking for properties to change.
832
833 @defvar buffer-invisibility-spec
834 This variable specifies which kinds of @code{invisible} properties
835 actually make a character invisible. Setting this variable makes it
836 buffer-local.
837
838 @table @asis
839 @item @code{t}
840 A character is invisible if its @code{invisible} property is
841 non-@code{nil}. This is the default.
842
843 @item a list
844 Each element of the list specifies a criterion for invisibility; if a
845 character's @code{invisible} property fits any one of these criteria,
846 the character is invisible. The list can have two kinds of elements:
847
848 @table @code
849 @item @var{atom}
850 A character is invisible if its @code{invisible} property value is
851 @var{atom} or if it is a list with @var{atom} as a member; comparison
852 is done with @code{eq}.
853
854 @item (@var{atom} . t)
855 A character is invisible if its @code{invisible} property value is
856 @var{atom} or if it is a list with @var{atom} as a member; comparison
857 is done with @code{eq}. Moreover, a sequence of such characters
858 displays as an ellipsis.
859 @end table
860 @end table
861 @end defvar
862
863 Two functions are specifically provided for adding elements to
864 @code{buffer-invisibility-spec} and removing elements from it.
865
866 @defun add-to-invisibility-spec element
867 This function adds the element @var{element} to
868 @code{buffer-invisibility-spec}. If @code{buffer-invisibility-spec}
869 was @code{t}, it changes to a list, @code{(t)}, so that text whose
870 @code{invisible} property is @code{t} remains invisible.
871 @end defun
872
873 @defun remove-from-invisibility-spec element
874 This removes the element @var{element} from
875 @code{buffer-invisibility-spec}. This does nothing if @var{element}
876 is not in the list.
877 @end defun
878
879 A convention for use of @code{buffer-invisibility-spec} is that a
880 major mode should use the mode's own name as an element of
881 @code{buffer-invisibility-spec} and as the value of the
882 @code{invisible} property:
883
884 @example
885 ;; @r{If you want to display an ellipsis:}
886 (add-to-invisibility-spec '(my-symbol . t))
887 ;; @r{If you don't want ellipsis:}
888 (add-to-invisibility-spec 'my-symbol)
889
890 (overlay-put (make-overlay beginning end)
891 'invisible 'my-symbol)
892
893 ;; @r{When done with the invisibility:}
894 (remove-from-invisibility-spec '(my-symbol . t))
895 ;; @r{Or respectively:}
896 (remove-from-invisibility-spec 'my-symbol)
897 @end example
898
899 You can check for invisibility using the following function:
900
901 @defun invisible-p pos-or-prop
902 If @var{pos-or-prop} is a marker or number, this function returns a
903 non-@code{nil} value if the text at that position is invisible.
904
905 If @var{pos-or-prop} is any other kind of Lisp object, that is taken
906 to mean a possible value of the @code{invisible} text or overlay
907 property. In that case, this function returns a non-@code{nil} value
908 if that value would cause text to become invisible, based on the
909 current value of @code{buffer-invisibility-spec}.
910 @end defun
911
912 @vindex line-move-ignore-invisible
913 Ordinarily, functions that operate on text or move point do not care
914 whether the text is invisible, they process invisible characters and
915 visible characters alike. The user-level line motion commands,
916 such as @code{next-line}, @code{previous-line}, ignore invisible
917 newlines if @code{line-move-ignore-invisible} is non-@code{nil} (the
918 default), i.e., behave like these invisible newlines didn't exist in
919 the buffer, but only because they are explicitly programmed to do so.
920
921 If a command ends with point inside or at the boundary of
922 invisible text, the main editing loop relocates point to one of the
923 two ends of the invisible text. Emacs chooses the direction of
924 relocation so that it is the same as the overall movement direction of
925 the command; if in doubt, it prefers a position where an inserted char
926 would not inherit the @code{invisible} property. Additionally, if the
927 text is not replaced by an ellipsis and the command only moved within
928 the invisible text, then point is moved one extra character so as to
929 try and reflect the command's movement by a visible movement of the
930 cursor.
931
932 Thus, if the command moved point back to an invisible range (with the usual
933 stickiness), Emacs moves point back to the beginning of that range. If the
934 command moved point forward into an invisible range, Emacs moves point forward
935 to the first visible character that follows the invisible text and then forward
936 one more character.
937
938 These @dfn{adjustments} of point that ended up in the middle of
939 invisible text can be disabled by setting @code{disable-point-adjustment}
940 to a non-@code{nil} value. @xref{Adjusting Point}.
941
942 Incremental search can make invisible overlays visible temporarily
943 and/or permanently when a match includes invisible text. To enable
944 this, the overlay should have a non-@code{nil}
945 @code{isearch-open-invisible} property. The property value should be a
946 function to be called with the overlay as an argument. This function
947 should make the overlay visible permanently; it is used when the match
948 overlaps the overlay on exit from the search.
949
950 During the search, such overlays are made temporarily visible by
951 temporarily modifying their invisible and intangible properties. If you
952 want this to be done differently for a certain overlay, give it an
953 @code{isearch-open-invisible-temporary} property which is a function.
954 The function is called with two arguments: the first is the overlay, and
955 the second is @code{nil} to make the overlay visible, or @code{t} to
956 make it invisible again.
957
958 @node Selective Display
959 @section Selective Display
960 @c @cindex selective display Duplicates selective-display
961
962 @dfn{Selective display} refers to a pair of related features for
963 hiding certain lines on the screen.
964
965 @cindex explicit selective display
966 The first variant, explicit selective display, was designed for use in a Lisp
967 program: it controls which lines are hidden by altering the text. This kind of
968 hiding is now obsolete; instead you can get the same effect with the
969 @code{invisible} property (@pxref{Invisible Text}).
970
971 In the second variant, the choice of lines to hide is made
972 automatically based on indentation. This variant is designed to be a
973 user-level feature.
974
975 The way you control explicit selective display is by replacing a
976 newline (control-j) with a carriage return (control-m). The text that
977 was formerly a line following that newline is now hidden. Strictly
978 speaking, it is temporarily no longer a line at all, since only
979 newlines can separate lines; it is now part of the previous line.
980
981 Selective display does not directly affect editing commands. For
982 example, @kbd{C-f} (@code{forward-char}) moves point unhesitatingly
983 into hidden text. However, the replacement of newline characters with
984 carriage return characters affects some editing commands. For
985 example, @code{next-line} skips hidden lines, since it searches only
986 for newlines. Modes that use selective display can also define
987 commands that take account of the newlines, or that control which
988 parts of the text are hidden.
989
990 When you write a selectively displayed buffer into a file, all the
991 control-m's are output as newlines. This means that when you next read
992 in the file, it looks OK, with nothing hidden. The selective display
993 effect is seen only within Emacs.
994
995 @defvar selective-display
996 This buffer-local variable enables selective display. This means that
997 lines, or portions of lines, may be made hidden.
998
999 @itemize @bullet
1000 @item
1001 If the value of @code{selective-display} is @code{t}, then the character
1002 control-m marks the start of hidden text; the control-m, and the rest
1003 of the line following it, are not displayed. This is explicit selective
1004 display.
1005
1006 @item
1007 If the value of @code{selective-display} is a positive integer, then
1008 lines that start with more than that many columns of indentation are not
1009 displayed.
1010 @end itemize
1011
1012 When some portion of a buffer is hidden, the vertical movement
1013 commands operate as if that portion did not exist, allowing a single
1014 @code{next-line} command to skip any number of hidden lines.
1015 However, character movement commands (such as @code{forward-char}) do
1016 not skip the hidden portion, and it is possible (if tricky) to insert
1017 or delete text in an hidden portion.
1018
1019 In the examples below, we show the @emph{display appearance} of the
1020 buffer @code{foo}, which changes with the value of
1021 @code{selective-display}. The @emph{contents} of the buffer do not
1022 change.
1023
1024 @example
1025 @group
1026 (setq selective-display nil)
1027 @result{} nil
1028
1029 ---------- Buffer: foo ----------
1030 1 on this column
1031 2on this column
1032 3n this column
1033 3n this column
1034 2on this column
1035 1 on this column
1036 ---------- Buffer: foo ----------
1037 @end group
1038
1039 @group
1040 (setq selective-display 2)
1041 @result{} 2
1042
1043 ---------- Buffer: foo ----------
1044 1 on this column
1045 2on this column
1046 2on this column
1047 1 on this column
1048 ---------- Buffer: foo ----------
1049 @end group
1050 @end example
1051 @end defvar
1052
1053 @defopt selective-display-ellipses
1054 If this buffer-local variable is non-@code{nil}, then Emacs displays
1055 @samp{@dots{}} at the end of a line that is followed by hidden text.
1056 This example is a continuation of the previous one.
1057
1058 @example
1059 @group
1060 (setq selective-display-ellipses t)
1061 @result{} t
1062
1063 ---------- Buffer: foo ----------
1064 1 on this column
1065 2on this column ...
1066 2on this column
1067 1 on this column
1068 ---------- Buffer: foo ----------
1069 @end group
1070 @end example
1071
1072 You can use a display table to substitute other text for the ellipsis
1073 (@samp{@dots{}}). @xref{Display Tables}.
1074 @end defopt
1075
1076 @node Temporary Displays
1077 @section Temporary Displays
1078 @cindex temporary display
1079 @cindex temporary buffer display
1080
1081 Temporary displays are used by Lisp programs to put output into a
1082 buffer and then present it to the user for perusal rather than for
1083 editing. Many help commands use this feature.
1084
1085 @defmac with-output-to-temp-buffer buffer-name body@dots{}
1086 This function executes the forms in @var{body} while arranging to insert
1087 any output they print into the buffer named @var{buffer-name}, which is
1088 first created if necessary, and put into Help mode. (See the similar
1089 form @code{with-temp-buffer-window} below.) Finally, the buffer is
1090 displayed in some window, but that window is not selected.
1091
1092 If the forms in @var{body} do not change the major mode in the output
1093 buffer, so that it is still Help mode at the end of their execution,
1094 then @code{with-output-to-temp-buffer} makes this buffer read-only at
1095 the end, and also scans it for function and variable names to make them
1096 into clickable cross-references. @xref{Docstring hyperlinks, , Tips for
1097 Documentation Strings}, in particular the item on hyperlinks in
1098 documentation strings, for more details.
1099
1100 The string @var{buffer-name} specifies the temporary buffer, which need
1101 not already exist. The argument must be a string, not a buffer. The
1102 buffer is erased initially (with no questions asked), and it is marked
1103 as unmodified after @code{with-output-to-temp-buffer} exits.
1104
1105 @code{with-output-to-temp-buffer} binds @code{standard-output} to the
1106 temporary buffer, then it evaluates the forms in @var{body}. Output
1107 using the Lisp output functions within @var{body} goes by default to
1108 that buffer (but screen display and messages in the echo area, although
1109 they are ``output'' in the general sense of the word, are not affected).
1110 @xref{Output Functions}.
1111
1112 Several hooks are available for customizing the behavior
1113 of this construct; they are listed below.
1114
1115 The value of the last form in @var{body} is returned.
1116
1117 @example
1118 @group
1119 ---------- Buffer: foo ----------
1120 This is the contents of foo.
1121 ---------- Buffer: foo ----------
1122 @end group
1123
1124 @group
1125 (with-output-to-temp-buffer "foo"
1126 (print 20)
1127 (print standard-output))
1128 @result{} #<buffer foo>
1129
1130 ---------- Buffer: foo ----------
1131
1132 20
1133
1134 #<buffer foo>
1135
1136 ---------- Buffer: foo ----------
1137 @end group
1138 @end example
1139 @end defmac
1140
1141 @defopt temp-buffer-show-function
1142 If this variable is non-@code{nil}, @code{with-output-to-temp-buffer}
1143 calls it as a function to do the job of displaying a help buffer. The
1144 function gets one argument, which is the buffer it should display.
1145
1146 It is a good idea for this function to run @code{temp-buffer-show-hook}
1147 just as @code{with-output-to-temp-buffer} normally would, inside of
1148 @code{save-selected-window} and with the chosen window and buffer
1149 selected.
1150 @end defopt
1151
1152 @defvar temp-buffer-setup-hook
1153 This normal hook is run by @code{with-output-to-temp-buffer} before
1154 evaluating @var{body}. When the hook runs, the temporary buffer is
1155 current. This hook is normally set up with a function to put the
1156 buffer in Help mode.
1157 @end defvar
1158
1159 @defvar temp-buffer-show-hook
1160 This normal hook is run by @code{with-output-to-temp-buffer} after
1161 displaying the temporary buffer. When the hook runs, the temporary buffer
1162 is current, and the window it was displayed in is selected.
1163 @end defvar
1164
1165 @defmac with-temp-buffer-window buffer-or-name action quit-function body@dots{}
1166 This macro is similar to @code{with-output-to-temp-buffer}. Like that
1167 construct, it executes @var{body} while arranging to insert any output
1168 it prints into the buffer named @var{buffer-or-name} and displays that
1169 buffer in some window. Unlike @code{with-output-to-temp-buffer},
1170 however, it does not automatically switch that buffer to Help mode.
1171
1172 The argument @var{buffer-or-name} specifies the temporary buffer. It
1173 can be either a buffer, which must already exist, or a string, in which
1174 case a buffer of that name is created, if necessary. The buffer is
1175 marked as unmodified and read-only when @code{with-temp-buffer-window}
1176 exits.
1177
1178 This macro does not call @code{temp-buffer-show-function}. Rather, it
1179 passes the @var{action} argument to @code{display-buffer}
1180 (@pxref{Choosing Window}) in order to display the buffer.
1181
1182 The value of the last form in @var{body} is returned, unless the
1183 argument @var{quit-function} is specified. In that case, it is called
1184 with two arguments: the window showing the buffer and the result of
1185 @var{body}. The final return value is then whatever @var{quit-function}
1186 returns.
1187
1188 @vindex temp-buffer-window-setup-hook
1189 @vindex temp-buffer-window-show-hook
1190 This macro uses the normal hooks @code{temp-buffer-window-setup-hook}
1191 and @code{temp-buffer-window-show-hook} in place of the analogous hooks
1192 run by @code{with-output-to-temp-buffer}.
1193 @end defmac
1194
1195 The two constructs described next are mostly identical to
1196 @code{with-temp-buffer-window} but differ from it as specified:
1197
1198 @defmac with-current-buffer-window buffer-or-name action quit-function &rest body
1199 This macro is like @code{with-temp-buffer-window} but unlike that makes
1200 the buffer specified by @var{buffer-or-name} current for running
1201 @var{body}.
1202 @end defmac
1203
1204 @defmac with-displayed-buffer-window buffer-or-name action quit-function &rest body
1205 This macro is like @code{with-current-buffer-window} but unlike that
1206 displays the buffer specified by @var{buffer-or-name} @emph{before}
1207 running @var{body}.
1208 @end defmac
1209
1210 A window showing a temporary buffer can be fit to the size of that
1211 buffer using the following mode:
1212
1213 @defopt temp-buffer-resize-mode
1214 When this minor mode is enabled, windows showing a temporary buffer are
1215 automatically resized to fit their buffer's contents.
1216
1217 A window is resized if and only if it has been specially created for the
1218 buffer. In particular, windows that have shown another buffer before
1219 are not resized. By default, this mode uses @code{fit-window-to-buffer}
1220 (@pxref{Resizing Windows}) for resizing. You can specify a different
1221 function by customizing the options @code{temp-buffer-max-height} and
1222 @code{temp-buffer-max-width} below.
1223 @end defopt
1224
1225 @defopt temp-buffer-max-height
1226 This option specifies the maximum height (in lines) of a window
1227 displaying a temporary buffer when @code{temp-buffer-resize-mode} is
1228 enabled. It can also be a function to be called to choose the height
1229 for such a buffer. It gets one argument, the buffer, and should return
1230 a positive integer. At the time the function is called, the window to
1231 be resized is selected.
1232 @end defopt
1233
1234 @defopt temp-buffer-max-width
1235 This option specifies the maximum width of a window (in columns)
1236 displaying a temporary buffer when @code{temp-buffer-resize-mode} is
1237 enabled. It can also be a function to be called to choose the width for
1238 such a buffer. It gets one argument, the buffer, and should return a
1239 positive integer. At the time the function is called, the window to be
1240 resized is selected.
1241 @end defopt
1242
1243 The following function uses the current buffer for temporal display:
1244
1245 @defun momentary-string-display string position &optional char message
1246 This function momentarily displays @var{string} in the current buffer at
1247 @var{position}. It has no effect on the undo list or on the buffer's
1248 modification status.
1249
1250 The momentary display remains until the next input event. If the next
1251 input event is @var{char}, @code{momentary-string-display} ignores it
1252 and returns. Otherwise, that event remains buffered for subsequent use
1253 as input. Thus, typing @var{char} will simply remove the string from
1254 the display, while typing (say) @kbd{C-f} will remove the string from
1255 the display and later (presumably) move point forward. The argument
1256 @var{char} is a space by default.
1257
1258 The return value of @code{momentary-string-display} is not meaningful.
1259
1260 If the string @var{string} does not contain control characters, you can
1261 do the same job in a more general way by creating (and then subsequently
1262 deleting) an overlay with a @code{before-string} property.
1263 @xref{Overlay Properties}.
1264
1265 If @var{message} is non-@code{nil}, it is displayed in the echo area
1266 while @var{string} is displayed in the buffer. If it is @code{nil}, a
1267 default message says to type @var{char} to continue.
1268
1269 In this example, point is initially located at the beginning of the
1270 second line:
1271
1272 @example
1273 @group
1274 ---------- Buffer: foo ----------
1275 This is the contents of foo.
1276 @point{}Second line.
1277 ---------- Buffer: foo ----------
1278 @end group
1279
1280 @group
1281 (momentary-string-display
1282 "**** Important Message! ****"
1283 (point) ?\r
1284 "Type RET when done reading")
1285 @result{} t
1286 @end group
1287
1288 @group
1289 ---------- Buffer: foo ----------
1290 This is the contents of foo.
1291 **** Important Message! ****Second line.
1292 ---------- Buffer: foo ----------
1293
1294 ---------- Echo Area ----------
1295 Type RET when done reading
1296 ---------- Echo Area ----------
1297 @end group
1298 @end example
1299 @end defun
1300
1301 @node Overlays
1302 @section Overlays
1303 @cindex overlays
1304 @c FIXME: mention intervals in this section?
1305
1306 You can use @dfn{overlays} to alter the appearance of a buffer's text on
1307 the screen, for the sake of presentation features. An overlay is an
1308 object that belongs to a particular buffer, and has a specified
1309 beginning and end. It also has properties that you can examine and set;
1310 these affect the display of the text within the overlay.
1311
1312 @cindex scalability of overlays
1313 The visual effect of an overlay is the same as of the corresponding
1314 text property (@pxref{Text Properties}). However, due to a different
1315 implementation, overlays generally don't scale well (many operations
1316 take a time that is proportional to the number of overlays in the
1317 buffer). If you need to affect the visual appearance of many portions
1318 in the buffer, we recommend using text properties.
1319
1320 An overlay uses markers to record its beginning and end; thus,
1321 editing the text of the buffer adjusts the beginning and end of each
1322 overlay so that it stays with the text. When you create the overlay,
1323 you can specify whether text inserted at the beginning should be
1324 inside the overlay or outside, and likewise for the end of the overlay.
1325
1326 @menu
1327 * Managing Overlays:: Creating and moving overlays.
1328 * Overlay Properties:: How to read and set properties.
1329 What properties do to the screen display.
1330 * Finding Overlays:: Searching for overlays.
1331 @end menu
1332
1333 @node Managing Overlays
1334 @subsection Managing Overlays
1335 @cindex managing overlays
1336 @cindex overlays, managing
1337
1338 This section describes the functions to create, delete and move
1339 overlays, and to examine their contents. Overlay changes are not
1340 recorded in the buffer's undo list, since the overlays are not
1341 part of the buffer's contents.
1342
1343 @defun overlayp object
1344 This function returns @code{t} if @var{object} is an overlay.
1345 @end defun
1346
1347 @defun make-overlay start end &optional buffer front-advance rear-advance
1348 This function creates and returns an overlay that belongs to
1349 @var{buffer} and ranges from @var{start} to @var{end}. Both @var{start}
1350 and @var{end} must specify buffer positions; they may be integers or
1351 markers. If @var{buffer} is omitted, the overlay is created in the
1352 current buffer.
1353
1354 The arguments @var{front-advance} and @var{rear-advance} specify the
1355 marker insertion type for the start of the overlay and for the end of
1356 the overlay, respectively. @xref{Marker Insertion Types}. If they
1357 are both @code{nil}, the default, then the overlay extends to include
1358 any text inserted at the beginning, but not text inserted at the end.
1359 If @var{front-advance} is non-@code{nil}, text inserted at the
1360 beginning of the overlay is excluded from the overlay. If
1361 @var{rear-advance} is non-@code{nil}, text inserted at the end of the
1362 overlay is included in the overlay.
1363 @end defun
1364
1365 @defun overlay-start overlay
1366 This function returns the position at which @var{overlay} starts,
1367 as an integer.
1368 @end defun
1369
1370 @defun overlay-end overlay
1371 This function returns the position at which @var{overlay} ends,
1372 as an integer.
1373 @end defun
1374
1375 @defun overlay-buffer overlay
1376 This function returns the buffer that @var{overlay} belongs to. It
1377 returns @code{nil} if @var{overlay} has been deleted.
1378 @end defun
1379
1380 @defun delete-overlay overlay
1381 This function deletes @var{overlay}. The overlay continues to exist as
1382 a Lisp object, and its property list is unchanged, but it ceases to be
1383 attached to the buffer it belonged to, and ceases to have any effect on
1384 display.
1385
1386 A deleted overlay is not permanently disconnected. You can give it a
1387 position in a buffer again by calling @code{move-overlay}.
1388 @end defun
1389
1390 @defun move-overlay overlay start end &optional buffer
1391 This function moves @var{overlay} to @var{buffer}, and places its bounds
1392 at @var{start} and @var{end}. Both arguments @var{start} and @var{end}
1393 must specify buffer positions; they may be integers or markers.
1394
1395 If @var{buffer} is omitted, @var{overlay} stays in the same buffer it
1396 was already associated with; if @var{overlay} was deleted, it goes into
1397 the current buffer.
1398
1399 The return value is @var{overlay}.
1400
1401 This is the only valid way to change the endpoints of an overlay. Do
1402 not try modifying the markers in the overlay by hand, as that fails to
1403 update other vital data structures and can cause some overlays to be
1404 ``lost''.
1405 @end defun
1406
1407 @defun remove-overlays &optional start end name value
1408 This function removes all the overlays between @var{start} and
1409 @var{end} whose property @var{name} has the value @var{value}. It can
1410 move the endpoints of the overlays in the region, or split them.
1411
1412 If @var{name} is omitted or @code{nil}, it means to delete all overlays in
1413 the specified region. If @var{start} and/or @var{end} are omitted or
1414 @code{nil}, that means the beginning and end of the buffer respectively.
1415 Therefore, @code{(remove-overlays)} removes all the overlays in the
1416 current buffer.
1417 @end defun
1418
1419 @defun copy-overlay overlay
1420 This function returns a copy of @var{overlay}. The copy has the same
1421 endpoints and properties as @var{overlay}. However, the marker
1422 insertion type for the start of the overlay and for the end of the
1423 overlay are set to their default values (@pxref{Marker Insertion
1424 Types}).
1425 @end defun
1426
1427 Here are some examples:
1428
1429 @example
1430 ;; @r{Create an overlay.}
1431 (setq foo (make-overlay 1 10))
1432 @result{} #<overlay from 1 to 10 in display.texi>
1433 (overlay-start foo)
1434 @result{} 1
1435 (overlay-end foo)
1436 @result{} 10
1437 (overlay-buffer foo)
1438 @result{} #<buffer display.texi>
1439 ;; @r{Give it a property we can check later.}
1440 (overlay-put foo 'happy t)
1441 @result{} t
1442 ;; @r{Verify the property is present.}
1443 (overlay-get foo 'happy)
1444 @result{} t
1445 ;; @r{Move the overlay.}
1446 (move-overlay foo 5 20)
1447 @result{} #<overlay from 5 to 20 in display.texi>
1448 (overlay-start foo)
1449 @result{} 5
1450 (overlay-end foo)
1451 @result{} 20
1452 ;; @r{Delete the overlay.}
1453 (delete-overlay foo)
1454 @result{} nil
1455 ;; @r{Verify it is deleted.}
1456 foo
1457 @result{} #<overlay in no buffer>
1458 ;; @r{A deleted overlay has no position.}
1459 (overlay-start foo)
1460 @result{} nil
1461 (overlay-end foo)
1462 @result{} nil
1463 (overlay-buffer foo)
1464 @result{} nil
1465 ;; @r{Undelete the overlay.}
1466 (move-overlay foo 1 20)
1467 @result{} #<overlay from 1 to 20 in display.texi>
1468 ;; @r{Verify the results.}
1469 (overlay-start foo)
1470 @result{} 1
1471 (overlay-end foo)
1472 @result{} 20
1473 (overlay-buffer foo)
1474 @result{} #<buffer display.texi>
1475 ;; @r{Moving and deleting the overlay does not change its properties.}
1476 (overlay-get foo 'happy)
1477 @result{} t
1478 @end example
1479
1480 Emacs stores the overlays of each buffer in two lists, divided
1481 around an arbitrary ``center position''. One list extends backwards
1482 through the buffer from that center position, and the other extends
1483 forwards from that center position. The center position can be anywhere
1484 in the buffer.
1485
1486 @defun overlay-recenter pos
1487 This function recenters the overlays of the current buffer around
1488 position @var{pos}. That makes overlay lookup faster for positions
1489 near @var{pos}, but slower for positions far away from @var{pos}.
1490 @end defun
1491
1492 A loop that scans the buffer forwards, creating overlays, can run
1493 faster if you do @code{(overlay-recenter (point-max))} first.
1494
1495 @node Overlay Properties
1496 @subsection Overlay Properties
1497 @cindex overlay properties
1498
1499 Overlay properties are like text properties in that the properties that
1500 alter how a character is displayed can come from either source. But in
1501 most respects they are different. @xref{Text Properties}, for comparison.
1502
1503 Text properties are considered a part of the text; overlays and
1504 their properties are specifically considered not to be part of the
1505 text. Thus, copying text between various buffers and strings
1506 preserves text properties, but does not try to preserve overlays.
1507 Changing a buffer's text properties marks the buffer as modified,
1508 while moving an overlay or changing its properties does not. Unlike
1509 text property changes, overlay property changes are not recorded in
1510 the buffer's undo list.
1511
1512 Since more than one overlay can specify a property value for the
1513 same character, Emacs lets you specify a priority value of each
1514 overlay. In case two overlays have the same priority value, and one
1515 is nested in the other, then the inner one will have priority over the
1516 outer one. If neither is nested in the other then you should not make
1517 assumptions about which overlay will prevail.
1518
1519 These functions read and set the properties of an overlay:
1520
1521 @defun overlay-get overlay prop
1522 This function returns the value of property @var{prop} recorded in
1523 @var{overlay}, if any. If @var{overlay} does not record any value for
1524 that property, but it does have a @code{category} property which is a
1525 symbol, that symbol's @var{prop} property is used. Otherwise, the value
1526 is @code{nil}.
1527 @end defun
1528
1529 @defun overlay-put overlay prop value
1530 This function sets the value of property @var{prop} recorded in
1531 @var{overlay} to @var{value}. It returns @var{value}.
1532 @end defun
1533
1534 @defun overlay-properties overlay
1535 This returns a copy of the property list of @var{overlay}.
1536 @end defun
1537
1538 See also the function @code{get-char-property} which checks both
1539 overlay properties and text properties for a given character.
1540 @xref{Examining Properties}.
1541
1542 Many overlay properties have special meanings; here is a table
1543 of them:
1544
1545 @table @code
1546 @item priority
1547 @kindex priority @r{(overlay property)}
1548 This property's value determines the priority of the overlay.
1549 If you want to specify a priority value, use either @code{nil}
1550 (or zero), or a positive integer. Any other value has undefined behavior.
1551
1552 The priority matters when two or more overlays cover the same
1553 character and both specify the same property; the one whose
1554 @code{priority} value is larger overrides the other. For the
1555 @code{face} property, the higher priority overlay's value does not
1556 completely override the other value; instead, its face attributes
1557 override the face attributes of the lower priority @code{face}
1558 property.
1559
1560 Currently, all overlays take priority over text properties.
1561
1562 Note that Emacs sometimes uses non-numeric priority values for some of
1563 its internal overlays, so do not try to do arithmetic on the
1564 priority of an overlay (unless it is one that you created). If you
1565 need to put overlays in priority order, use the @var{sorted} argument
1566 of @code{overlays-at}. @xref{Finding Overlays}.
1567
1568 @item window
1569 @kindex window @r{(overlay property)}
1570 If the @code{window} property is non-@code{nil}, then the overlay
1571 applies only on that window.
1572
1573 @item category
1574 @kindex category @r{(overlay property)}
1575 If an overlay has a @code{category} property, we call it the
1576 @dfn{category} of the overlay. It should be a symbol. The properties
1577 of the symbol serve as defaults for the properties of the overlay.
1578
1579 @item face
1580 @kindex face @r{(overlay property)}
1581 This property controls the appearance of the text (@pxref{Faces}).
1582 The value of the property can be the following:
1583
1584 @itemize @bullet
1585 @item
1586 A face name (a symbol or string).
1587
1588 @item
1589 An anonymous face: a property list of the form @code{(@var{keyword}
1590 @var{value} @dots{})}, where each @var{keyword} is a face attribute
1591 name and @var{value} is a value for that attribute.
1592
1593 @item
1594 A list of faces. Each list element should be either a face name or an
1595 anonymous face. This specifies a face which is an aggregate of the
1596 attributes of each of the listed faces. Faces occurring earlier in
1597 the list have higher priority.
1598
1599 @item
1600 A cons cell of the form @code{(foreground-color . @var{color-name})}
1601 or @code{(background-color . @var{color-name})}. This specifies the
1602 foreground or background color, similar to @code{(:foreground
1603 @var{color-name})} or @code{(:background @var{color-name})}. This
1604 form is supported for backward compatibility only, and should be
1605 avoided.
1606 @end itemize
1607
1608 @item mouse-face
1609 @kindex mouse-face @r{(overlay property)}
1610 This property is used instead of @code{face} when the mouse is within
1611 the range of the overlay. However, Emacs ignores all face attributes
1612 from this property that alter the text size (e.g., @code{:height},
1613 @code{:weight}, and @code{:slant}). Those attributes are always the
1614 same as in the unhighlighted text.
1615
1616 @item display
1617 @kindex display @r{(overlay property)}
1618 This property activates various features that change the
1619 way text is displayed. For example, it can make text appear taller
1620 or shorter, higher or lower, wider or narrower, or replaced with an image.
1621 @xref{Display Property}.
1622
1623 @item help-echo
1624 @kindex help-echo @r{(overlay property)}
1625 If an overlay has a @code{help-echo} property, then when you move the
1626 mouse onto the text in the overlay, Emacs displays a help string in the
1627 echo area, or in the tooltip window. For details see @ref{Text
1628 help-echo}.
1629
1630 @item field
1631 @kindex field @r{(overlay property)}
1632 @c Copied from Special Properties.
1633 Consecutive characters with the same @code{field} property constitute a
1634 @emph{field}. Some motion functions including @code{forward-word} and
1635 @code{beginning-of-line} stop moving at a field boundary.
1636 @xref{Fields}.
1637
1638 @item modification-hooks
1639 @kindex modification-hooks @r{(overlay property)}
1640 This property's value is a list of functions to be called if any
1641 character within the overlay is changed or if text is inserted strictly
1642 within the overlay.
1643
1644 The hook functions are called both before and after each change.
1645 If the functions save the information they receive, and compare notes
1646 between calls, they can determine exactly what change has been made
1647 in the buffer text.
1648
1649 When called before a change, each function receives four arguments: the
1650 overlay, @code{nil}, and the beginning and end of the text range to be
1651 modified.
1652
1653 When called after a change, each function receives five arguments: the
1654 overlay, @code{t}, the beginning and end of the text range just
1655 modified, and the length of the pre-change text replaced by that range.
1656 (For an insertion, the pre-change length is zero; for a deletion, that
1657 length is the number of characters deleted, and the post-change
1658 beginning and end are equal.)
1659
1660 If these functions modify the buffer, they should bind
1661 @code{inhibit-modification-hooks} to @code{t} around doing so, to
1662 avoid confusing the internal mechanism that calls these hooks.
1663
1664 Text properties also support the @code{modification-hooks} property,
1665 but the details are somewhat different (@pxref{Special Properties}).
1666
1667 @item insert-in-front-hooks
1668 @kindex insert-in-front-hooks @r{(overlay property)}
1669 This property's value is a list of functions to be called before and
1670 after inserting text right at the beginning of the overlay. The calling
1671 conventions are the same as for the @code{modification-hooks} functions.
1672
1673 @item insert-behind-hooks
1674 @kindex insert-behind-hooks @r{(overlay property)}
1675 This property's value is a list of functions to be called before and
1676 after inserting text right at the end of the overlay. The calling
1677 conventions are the same as for the @code{modification-hooks} functions.
1678
1679 @item invisible
1680 @kindex invisible @r{(overlay property)}
1681 The @code{invisible} property can make the text in the overlay
1682 invisible, which means that it does not appear on the screen.
1683 @xref{Invisible Text}, for details.
1684
1685 @item intangible
1686 @kindex intangible @r{(overlay property)}
1687 The @code{intangible} property on an overlay works just like the
1688 @code{intangible} text property. @xref{Special Properties}, for details.
1689
1690 @item isearch-open-invisible
1691 This property tells incremental search how to make an invisible overlay
1692 visible, permanently, if the final match overlaps it. @xref{Invisible
1693 Text}.
1694
1695 @item isearch-open-invisible-temporary
1696 This property tells incremental search how to make an invisible overlay
1697 visible, temporarily, during the search. @xref{Invisible Text}.
1698
1699 @item before-string
1700 @kindex before-string @r{(overlay property)}
1701 This property's value is a string to add to the display at the beginning
1702 of the overlay. The string does not appear in the buffer in any
1703 sense---only on the screen.
1704
1705 @item after-string
1706 @kindex after-string @r{(overlay property)}
1707 This property's value is a string to add to the display at the end of
1708 the overlay. The string does not appear in the buffer in any
1709 sense---only on the screen.
1710
1711 @item line-prefix
1712 This property specifies a display spec to prepend to each
1713 non-continuation line at display-time. @xref{Truncation}.
1714
1715 @item wrap-prefix
1716 This property specifies a display spec to prepend to each continuation
1717 line at display-time. @xref{Truncation}.
1718
1719 @item evaporate
1720 @kindex evaporate @r{(overlay property)}
1721 If this property is non-@code{nil}, the overlay is deleted automatically
1722 if it becomes empty (i.e., if its length becomes zero). If you give
1723 an empty overlay a non-@code{nil} @code{evaporate} property, that deletes
1724 it immediately.
1725
1726 @item keymap
1727 @cindex keymap of character (and overlays)
1728 @kindex keymap @r{(overlay property)}
1729 If this property is non-@code{nil}, it specifies a keymap for a portion of the
1730 text. This keymap is used when the character after point is within the
1731 overlay, and takes precedence over most other keymaps. @xref{Active Keymaps}.
1732
1733 @item local-map
1734 @kindex local-map @r{(overlay property)}
1735 The @code{local-map} property is similar to @code{keymap} but replaces the
1736 buffer's local map rather than augmenting existing keymaps. This also means it
1737 has lower precedence than minor mode keymaps.
1738 @end table
1739
1740 The @code{keymap} and @code{local-map} properties do not affect a
1741 string displayed by the @code{before-string}, @code{after-string}, or
1742 @code{display} properties. This is only relevant for mouse clicks and
1743 other mouse events that fall on the string, since point is never on
1744 the string. To bind special mouse events for the string, assign it a
1745 @code{keymap} or @code{local-map} text property. @xref{Special
1746 Properties}.
1747
1748 @node Finding Overlays
1749 @subsection Searching for Overlays
1750 @cindex searching for overlays
1751 @cindex overlays, searching for
1752
1753 @defun overlays-at pos &optional sorted
1754 This function returns a list of all the overlays that cover the character at
1755 position @var{pos} in the current buffer. If @var{sorted} is non-@code{nil},
1756 the list is in decreasing order of priority, otherwise it is in no particular
1757 order. An overlay contains position @var{pos} if it begins at or before
1758 @var{pos}, and ends after @var{pos}.
1759
1760 To illustrate usage, here is a Lisp function that returns a list of the
1761 overlays that specify property @var{prop} for the character at point:
1762
1763 @smallexample
1764 (defun find-overlays-specifying (prop)
1765 (let ((overlays (overlays-at (point)))
1766 found)
1767 (while overlays
1768 (let ((overlay (car overlays)))
1769 (if (overlay-get overlay prop)
1770 (setq found (cons overlay found))))
1771 (setq overlays (cdr overlays)))
1772 found))
1773 @end smallexample
1774 @end defun
1775
1776 @defun overlays-in beg end
1777 This function returns a list of the overlays that overlap the region
1778 @var{beg} through @var{end}. ``Overlap'' means that at least one
1779 character is contained within the overlay and also contained within the
1780 specified region; however, empty overlays are included in the result if
1781 they are located at @var{beg}, strictly between @var{beg} and @var{end},
1782 or at @var{end} when @var{end} denotes the position at the end of the
1783 buffer.
1784 @end defun
1785
1786 @defun next-overlay-change pos
1787 This function returns the buffer position of the next beginning or end
1788 of an overlay, after @var{pos}. If there is none, it returns
1789 @code{(point-max)}.
1790 @end defun
1791
1792 @defun previous-overlay-change pos
1793 This function returns the buffer position of the previous beginning or
1794 end of an overlay, before @var{pos}. If there is none, it returns
1795 @code{(point-min)}.
1796 @end defun
1797
1798 As an example, here's a simplified (and inefficient) version of the
1799 primitive function @code{next-single-char-property-change}
1800 (@pxref{Property Search}). It searches forward from position
1801 @var{pos} for the next position where the value of a given property
1802 @code{prop}, as obtained from either overlays or text properties,
1803 changes.
1804
1805 @smallexample
1806 (defun next-single-char-property-change (position prop)
1807 (save-excursion
1808 (goto-char position)
1809 (let ((propval (get-char-property (point) prop)))
1810 (while (and (not (eobp))
1811 (eq (get-char-property (point) prop) propval))
1812 (goto-char (min (next-overlay-change (point))
1813 (next-single-property-change (point) prop)))))
1814 (point)))
1815 @end smallexample
1816
1817 @node Size of Displayed Text
1818 @section Size of Displayed Text
1819 @cindex size of text on display
1820 @cindex character width on display
1821
1822 Since not all characters have the same width, these functions let you
1823 check the width of a character. @xref{Primitive Indent}, and
1824 @ref{Screen Lines}, for related functions.
1825
1826 @defun char-width char
1827 This function returns the width in columns of the character
1828 @var{char}, if it were displayed in the current buffer (i.e., taking
1829 into account the buffer's display table, if any; @pxref{Display
1830 Tables}). The width of a tab character is usually @code{tab-width}
1831 (@pxref{Usual Display}).
1832 @end defun
1833
1834 @defun string-width string
1835 This function returns the width in columns of the string @var{string},
1836 if it were displayed in the current buffer and the selected window.
1837 @end defun
1838
1839 @defun truncate-string-to-width string width &optional start-column padding ellipsis
1840 This function returns the part of @var{string} that fits within
1841 @var{width} columns, as a new string.
1842
1843 If @var{string} does not reach @var{width}, then the result ends where
1844 @var{string} ends. If one multi-column character in @var{string}
1845 extends across the column @var{width}, that character is not included in
1846 the result. Thus, the result can fall short of @var{width} but cannot
1847 go beyond it.
1848
1849 The optional argument @var{start-column} specifies the starting column.
1850 If this is non-@code{nil}, then the first @var{start-column} columns of
1851 the string are omitted from the value. If one multi-column character in
1852 @var{string} extends across the column @var{start-column}, that
1853 character is not included.
1854
1855 The optional argument @var{padding}, if non-@code{nil}, is a padding
1856 character added at the beginning and end of the result string, to extend
1857 it to exactly @var{width} columns. The padding character is used at the
1858 end of the result if it falls short of @var{width}. It is also used at
1859 the beginning of the result if one multi-column character in
1860 @var{string} extends across the column @var{start-column}.
1861
1862 If @var{ellipsis} is non-@code{nil}, it should be a string which will
1863 replace the end of @var{string} (including any padding) if it extends
1864 beyond @var{width}, unless the display width of @var{string} is equal
1865 to or less than the display width of @var{ellipsis}. If
1866 @var{ellipsis} is non-@code{nil} and not a string, it stands for
1867 @code{"..."}.
1868
1869 @example
1870 (truncate-string-to-width "\tab\t" 12 4)
1871 @result{} "ab"
1872 (truncate-string-to-width "\tab\t" 12 4 ?\s)
1873 @result{} " ab "
1874 @end example
1875 @end defun
1876
1877 The following function returns the size in pixels of text as if it were
1878 displayed in a given window. This function is used by
1879 @code{fit-window-to-buffer} (@pxref{Resizing Windows}) and
1880 @code{fit-frame-to-buffer} (@pxref{Size and Position}) to make a window
1881 exactly as large as the text it contains.
1882
1883 @defun window-text-pixel-size &optional window from to x-limit y-limit mode-and-header-line
1884 This function returns the size of the text of @var{window}'s buffer in
1885 pixels. @var{window} must be a live window and defaults to the selected
1886 one. The return value is a cons of the maximum pixel-width of any text
1887 line and the maximum pixel-height of all text lines.
1888
1889 The optional argument @var{from}, if non-@code{nil}, specifies the first
1890 text position to consider and defaults to the minimum accessible
1891 position of the buffer. If @var{from} is @code{t}, it uses the minimum
1892 accessible position that is not a newline character. The optional
1893 argument @var{to}, if non-@code{nil}, specifies the last text position
1894 to consider and defaults to the maximum accessible position of the
1895 buffer. If @var{to} is @code{t}, it uses the maximum accessible
1896 position that is not a newline character.
1897
1898 The optional argument @var{x-limit}, if non-@code{nil}, specifies the
1899 maximum pixel-width that can be returned. @var{x-limit} @code{nil} or
1900 omitted, means to use the pixel-width of @var{window}'s body
1901 (@pxref{Window Sizes}); this is useful when the caller does not intend
1902 to change the width of @var{window}. Otherwise, the caller should
1903 specify here the maximum width @var{window}'s body may assume. Text
1904 whose x-coordinate is beyond @var{x-limit} is ignored. Since
1905 calculating the width of long lines can take some time, it's always a
1906 good idea to make this argument as small as needed; in particular, if
1907 the buffer might contain long lines that will be truncated anyway.
1908
1909 The optional argument @var{y-limit}, if non-@code{nil}, specifies the
1910 maximum pixel-height that can be returned. Text lines whose
1911 y-coordinate is beyond @var{y-limit} are ignored. Since calculating the
1912 pixel-height of a large buffer can take some time, it makes sense to
1913 specify this argument; in particular, if the caller does not know the
1914 size of the buffer.
1915
1916 The optional argument @var{mode-and-header-line} @code{nil} or omitted
1917 means to not include the height of the mode- or header-line of
1918 @var{window} in the return value. If it is either the symbol
1919 @code{mode-line} or @code{header-line}, include only the height of that
1920 line, if present, in the return value. If it is @code{t}, include the
1921 height of both, if present, in the return value.
1922 @end defun
1923
1924
1925 @node Line Height
1926 @section Line Height
1927 @cindex line height
1928 @cindex height of a line
1929
1930 The total height of each display line consists of the height of the
1931 contents of the line, plus optional additional vertical line spacing
1932 above or below the display line.
1933
1934 The height of the line contents is the maximum height of any
1935 character or image on that display line, including the final newline
1936 if there is one. (A display line that is continued doesn't include a
1937 final newline.) That is the default line height, if you do nothing to
1938 specify a greater height. (In the most common case, this equals the
1939 height of the default frame font.)
1940
1941 There are several ways to explicitly specify a larger line height,
1942 either by specifying an absolute height for the display line, or by
1943 specifying vertical space. However, no matter what you specify, the
1944 actual line height can never be less than the default.
1945
1946 @kindex line-height @r{(text property)}
1947 A newline can have a @code{line-height} text or overlay property
1948 that controls the total height of the display line ending in that
1949 newline.
1950
1951 If the property value is @code{t}, the newline character has no
1952 effect on the displayed height of the line---the visible contents
1953 alone determine the height. This is useful for tiling small images
1954 (or image slices) without adding blank areas between the images.
1955
1956 If the property value is a list of the form @code{(@var{height}
1957 @var{total})}, that adds extra space @emph{below} the display line.
1958 First Emacs uses @var{height} as a height spec to control extra space
1959 @emph{above} the line; then it adds enough space @emph{below} the line
1960 to bring the total line height up to @var{total}. In this case, the
1961 other ways to specify the line spacing are ignored.
1962
1963 @cindex height spec
1964 Any other kind of property value is a height spec, which translates
1965 into a number---the specified line height. There are several ways to
1966 write a height spec; here's how each of them translates into a number:
1967
1968 @table @code
1969 @item @var{integer}
1970 If the height spec is a positive integer, the height value is that integer.
1971 @item @var{float}
1972 If the height spec is a float, @var{float}, the numeric height value
1973 is @var{float} times the frame's default line height.
1974 @item (@var{face} . @var{ratio})
1975 If the height spec is a cons of the format shown, the numeric height
1976 is @var{ratio} times the height of face @var{face}. @var{ratio} can
1977 be any type of number, or @code{nil} which means a ratio of 1.
1978 If @var{face} is @code{t}, it refers to the current face.
1979 @item (nil . @var{ratio})
1980 If the height spec is a cons of the format shown, the numeric height
1981 is @var{ratio} times the height of the contents of the line.
1982 @end table
1983
1984 Thus, any valid height spec determines the height in pixels, one way
1985 or another. If the line contents' height is less than that, Emacs
1986 adds extra vertical space above the line to achieve the specified
1987 total height.
1988
1989 If you don't specify the @code{line-height} property, the line's
1990 height consists of the contents' height plus the line spacing.
1991 There are several ways to specify the line spacing for different
1992 parts of Emacs text.
1993
1994 On graphical terminals, you can specify the line spacing for all
1995 lines in a frame, using the @code{line-spacing} frame parameter
1996 (@pxref{Layout Parameters}). However, if the default value of
1997 @code{line-spacing} is non-@code{nil}, it overrides the
1998 frame's @code{line-spacing} parameter. An integer specifies the
1999 number of pixels put below lines. A floating-point number specifies
2000 the spacing relative to the frame's default line height.
2001
2002 @vindex line-spacing
2003 You can specify the line spacing for all lines in a buffer via the
2004 buffer-local @code{line-spacing} variable. An integer specifies
2005 the number of pixels put below lines. A floating-point number
2006 specifies the spacing relative to the default frame line height. This
2007 overrides line spacings specified for the frame.
2008
2009 @kindex line-spacing @r{(text property)}
2010 Finally, a newline can have a @code{line-spacing} text or overlay
2011 property that overrides the default frame line spacing and the buffer
2012 local @code{line-spacing} variable, for the display line ending in
2013 that newline.
2014
2015 One way or another, these mechanisms specify a Lisp value for the
2016 spacing of each line. The value is a height spec, and it translates
2017 into a Lisp value as described above. However, in this case the
2018 numeric height value specifies the line spacing, rather than the line
2019 height.
2020
2021 On text terminals, the line spacing cannot be altered.
2022
2023 @node Faces
2024 @section Faces
2025 @cindex faces
2026
2027 A @dfn{face} is a collection of graphical attributes for displaying
2028 text: font, foreground color, background color, optional underlining,
2029 etc. Faces control how Emacs displays text in buffers, as well as
2030 other parts of the frame such as the mode line.
2031
2032 @cindex anonymous face
2033 One way to represent a face is as a property list of attributes,
2034 like @code{(:foreground "red" :weight bold)}. Such a list is called
2035 an @dfn{anonymous face}. For example, you can assign an anonymous
2036 face as the value of the @code{face} text property, and Emacs will
2037 display the underlying text with the specified attributes.
2038 @xref{Special Properties}.
2039
2040 @cindex face name
2041 More commonly, a face is referred to via a @dfn{face name}: a Lisp
2042 symbol associated with a set of face attributes@footnote{For backward
2043 compatibility, you can also use a string to specify a face name; that
2044 is equivalent to a Lisp symbol with the same name.}. Named faces are
2045 defined using the @code{defface} macro (@pxref{Defining Faces}).
2046 Emacs comes with several standard named faces (@pxref{Basic Faces}).
2047
2048 Many parts of Emacs required named faces, and do not accept
2049 anonymous faces. These include the functions documented in
2050 @ref{Attribute Functions}, and the variable @code{font-lock-keywords}
2051 (@pxref{Search-based Fontification}). Unless otherwise stated, we
2052 will use the term @dfn{face} to refer only to named faces.
2053
2054 @defun facep object
2055 This function returns a non-@code{nil} value if @var{object} is a
2056 named face: a Lisp symbol or string which serves as a face name.
2057 Otherwise, it returns @code{nil}.
2058 @end defun
2059
2060 @menu
2061 * Face Attributes:: What is in a face?
2062 * Defining Faces:: How to define a face.
2063 * Attribute Functions:: Functions to examine and set face attributes.
2064 * Displaying Faces:: How Emacs combines the faces specified for a character.
2065 * Face Remapping:: Remapping faces to alternative definitions.
2066 * Face Functions:: How to define and examine faces.
2067 * Auto Faces:: Hook for automatic face assignment.
2068 * Basic Faces:: Faces that are defined by default.
2069 * Font Selection:: Finding the best available font for a face.
2070 * Font Lookup:: Looking up the names of available fonts
2071 and information about them.
2072 * Fontsets:: A fontset is a collection of fonts
2073 that handle a range of character sets.
2074 * Low-Level Font:: Lisp representation for character display fonts.
2075 @end menu
2076
2077 @node Face Attributes
2078 @subsection Face Attributes
2079 @cindex face attributes
2080
2081 @dfn{Face attributes} determine the visual appearance of a face.
2082 The following table lists all the face attributes, their possible
2083 values, and their effects.
2084
2085 Apart from the values given below, each face attribute can have the
2086 value @code{unspecified}. This special value means that the face
2087 doesn't specify that attribute directly. An @code{unspecified}
2088 attribute tells Emacs to refer instead to a parent face (see the
2089 description @code{:inherit} attribute below); or, failing that, to an
2090 underlying face (@pxref{Displaying Faces}). The @code{default} face
2091 must specify all attributes.
2092
2093 Some of these attributes are meaningful only on certain kinds of
2094 displays. If your display cannot handle a certain attribute, the
2095 attribute is ignored.
2096
2097 @table @code
2098 @item :family
2099 Font family or fontset (a string). @xref{Fonts,,, emacs, The GNU
2100 Emacs Manual}, for more information about font families. The function
2101 @code{font-family-list} (see below) returns a list of available family
2102 names. @xref{Fontsets}, for information about fontsets.
2103
2104 @item :foundry
2105 The name of the @dfn{font foundry} for the font family specified by
2106 the @code{:family} attribute (a string). @xref{Fonts,,, emacs, The
2107 GNU Emacs Manual}.
2108
2109 @item :width
2110 Relative character width. This should be one of the symbols
2111 @code{ultra-condensed}, @code{extra-condensed}, @code{condensed},
2112 @code{semi-condensed}, @code{normal}, @code{semi-expanded},
2113 @code{expanded}, @code{extra-expanded}, or @code{ultra-expanded}.
2114
2115 @item :height
2116 The height of the font. In the simplest case, this is an integer in
2117 units of 1/10 point.
2118
2119 The value can also be floating point or a function, which
2120 specifies the height relative to an @dfn{underlying face}
2121 (@pxref{Displaying Faces}). A floating-point value
2122 specifies the amount by which to scale the height of the
2123 underlying face. A function value is called
2124 with one argument, the height of the underlying face, and returns the
2125 height of the new face. If the function is passed an integer
2126 argument, it must return an integer.
2127
2128 The height of the default face must be specified using an integer;
2129 floating point and function values are not allowed.
2130
2131 @item :weight
2132 Font weight---one of the symbols (from densest to faintest)
2133 @code{ultra-bold}, @code{extra-bold}, @code{bold}, @code{semi-bold},
2134 @code{normal}, @code{semi-light}, @code{light}, @code{extra-light}, or
2135 @code{ultra-light}. On text terminals which support
2136 variable-brightness text, any weight greater than normal is displayed
2137 as extra bright, and any weight less than normal is displayed as
2138 half-bright.
2139
2140 @cindex italic text
2141 @item :slant
2142 Font slant---one of the symbols @code{italic}, @code{oblique},
2143 @code{normal}, @code{reverse-italic}, or @code{reverse-oblique}. On
2144 text terminals that support variable-brightness text, slanted text is
2145 displayed as half-bright.
2146
2147 @item :foreground
2148 Foreground color, a string. The value can be a system-defined color
2149 name, or a hexadecimal color specification. @xref{Color Names}. On
2150 black-and-white displays, certain shades of gray are implemented by
2151 stipple patterns.
2152
2153 @item :distant-foreground
2154 Alternative foreground color, a string. This is like @code{:foreground}
2155 but the color is only used as a foreground when the background color is
2156 near to the foreground that would have been used. This is useful for
2157 example when marking text (i.e. the region face). If the text has a foreground
2158 that is visible with the region face, that foreground is used.
2159 If the foreground is near the region face background,
2160 @code{:distant-foreground} is used instead so the text is readable.
2161
2162 @item :background
2163 Background color, a string. The value can be a system-defined color
2164 name, or a hexadecimal color specification. @xref{Color Names}.
2165
2166 @cindex underlined text
2167 @item :underline
2168 Whether or not characters should be underlined, and in what
2169 way. The possible values of the @code{:underline} attribute are:
2170
2171 @table @asis
2172 @item @code{nil}
2173 Don't underline.
2174
2175 @item @code{t}
2176 Underline with the foreground color of the face.
2177
2178 @item @var{color}
2179 Underline in color @var{color}, a string specifying a color.
2180
2181 @item @code{(:color @var{color} :style @var{style})}
2182 @var{color} is either a string, or the symbol @code{foreground-color},
2183 meaning the foreground color of the face. Omitting the attribute
2184 @code{:color} means to use the foreground color of the face.
2185 @var{style} should be a symbol @code{line} or @code{wave}, meaning to
2186 use a straight or wavy line. Omitting the attribute @code{:style}
2187 means to use a straight line.
2188 @end table
2189
2190 @cindex overlined text
2191 @item :overline
2192 Whether or not characters should be overlined, and in what color.
2193 If the value is @code{t}, overlining uses the foreground color of the
2194 face. If the value is a string, overlining uses that color. The
2195 value @code{nil} means do not overline.
2196
2197 @cindex strike-through text
2198 @item :strike-through
2199 Whether or not characters should be strike-through, and in what
2200 color. The value is used like that of @code{:overline}.
2201
2202 @cindex 2D box
2203 @cindex 3D box
2204 @item :box
2205 Whether or not a box should be drawn around characters, its color, the
2206 width of the box lines, and 3D appearance. Here are the possible
2207 values of the @code{:box} attribute, and what they mean:
2208
2209 @table @asis
2210 @item @code{nil}
2211 Don't draw a box.
2212
2213 @item @code{t}
2214 Draw a box with lines of width 1, in the foreground color.
2215
2216 @item @var{color}
2217 Draw a box with lines of width 1, in color @var{color}.
2218
2219 @item @code{(:line-width @var{width} :color @var{color} :style @var{style})}
2220 This way you can explicitly specify all aspects of the box. The value
2221 @var{width} specifies the width of the lines to draw; it defaults to
2222 1. A negative width @var{-n} means to draw a line of width @var{n}
2223 that occupies the space of the underlying text, thus avoiding any
2224 increase in the character height or width.
2225
2226 The value @var{color} specifies the color to draw with. The default is
2227 the foreground color of the face for simple boxes, and the background
2228 color of the face for 3D boxes.
2229
2230 The value @var{style} specifies whether to draw a 3D box. If it is
2231 @code{released-button}, the box looks like a 3D button that is not being
2232 pressed. If it is @code{pressed-button}, the box looks like a 3D button
2233 that is being pressed. If it is @code{nil} or omitted, a plain 2D box
2234 is used.
2235 @end table
2236
2237 @item :inverse-video
2238 Whether or not characters should be displayed in inverse video. The
2239 value should be @code{t} (yes) or @code{nil} (no).
2240
2241 @item :stipple
2242 The background stipple, a bitmap.
2243
2244 The value can be a string; that should be the name of a file containing
2245 external-format X bitmap data. The file is found in the directories
2246 listed in the variable @code{x-bitmap-file-path}.
2247
2248 Alternatively, the value can specify the bitmap directly, with a list
2249 of the form @code{(@var{width} @var{height} @var{data})}. Here,
2250 @var{width} and @var{height} specify the size in pixels, and
2251 @var{data} is a string containing the raw bits of the bitmap, row by
2252 row. Each row occupies @math{(@var{width} + 7) / 8} consecutive bytes
2253 in the string (which should be a unibyte string for best results).
2254 This means that each row always occupies at least one whole byte.
2255
2256 If the value is @code{nil}, that means use no stipple pattern.
2257
2258 Normally you do not need to set the stipple attribute, because it is
2259 used automatically to handle certain shades of gray.
2260
2261 @item :font
2262 The font used to display the face. Its value should be a font object.
2263 @xref{Low-Level Font}, for information about font objects, font specs,
2264 and font entities.
2265
2266 When specifying this attribute using @code{set-face-attribute}
2267 (@pxref{Attribute Functions}), you may also supply a font spec, a font
2268 entity, or a string. Emacs converts such values to an appropriate
2269 font object, and stores that font object as the actual attribute
2270 value. If you specify a string, the contents of the string should be
2271 a font name (@pxref{Fonts,,, emacs, The GNU Emacs Manual}); if the
2272 font name is an XLFD containing wildcards, Emacs chooses the first
2273 font matching those wildcards. Specifying this attribute also changes
2274 the values of the @code{:family}, @code{:foundry}, @code{:width},
2275 @code{:height}, @code{:weight}, and @code{:slant} attributes.
2276
2277 @cindex inheritance, for faces
2278 @item :inherit
2279 The name of a face from which to inherit attributes, or a list of face
2280 names. Attributes from inherited faces are merged into the face like
2281 an underlying face would be, with higher priority than underlying
2282 faces (@pxref{Displaying Faces}). If a list of faces is used,
2283 attributes from faces earlier in the list override those from later
2284 faces.
2285 @end table
2286
2287 @defun font-family-list &optional frame
2288 This function returns a list of available font family names. The
2289 optional argument @var{frame} specifies the frame on which the text is
2290 to be displayed; if it is @code{nil}, the selected frame is used.
2291 @end defun
2292
2293 @defopt underline-minimum-offset
2294 This variable specifies the minimum distance between the baseline and
2295 the underline, in pixels, when displaying underlined text.
2296 @end defopt
2297
2298 @defopt x-bitmap-file-path
2299 This variable specifies a list of directories for searching
2300 for bitmap files, for the @code{:stipple} attribute.
2301 @end defopt
2302
2303 @defun bitmap-spec-p object
2304 This returns @code{t} if @var{object} is a valid bitmap specification,
2305 suitable for use with @code{:stipple} (see above). It returns
2306 @code{nil} otherwise.
2307 @end defun
2308
2309 @node Defining Faces
2310 @subsection Defining Faces
2311 @cindex defining faces
2312
2313 @cindex face spec
2314 The usual way to define a face is through the @code{defface} macro.
2315 This macro associates a face name (a symbol) with a default @dfn{face
2316 spec}. A face spec is a construct which specifies what attributes a
2317 face should have on any given terminal; for example, a face spec might
2318 specify one foreground color on high-color terminals, and a different
2319 foreground color on low-color terminals.
2320
2321 People are sometimes tempted to create a variable whose value is a
2322 face name. In the vast majority of cases, this is not necessary; the
2323 usual procedure is to define a face with @code{defface}, and then use
2324 its name directly.
2325
2326 @defmac defface face spec doc [keyword value]@dots{}
2327 This macro declares @var{face} as a named face whose default face spec
2328 is given by @var{spec}. You should not quote the symbol @var{face},
2329 and it should not end in @samp{-face} (that would be redundant). The
2330 argument @var{doc} is a documentation string for the face. The
2331 additional @var{keyword} arguments have the same meanings as in
2332 @code{defgroup} and @code{defcustom} (@pxref{Common Keywords}).
2333
2334 If @var{face} already has a default face spec, this macro does
2335 nothing.
2336
2337 The default face spec determines @var{face}'s appearance when no
2338 customizations are in effect (@pxref{Customization}). If @var{face}
2339 has already been customized (via Custom themes or via customizations
2340 read from the init file), its appearance is determined by the custom
2341 face spec(s), which override the default face spec @var{spec}.
2342 However, if the customizations are subsequently removed, the
2343 appearance of @var{face} will again be determined by its default face
2344 spec.
2345
2346 As an exception, if you evaluate a @code{defface} form with
2347 @kbd{C-M-x} in Emacs Lisp mode (@code{eval-defun}), a special feature
2348 of @code{eval-defun} overrides any custom face specs on the face,
2349 causing the face to reflect exactly what the @code{defface} says.
2350
2351 The @var{spec} argument is a @dfn{face spec}, which states how the
2352 face should appear on different kinds of terminals. It should be an
2353 alist whose elements each have the form
2354
2355 @example
2356 (@var{display} . @var{plist})
2357 @end example
2358
2359 @noindent
2360 @var{display} specifies a class of terminals (see below). @var{plist}
2361 is a property list of face attributes and their values, specifying how
2362 the face appears on such terminals. For backward compatibility, you
2363 can also write an element as @code{(@var{display} @var{plist})}.
2364
2365 The @var{display} part of an element of @var{spec} determines which
2366 terminals the element matches. If more than one element of @var{spec}
2367 matches a given terminal, the first element that matches is the one
2368 used for that terminal. There are three possibilities for
2369 @var{display}:
2370
2371 @table @asis
2372 @item @code{default}
2373 This element of @var{spec} doesn't match any terminal; instead, it
2374 specifies defaults that apply to all terminals. This element, if
2375 used, must be the first element of @var{spec}. Each of the following
2376 elements can override any or all of these defaults.
2377
2378 @item @code{t}
2379 This element of @var{spec} matches all terminals. Therefore, any
2380 subsequent elements of @var{spec} are never used. Normally @code{t}
2381 is used in the last (or only) element of @var{spec}.
2382
2383 @item a list
2384 If @var{display} is a list, each element should have the form
2385 @code{(@var{characteristic} @var{value}@dots{})}. Here
2386 @var{characteristic} specifies a way of classifying terminals, and the
2387 @var{value}s are possible classifications which @var{display} should
2388 apply to. Here are the possible values of @var{characteristic}:
2389
2390 @table @code
2391 @item type
2392 The kind of window system the terminal uses---either @code{graphic}
2393 (any graphics-capable display), @code{x}, @code{pc} (for the MS-DOS
2394 console), @code{w32} (for MS Windows 9X/NT/2K/XP), or @code{tty} (a
2395 non-graphics-capable display). @xref{Window Systems, window-system}.
2396
2397 @item class
2398 What kinds of colors the terminal supports---either @code{color},
2399 @code{grayscale}, or @code{mono}.
2400
2401 @item background
2402 The kind of background---either @code{light} or @code{dark}.
2403
2404 @item min-colors
2405 An integer that represents the minimum number of colors the terminal
2406 should support. This matches a terminal if its
2407 @code{display-color-cells} value is at least the specified integer.
2408
2409 @item supports
2410 Whether or not the terminal can display the face attributes given in
2411 @var{value}@dots{} (@pxref{Face Attributes}). @xref{Display Face
2412 Attribute Testing}, for more information on exactly how this testing
2413 is done.
2414 @end table
2415
2416 If an element of @var{display} specifies more than one @var{value} for
2417 a given @var{characteristic}, any of those values is acceptable. If
2418 @var{display} has more than one element, each element should specify a
2419 different @var{characteristic}; then @emph{each} characteristic of the
2420 terminal must match one of the @var{value}s specified for it in
2421 @var{display}.
2422 @end table
2423 @end defmac
2424
2425 For example, here's the definition of the standard face
2426 @code{highlight}:
2427
2428 @example
2429 (defface highlight
2430 '((((class color) (min-colors 88) (background light))
2431 :background "darkseagreen2")
2432 (((class color) (min-colors 88) (background dark))
2433 :background "darkolivegreen")
2434 (((class color) (min-colors 16) (background light))
2435 :background "darkseagreen2")
2436 (((class color) (min-colors 16) (background dark))
2437 :background "darkolivegreen")
2438 (((class color) (min-colors 8))
2439 :background "green" :foreground "black")
2440 (t :inverse-video t))
2441 "Basic face for highlighting."
2442 :group 'basic-faces)
2443 @end example
2444
2445 Internally, Emacs stores each face's default spec in its
2446 @code{face-defface-spec} symbol property (@pxref{Symbol Properties}).
2447 The @code{saved-face} property stores any face spec saved by the user
2448 using the customization buffer; the @code{customized-face} property
2449 stores the face spec customized for the current session, but not
2450 saved; and the @code{theme-face} property stores an alist associating
2451 the active customization settings and Custom themes with the face
2452 specs for that face. The face's documentation string is stored in the
2453 @code{face-documentation} property.
2454
2455 Normally, a face is declared just once, using @code{defface}, and
2456 any further changes to its appearance are applied using the Customize
2457 framework (e.g., via the Customize user interface or via the
2458 @code{custom-set-faces} function; @pxref{Applying Customizations}), or
2459 by face remapping (@pxref{Face Remapping}). In the rare event that
2460 you need to change a face spec directly from Lisp, you can use the
2461 @code{face-spec-set} function.
2462
2463 @defun face-spec-set face spec &optional spec-type
2464 This function applies @var{spec} as a face spec for @code{face}.
2465 @var{spec} should be a face spec, as described in the above
2466 documentation for @code{defface}.
2467
2468 This function also defines @var{face} as a valid face name if it is
2469 not already one, and (re)calculates its attributes on existing frames.
2470
2471 @cindex override spec @r{(for a face)}
2472 The argument @var{spec-type} determines which spec to set. If it is
2473 @code{nil} or @code{face-override-spec}, this function sets the
2474 @dfn{override spec}, which overrides over all other face specs on
2475 @var{face}. If it is @code{customized-face} or @code{saved-face},
2476 this function sets the customized spec or the saved custom spec. If
2477 it is @code{face-defface-spec}, this function sets the default face
2478 spec (the same one set by @code{defface}). If it is @code{reset},
2479 this function clears out all customization specs and override specs
2480 from @var{face} (in this case, the value of @var{spec} is ignored).
2481 Any other value of @var{spec-type} is reserved for internal use.
2482 @end defun
2483
2484 @node Attribute Functions
2485 @subsection Face Attribute Functions
2486 @cindex face attributes, access and modification
2487
2488 This section describes functions for directly accessing and
2489 modifying the attributes of a named face.
2490
2491 @defun face-attribute face attribute &optional frame inherit
2492 This function returns the value of the @var{attribute} attribute for
2493 @var{face} on @var{frame}.
2494
2495 If @var{frame} is @code{nil}, that means the selected frame
2496 (@pxref{Input Focus}). If @var{frame} is @code{t}, this function
2497 returns the value of the specified attribute for newly-created frames
2498 (this is normally @code{unspecified}, unless you have specified some
2499 value using @code{set-face-attribute}; see below).
2500
2501 If @var{inherit} is @code{nil}, only attributes directly defined by
2502 @var{face} are considered, so the return value may be
2503 @code{unspecified}, or a relative value. If @var{inherit} is
2504 non-@code{nil}, @var{face}'s definition of @var{attribute} is merged
2505 with the faces specified by its @code{:inherit} attribute; however the
2506 return value may still be @code{unspecified} or relative. If
2507 @var{inherit} is a face or a list of faces, then the result is further
2508 merged with that face (or faces), until it becomes specified and
2509 absolute.
2510
2511 To ensure that the return value is always specified and absolute, use
2512 a value of @code{default} for @var{inherit}; this will resolve any
2513 unspecified or relative values by merging with the @code{default} face
2514 (which is always completely specified).
2515
2516 For example,
2517
2518 @example
2519 (face-attribute 'bold :weight)
2520 @result{} bold
2521 @end example
2522 @end defun
2523
2524 @c FIXME: Add an index for "relative face attribute", maybe here? --xfq
2525 @defun face-attribute-relative-p attribute value
2526 This function returns non-@code{nil} if @var{value}, when used as the
2527 value of the face attribute @var{attribute}, is relative. This means
2528 it would modify, rather than completely override, any value that comes
2529 from a subsequent face in the face list or that is inherited from
2530 another face.
2531
2532 @code{unspecified} is a relative value for all attributes. For
2533 @code{:height}, floating point and function values are also relative.
2534
2535 For example:
2536
2537 @example
2538 (face-attribute-relative-p :height 2.0)
2539 @result{} t
2540 @end example
2541 @end defun
2542
2543 @defun face-all-attributes face &optional frame
2544 This function returns an alist of attributes of @var{face}. The
2545 elements of the result are name-value pairs of the form
2546 @w{@code{(@var{attr-name} . @var{attr-value})}}. Optional argument
2547 @var{frame} specifies the frame whose definition of @var{face} to
2548 return; if omitted or @code{nil}, the returned value describes the
2549 default attributes of @var{face} for newly created frames.
2550 @end defun
2551
2552 @defun merge-face-attribute attribute value1 value2
2553 If @var{value1} is a relative value for the face attribute
2554 @var{attribute}, returns it merged with the underlying value
2555 @var{value2}; otherwise, if @var{value1} is an absolute value for the
2556 face attribute @var{attribute}, returns @var{value1} unchanged.
2557 @end defun
2558
2559 Normally, Emacs uses the face specs of each face to automatically
2560 calculate its attributes on each frame (@pxref{Defining Faces}). The
2561 function @code{set-face-attribute} can override this calculation by
2562 directly assigning attributes to a face, either on a specific frame or
2563 for all frames. This function is mostly intended for internal usage.
2564
2565 @defun set-face-attribute face frame &rest arguments
2566 This function sets one or more attributes of @var{face} for
2567 @var{frame}. The attributes specifies in this way override the face
2568 spec(s) belonging to @var{face}.
2569
2570 The extra arguments @var{arguments} specify the attributes to set, and
2571 the values for them. They should consist of alternating attribute
2572 names (such as @code{:family} or @code{:underline}) and values. Thus,
2573
2574 @example
2575 (set-face-attribute 'foo nil :weight 'bold :slant 'italic)
2576 @end example
2577
2578 @noindent
2579 sets the attribute @code{:weight} to @code{bold} and the attribute
2580 @code{:slant} to @code{italic}.
2581
2582
2583 If @var{frame} is @code{t}, this function sets the default attributes
2584 for newly created frames. If @var{frame} is @code{nil}, this function
2585 sets the attributes for all existing frames, as well as for newly
2586 created frames.
2587 @end defun
2588
2589 The following commands and functions mostly provide compatibility
2590 with old versions of Emacs. They work by calling
2591 @code{set-face-attribute}. Values of @code{t} and @code{nil} for
2592 their @var{frame} argument are handled just like
2593 @code{set-face-attribute} and @code{face-attribute}. The commands
2594 read their arguments using the minibuffer, if called interactively.
2595
2596 @deffn Command set-face-foreground face color &optional frame
2597 @deffnx Command set-face-background face color &optional frame
2598 These set the @code{:foreground} attribute (or @code{:background}
2599 attribute, respectively) of @var{face} to @var{color}.
2600 @end deffn
2601
2602 @deffn Command set-face-stipple face pattern &optional frame
2603 This sets the @code{:stipple} attribute of @var{face} to
2604 @var{pattern}.
2605 @end deffn
2606
2607 @deffn Command set-face-font face font &optional frame
2608 This sets the @code{:font} attribute of @var{face} to @var{font}.
2609 @end deffn
2610
2611 @defun set-face-bold face bold-p &optional frame
2612 This sets the @code{:weight} attribute of @var{face} to @var{normal}
2613 if @var{bold-p} is @code{nil}, and to @var{bold} otherwise.
2614 @end defun
2615
2616 @defun set-face-italic face italic-p &optional frame
2617 This sets the @code{:slant} attribute of @var{face} to @var{normal} if
2618 @var{italic-p} is @code{nil}, and to @var{italic} otherwise.
2619 @end defun
2620
2621 @defun set-face-underline face underline &optional frame
2622 This sets the @code{:underline} attribute of @var{face} to
2623 @var{underline}.
2624 @end defun
2625
2626 @defun set-face-inverse-video face inverse-video-p &optional frame
2627 This sets the @code{:inverse-video} attribute of @var{face} to
2628 @var{inverse-video-p}.
2629 @end defun
2630
2631 @deffn Command invert-face face &optional frame
2632 This swaps the foreground and background colors of face @var{face}.
2633 @end deffn
2634
2635 The following functions examine the attributes of a face. They
2636 mostly provide compatibility with old versions of Emacs. If you don't
2637 specify @var{frame}, they refer to the selected frame; @code{t} refers
2638 to the default data for new frames. They return @code{unspecified} if
2639 the face doesn't define any value for that attribute. If
2640 @var{inherit} is @code{nil}, only an attribute directly defined by the
2641 face is returned. If @var{inherit} is non-@code{nil}, any faces
2642 specified by its @code{:inherit} attribute are considered as well, and
2643 if @var{inherit} is a face or a list of faces, then they are also
2644 considered, until a specified attribute is found. To ensure that the
2645 return value is always specified, use a value of @code{default} for
2646 @var{inherit}.
2647
2648 @defun face-font face &optional frame
2649 This function returns the name of the font of face @var{face}.
2650 @end defun
2651
2652 @defun face-foreground face &optional frame inherit
2653 @defunx face-background face &optional frame inherit
2654 These functions return the foreground color (or background color,
2655 respectively) of face @var{face}, as a string.
2656 @end defun
2657
2658 @defun face-stipple face &optional frame inherit
2659 This function returns the name of the background stipple pattern of face
2660 @var{face}, or @code{nil} if it doesn't have one.
2661 @end defun
2662
2663 @defun face-bold-p face &optional frame inherit
2664 This function returns a non-@code{nil} value if the @code{:weight}
2665 attribute of @var{face} is bolder than normal (i.e., one of
2666 @code{semi-bold}, @code{bold}, @code{extra-bold}, or
2667 @code{ultra-bold}). Otherwise, it returns @code{nil}.
2668 @end defun
2669
2670 @defun face-italic-p face &optional frame inherit
2671 This function returns a non-@code{nil} value if the @code{:slant}
2672 attribute of @var{face} is @code{italic} or @code{oblique}, and
2673 @code{nil} otherwise.
2674 @end defun
2675
2676 @defun face-underline-p face &optional frame inherit
2677 This function returns non-@code{nil} if face @var{face} specifies
2678 a non-@code{nil} @code{:underline} attribute.
2679 @end defun
2680
2681 @defun face-inverse-video-p face &optional frame inherit
2682 This function returns non-@code{nil} if face @var{face} specifies
2683 a non-@code{nil} @code{:inverse-video} attribute.
2684 @end defun
2685
2686 @node Displaying Faces
2687 @subsection Displaying Faces
2688 @cindex displaying faces
2689 @cindex face merging
2690
2691 When Emacs displays a given piece of text, the visual appearance of
2692 the text may be determined by faces drawn from different sources. If
2693 these various sources together specify more than one face for a
2694 particular character, Emacs merges the attributes of the various
2695 faces. Here is the order in which Emacs merges the faces, from
2696 highest to lowest priority:
2697
2698 @itemize @bullet
2699 @item
2700 If the text consists of a special glyph, the glyph can specify a
2701 particular face. @xref{Glyphs}.
2702
2703 @item
2704 If the text lies within an active region, Emacs highlights it using
2705 the @code{region} face. @xref{Standard Faces,,, emacs, The GNU Emacs
2706 Manual}.
2707
2708 @item
2709 If the text lies within an overlay with a non-@code{nil} @code{face}
2710 property, Emacs applies the face(s) specified by that property. If
2711 the overlay has a @code{mouse-face} property and the mouse is ``near
2712 enough'' to the overlay, Emacs applies the face or face attributes
2713 specified by the @code{mouse-face} property instead. @xref{Overlay
2714 Properties}.
2715
2716 When multiple overlays cover one character, an overlay with higher
2717 priority overrides those with lower priority. @xref{Overlays}.
2718
2719 @item
2720 If the text contains a @code{face} or @code{mouse-face} property,
2721 Emacs applies the specified faces and face attributes. @xref{Special
2722 Properties}. (This is how Font Lock mode faces are applied.
2723 @xref{Font Lock Mode}.)
2724
2725 @item
2726 If the text lies within the mode line of the selected window, Emacs
2727 applies the @code{mode-line} face. For the mode line of a
2728 non-selected window, Emacs applies the @code{mode-line-inactive} face.
2729 For a header line, Emacs applies the @code{header-line} face.
2730
2731 @item
2732 If any given attribute has not been specified during the preceding
2733 steps, Emacs applies the attribute of the @code{default} face.
2734 @end itemize
2735
2736 At each stage, if a face has a valid @code{:inherit} attribute,
2737 Emacs treats any attribute with an @code{unspecified} value as having
2738 the corresponding value drawn from the parent face(s). @pxref{Face
2739 Attributes}. Note that the parent face(s) may also leave the
2740 attribute unspecified; in that case, the attribute remains unspecified
2741 at the next level of face merging.
2742
2743 @node Face Remapping
2744 @subsection Face Remapping
2745 @cindex face remapping
2746
2747 The variable @code{face-remapping-alist} is used for buffer-local or
2748 global changes in the appearance of a face. For instance, it is used
2749 to implement the @code{text-scale-adjust} command (@pxref{Text
2750 Scale,,, emacs, The GNU Emacs Manual}).
2751
2752 @defvar face-remapping-alist
2753 The value of this variable is an alist whose elements have the form
2754 @code{(@var{face} . @var{remapping})}. This causes Emacs to display
2755 any text having the face @var{face} with @var{remapping}, rather than
2756 the ordinary definition of @var{face}.
2757
2758 @var{remapping} may be any face spec suitable for a @code{face} text
2759 property: either a face (i.e., a face name or a property list of
2760 attribute/value pairs), or a list of faces. For details, see the
2761 description of the @code{face} text property in @ref{Special
2762 Properties}. @var{remapping} serves as the complete specification for
2763 the remapped face---it replaces the normal definition of @var{face},
2764 instead of modifying it.
2765
2766 If @code{face-remapping-alist} is buffer-local, its local value takes
2767 effect only within that buffer.
2768
2769 Note: face remapping is non-recursive. If @var{remapping} references
2770 the same face name @var{face}, either directly or via the
2771 @code{:inherit} attribute of some other face in @var{remapping}, that
2772 reference uses the normal definition of @var{face}. For instance, if
2773 the @code{mode-line} face is remapped using this entry in
2774 @code{face-remapping-alist}:
2775
2776 @example
2777 (mode-line italic mode-line)
2778 @end example
2779
2780 @noindent
2781 then the new definition of the @code{mode-line} face inherits from the
2782 @code{italic} face, and the @emph{normal} (non-remapped) definition of
2783 @code{mode-line} face.
2784 @end defvar
2785
2786 @cindex relative remapping, faces
2787 @cindex base remapping, faces
2788 The following functions implement a higher-level interface to
2789 @code{face-remapping-alist}. Most Lisp code should use these
2790 functions instead of setting @code{face-remapping-alist} directly, to
2791 avoid trampling on remappings applied elsewhere. These functions are
2792 intended for buffer-local remappings, so they all make
2793 @code{face-remapping-alist} buffer-local as a side-effect. They manage
2794 @code{face-remapping-alist} entries of the form
2795
2796 @example
2797 (@var{face} @var{relative-spec-1} @var{relative-spec-2} @var{...} @var{base-spec})
2798 @end example
2799
2800 @noindent
2801 where, as explained above, each of the @var{relative-spec-N} and
2802 @var{base-spec} is either a face name, or a property list of
2803 attribute/value pairs. Each of the @dfn{relative remapping} entries,
2804 @var{relative-spec-N}, is managed by the
2805 @code{face-remap-add-relative} and @code{face-remap-remove-relative}
2806 functions; these are intended for simple modifications like changing
2807 the text size. The @dfn{base remapping} entry, @var{base-spec}, has
2808 the lowest priority and is managed by the @code{face-remap-set-base}
2809 and @code{face-remap-reset-base} functions; it is intended for major
2810 modes to remap faces in the buffers they control.
2811
2812 @defun face-remap-add-relative face &rest specs
2813 This function adds the face spec in @var{specs} as relative
2814 remappings for face @var{face} in the current buffer. The remaining
2815 arguments, @var{specs}, should form either a list of face names, or a
2816 property list of attribute/value pairs.
2817
2818 The return value is a Lisp object that serves as a ``cookie''; you can
2819 pass this object as an argument to @code{face-remap-remove-relative}
2820 if you need to remove the remapping later.
2821
2822 @example
2823 ;; Remap the `escape-glyph' face into a combination
2824 ;; of the `highlight' and `italic' faces:
2825 (face-remap-add-relative 'escape-glyph 'highlight 'italic)
2826
2827 ;; Increase the size of the `default' face by 50%:
2828 (face-remap-add-relative 'default :height 1.5)
2829 @end example
2830 @end defun
2831
2832 @defun face-remap-remove-relative cookie
2833 This function removes a relative remapping previously added by
2834 @code{face-remap-add-relative}. @var{cookie} should be the Lisp
2835 object returned by @code{face-remap-add-relative} when the remapping
2836 was added.
2837 @end defun
2838
2839 @defun face-remap-set-base face &rest specs
2840 This function sets the base remapping of @var{face} in the current
2841 buffer to @var{specs}. If @var{specs} is empty, the default base
2842 remapping is restored, similar to calling @code{face-remap-reset-base}
2843 (see below); note that this is different from @var{specs} containing a
2844 single value @code{nil}, which has the opposite result (the global
2845 definition of @var{face} is ignored).
2846
2847 This overwrites the default @var{base-spec}, which inherits the global
2848 face definition, so it is up to the caller to add such inheritance if
2849 so desired.
2850 @end defun
2851
2852 @defun face-remap-reset-base face
2853 This function sets the base remapping of @var{face} to its default
2854 value, which inherits from @var{face}'s global definition.
2855 @end defun
2856
2857 @node Face Functions
2858 @subsection Functions for Working with Faces
2859
2860 Here are additional functions for creating and working with faces.
2861
2862 @defun face-list
2863 This function returns a list of all defined face names.
2864 @end defun
2865
2866 @defun face-id face
2867 This function returns the @dfn{face number} of face @var{face}. This
2868 is a number that uniquely identifies a face at low levels within
2869 Emacs. It is seldom necessary to refer to a face by its face number.
2870 @end defun
2871
2872 @defun face-documentation face
2873 This function returns the documentation string of face @var{face}, or
2874 @code{nil} if none was specified for it.
2875 @end defun
2876
2877 @defun face-equal face1 face2 &optional frame
2878 This returns @code{t} if the faces @var{face1} and @var{face2} have the
2879 same attributes for display.
2880 @end defun
2881
2882 @defun face-differs-from-default-p face &optional frame
2883 This returns non-@code{nil} if the face @var{face} displays
2884 differently from the default face.
2885 @end defun
2886
2887 @cindex face alias
2888 @cindex alias, for faces
2889 A @dfn{face alias} provides an equivalent name for a face. You can
2890 define a face alias by giving the alias symbol the @code{face-alias}
2891 property, with a value of the target face name. The following example
2892 makes @code{modeline} an alias for the @code{mode-line} face.
2893
2894 @example
2895 (put 'modeline 'face-alias 'mode-line)
2896 @end example
2897
2898 @defmac define-obsolete-face-alias obsolete-face current-face when
2899 This macro defines @code{obsolete-face} as an alias for
2900 @var{current-face}, and also marks it as obsolete, indicating that it
2901 may be removed in future. @var{when} should be a string indicating
2902 when @code{obsolete-face} was made obsolete (usually a version number
2903 string).
2904 @end defmac
2905
2906 @node Auto Faces
2907 @subsection Automatic Face Assignment
2908 @cindex automatic face assignment
2909 @cindex faces, automatic choice
2910
2911 This hook is used for automatically assigning faces to text in the
2912 buffer. It is part of the implementation of Jit-Lock mode, used by
2913 Font-Lock.
2914
2915 @defvar fontification-functions
2916 This variable holds a list of functions that are called by Emacs
2917 redisplay as needed, just before doing redisplay. They are called even
2918 when Font Lock Mode isn't enabled. When Font Lock Mode is enabled, this
2919 variable usually holds just one function, @code{jit-lock-function}.
2920
2921 The functions are called in the order listed, with one argument, a
2922 buffer position @var{pos}. Collectively they should attempt to assign
2923 faces to the text in the current buffer starting at @var{pos}.
2924
2925 The functions should record the faces they assign by setting the
2926 @code{face} property. They should also add a non-@code{nil}
2927 @code{fontified} property to all the text they have assigned faces to.
2928 That property tells redisplay that faces have been assigned to that text
2929 already.
2930
2931 It is probably a good idea for the functions to do nothing if the
2932 character after @var{pos} already has a non-@code{nil} @code{fontified}
2933 property, but this is not required. If one function overrides the
2934 assignments made by a previous one, the properties after the last
2935 function finishes are the ones that really matter.
2936
2937 For efficiency, we recommend writing these functions so that they
2938 usually assign faces to around 400 to 600 characters at each call.
2939 @end defvar
2940
2941 @node Basic Faces
2942 @subsection Basic Faces
2943 @cindex basic faces
2944
2945 If your Emacs Lisp program needs to assign some faces to text, it is
2946 often a good idea to use certain existing faces or inherit from them,
2947 rather than defining entirely new faces. This way, if other users
2948 have customized the basic faces to give Emacs a certain look, your
2949 program will ``fit in'' without additional customization.
2950
2951 Some of the basic faces defined in Emacs are listed below. In
2952 addition to these, you might want to make use of the Font Lock faces
2953 for syntactic highlighting, if highlighting is not already handled by
2954 Font Lock mode, or if some Font Lock faces are not in use.
2955 @xref{Faces for Font Lock}.
2956
2957 @table @code
2958 @item default
2959 The default face, whose attributes are all specified. All other faces
2960 implicitly inherit from it: any unspecified attribute defaults to the
2961 attribute on this face (@pxref{Face Attributes}).
2962
2963 @item bold
2964 @itemx italic
2965 @itemx bold-italic
2966 @itemx underline
2967 @itemx fixed-pitch
2968 @itemx variable-pitch
2969 These have the attributes indicated by their names (e.g., @code{bold}
2970 has a bold @code{:weight} attribute), with all other attributes
2971 unspecified (and so given by @code{default}).
2972
2973 @item shadow
2974 For ``dimmed out'' text. For example, it is used for the ignored
2975 part of a filename in the minibuffer (@pxref{Minibuffer File,,
2976 Minibuffers for File Names, emacs, The GNU Emacs Manual}).
2977
2978 @item link
2979 @itemx link-visited
2980 For clickable text buttons that send the user to a different
2981 buffer or ``location''.
2982
2983 @item highlight
2984 For stretches of text that should temporarily stand out. For example,
2985 it is commonly assigned to the @code{mouse-face} property for cursor
2986 highlighting (@pxref{Special Properties}).
2987
2988 @item match
2989 For text matching a search command.
2990
2991 @item error
2992 @itemx warning
2993 @itemx success
2994 For text concerning errors, warnings, or successes. For example,
2995 these are used for messages in @file{*Compilation*} buffers.
2996 @end table
2997
2998 @node Font Selection
2999 @subsection Font Selection
3000 @cindex font selection
3001 @cindex selecting a font
3002
3003 Before Emacs can draw a character on a graphical display, it must
3004 select a @dfn{font} for that character@footnote{In this context, the
3005 term @dfn{font} has nothing to do with Font Lock (@pxref{Font Lock
3006 Mode}).}. @xref{Fonts,,, emacs, The GNU Emacs Manual}. Normally,
3007 Emacs automatically chooses a font based on the faces assigned to that
3008 character---specifically, the face attributes @code{:family},
3009 @code{:weight}, @code{:slant}, and @code{:width} (@pxref{Face
3010 Attributes}). The choice of font also depends on the character to be
3011 displayed; some fonts can only display a limited set of characters.
3012 If no available font exactly fits the requirements, Emacs looks for
3013 the @dfn{closest matching font}. The variables in this section
3014 control how Emacs makes this selection.
3015
3016 @defopt face-font-family-alternatives
3017 If a given family is specified but does not exist, this variable
3018 specifies alternative font families to try. Each element should have
3019 this form:
3020
3021 @example
3022 (@var{family} @var{alternate-families}@dots{})
3023 @end example
3024
3025 If @var{family} is specified but not available, Emacs will try the other
3026 families given in @var{alternate-families}, one by one, until it finds a
3027 family that does exist.
3028 @end defopt
3029
3030 @defopt face-font-selection-order
3031 If there is no font that exactly matches all desired face attributes
3032 (@code{:width}, @code{:height}, @code{:weight}, and @code{:slant}),
3033 this variable specifies the order in which these attributes should be
3034 considered when selecting the closest matching font. The value should
3035 be a list containing those four attribute symbols, in order of
3036 decreasing importance. The default is @code{(:width :height :weight
3037 :slant)}.
3038
3039 Font selection first finds the best available matches for the first
3040 attribute in the list; then, among the fonts which are best in that
3041 way, it searches for the best matches in the second attribute, and so
3042 on.
3043
3044 The attributes @code{:weight} and @code{:width} have symbolic values in
3045 a range centered around @code{normal}. Matches that are more extreme
3046 (farther from @code{normal}) are somewhat preferred to matches that are
3047 less extreme (closer to @code{normal}); this is designed to ensure that
3048 non-normal faces contrast with normal ones, whenever possible.
3049
3050 One example of a case where this variable makes a difference is when the
3051 default font has no italic equivalent. With the default ordering, the
3052 @code{italic} face will use a non-italic font that is similar to the
3053 default one. But if you put @code{:slant} before @code{:height}, the
3054 @code{italic} face will use an italic font, even if its height is not
3055 quite right.
3056 @end defopt
3057
3058 @defopt face-font-registry-alternatives
3059 This variable lets you specify alternative font registries to try, if a
3060 given registry is specified and doesn't exist. Each element should have
3061 this form:
3062
3063 @example
3064 (@var{registry} @var{alternate-registries}@dots{})
3065 @end example
3066
3067 If @var{registry} is specified but not available, Emacs will try the
3068 other registries given in @var{alternate-registries}, one by one,
3069 until it finds a registry that does exist.
3070 @end defopt
3071
3072 @cindex scalable fonts
3073 Emacs can make use of scalable fonts, but by default it does not use
3074 them.
3075
3076 @defopt scalable-fonts-allowed
3077 This variable controls which scalable fonts to use. A value of
3078 @code{nil}, the default, means do not use scalable fonts. @code{t}
3079 means to use any scalable font that seems appropriate for the text.
3080
3081 Otherwise, the value must be a list of regular expressions. Then a
3082 scalable font is enabled for use if its name matches any regular
3083 expression in the list. For example,
3084
3085 @example
3086 (setq scalable-fonts-allowed '("iso10646-1$"))
3087 @end example
3088
3089 @noindent
3090 allows the use of scalable fonts with registry @code{iso10646-1}.
3091 @end defopt
3092
3093 @defvar face-font-rescale-alist
3094 This variable specifies scaling for certain faces. Its value should
3095 be a list of elements of the form
3096
3097 @example
3098 (@var{fontname-regexp} . @var{scale-factor})
3099 @end example
3100
3101 If @var{fontname-regexp} matches the font name that is about to be
3102 used, this says to choose a larger similar font according to the
3103 factor @var{scale-factor}. You would use this feature to normalize
3104 the font size if certain fonts are bigger or smaller than their
3105 nominal heights and widths would suggest.
3106 @end defvar
3107
3108 @node Font Lookup
3109 @subsection Looking Up Fonts
3110 @cindex font lookup
3111 @cindex looking up fonts
3112
3113 @defun x-list-fonts name &optional reference-face frame maximum width
3114 This function returns a list of available font names that match
3115 @var{name}. @var{name} should be a string containing a font name in
3116 either the Fontconfig, GTK, or XLFD format (@pxref{Fonts,,, emacs, The
3117 GNU Emacs Manual}). Within an XLFD string, wildcard characters may be
3118 used: the @samp{*} character matches any substring, and the @samp{?}
3119 character matches any single character. Case is ignored when matching
3120 font names.
3121
3122 If the optional arguments @var{reference-face} and @var{frame} are
3123 specified, the returned list includes only fonts that are the same
3124 size as @var{reference-face} (a face name) currently is on the frame
3125 @var{frame}.
3126
3127 The optional argument @var{maximum} sets a limit on how many fonts to
3128 return. If it is non-@code{nil}, then the return value is truncated
3129 after the first @var{maximum} matching fonts. Specifying a small
3130 value for @var{maximum} can make this function much faster, in cases
3131 where many fonts match the pattern.
3132
3133 The optional argument @var{width} specifies a desired font width. If
3134 it is non-@code{nil}, the function only returns those fonts whose
3135 characters are (on average) @var{width} times as wide as
3136 @var{reference-face}.
3137 @end defun
3138
3139 @defun x-family-fonts &optional family frame
3140 This function returns a list describing the available fonts for family
3141 @var{family} on @var{frame}. If @var{family} is omitted or @code{nil},
3142 this list applies to all families, and therefore, it contains all
3143 available fonts. Otherwise, @var{family} must be a string; it may
3144 contain the wildcards @samp{?} and @samp{*}.
3145
3146 The list describes the display that @var{frame} is on; if @var{frame} is
3147 omitted or @code{nil}, it applies to the selected frame's display
3148 (@pxref{Input Focus}).
3149
3150 Each element in the list is a vector of the following form:
3151
3152 @example
3153 [@var{family} @var{width} @var{point-size} @var{weight} @var{slant}
3154 @var{fixed-p} @var{full} @var{registry-and-encoding}]
3155 @end example
3156
3157 The first five elements correspond to face attributes; if you
3158 specify these attributes for a face, it will use this font.
3159
3160 The last three elements give additional information about the font.
3161 @var{fixed-p} is non-@code{nil} if the font is fixed-pitch.
3162 @var{full} is the full name of the font, and
3163 @var{registry-and-encoding} is a string giving the registry and
3164 encoding of the font.
3165 @end defun
3166
3167 @node Fontsets
3168 @subsection Fontsets
3169 @cindex fontset
3170
3171 A @dfn{fontset} is a list of fonts, each assigned to a range of
3172 character codes. An individual font cannot display the whole range of
3173 characters that Emacs supports, but a fontset can. Fontsets have names,
3174 just as fonts do, and you can use a fontset name in place of a font name
3175 when you specify the ``font'' for a frame or a face. Here is
3176 information about defining a fontset under Lisp program control.
3177
3178 @defun create-fontset-from-fontset-spec fontset-spec &optional style-variant-p noerror
3179 This function defines a new fontset according to the specification
3180 string @var{fontset-spec}. The string should have this format:
3181
3182 @smallexample
3183 @var{fontpattern}, @r{[}@var{charset}:@var{font}@r{]@dots{}}
3184 @end smallexample
3185
3186 @noindent
3187 Whitespace characters before and after the commas are ignored.
3188
3189 The first part of the string, @var{fontpattern}, should have the form of
3190 a standard X font name, except that the last two fields should be
3191 @samp{fontset-@var{alias}}.
3192
3193 The new fontset has two names, one long and one short. The long name is
3194 @var{fontpattern} in its entirety. The short name is
3195 @samp{fontset-@var{alias}}. You can refer to the fontset by either
3196 name. If a fontset with the same name already exists, an error is
3197 signaled, unless @var{noerror} is non-@code{nil}, in which case this
3198 function does nothing.
3199
3200 If optional argument @var{style-variant-p} is non-@code{nil}, that says
3201 to create bold, italic and bold-italic variants of the fontset as well.
3202 These variant fontsets do not have a short name, only a long one, which
3203 is made by altering @var{fontpattern} to indicate the bold and/or italic
3204 status.
3205
3206 The specification string also says which fonts to use in the fontset.
3207 See below for the details.
3208 @end defun
3209
3210 The construct @samp{@var{charset}:@var{font}} specifies which font to
3211 use (in this fontset) for one particular character set. Here,
3212 @var{charset} is the name of a character set, and @var{font} is the font
3213 to use for that character set. You can use this construct any number of
3214 times in the specification string.
3215
3216 For the remaining character sets, those that you don't specify
3217 explicitly, Emacs chooses a font based on @var{fontpattern}: it replaces
3218 @samp{fontset-@var{alias}} with a value that names one character set.
3219 For the @acronym{ASCII} character set, @samp{fontset-@var{alias}} is replaced
3220 with @samp{ISO8859-1}.
3221
3222 In addition, when several consecutive fields are wildcards, Emacs
3223 collapses them into a single wildcard. This is to prevent use of
3224 auto-scaled fonts. Fonts made by scaling larger fonts are not usable
3225 for editing, and scaling a smaller font is not useful because it is
3226 better to use the smaller font in its own size, which Emacs does.
3227
3228 Thus if @var{fontpattern} is this,
3229
3230 @example
3231 -*-fixed-medium-r-normal-*-24-*-*-*-*-*-fontset-24
3232 @end example
3233
3234 @noindent
3235 the font specification for @acronym{ASCII} characters would be this:
3236
3237 @example
3238 -*-fixed-medium-r-normal-*-24-*-ISO8859-1
3239 @end example
3240
3241 @noindent
3242 and the font specification for Chinese GB2312 characters would be this:
3243
3244 @example
3245 -*-fixed-medium-r-normal-*-24-*-gb2312*-*
3246 @end example
3247
3248 You may not have any Chinese font matching the above font
3249 specification. Most X distributions include only Chinese fonts that
3250 have @samp{song ti} or @samp{fangsong ti} in the @var{family} field. In
3251 such a case, @samp{Fontset-@var{n}} can be specified as below:
3252
3253 @smallexample
3254 Emacs.Fontset-0: -*-fixed-medium-r-normal-*-24-*-*-*-*-*-fontset-24,\
3255 chinese-gb2312:-*-*-medium-r-normal-*-24-*-gb2312*-*
3256 @end smallexample
3257
3258 @noindent
3259 Then, the font specifications for all but Chinese GB2312 characters have
3260 @samp{fixed} in the @var{family} field, and the font specification for
3261 Chinese GB2312 characters has a wild card @samp{*} in the @var{family}
3262 field.
3263
3264 @defun set-fontset-font name character font-spec &optional frame add
3265 This function modifies the existing fontset @var{name} to use the font
3266 matching with @var{font-spec} for the character @var{character}.
3267
3268 If @var{name} is @code{nil}, this function modifies the fontset of the
3269 selected frame or that of @var{frame} if @var{frame} is not
3270 @code{nil}.
3271
3272 If @var{name} is @code{t}, this function modifies the default
3273 fontset, whose short name is @samp{fontset-default}.
3274
3275 @var{character} may be a cons; @code{(@var{from} . @var{to})}, where
3276 @var{from} and @var{to} are character codepoints. In that case, use
3277 @var{font-spec} for all characters in the range @var{from} and @var{to}
3278 (inclusive).
3279
3280 @var{character} may be a charset. In that case, use
3281 @var{font-spec} for all character in the charsets.
3282
3283 @var{character} may be a script name. In that case, use
3284 @var{font-spec} for all character in the charsets.
3285
3286 @var{font-spec} may be a cons; @code{(@var{family} . @var{registry})},
3287 where @var{family} is a family name of a font (possibly including a
3288 foundry name at the head), @var{registry} is a registry name of a font
3289 (possibly including an encoding name at the tail).
3290
3291 @var{font-spec} may be a font name string.
3292
3293 The optional argument @var{add}, if non-@code{nil}, specifies how to
3294 add @var{font-spec} to the font specifications previously set. If it
3295 is @code{prepend}, @var{font-spec} is prepended. If it is
3296 @code{append}, @var{font-spec} is appended. By default,
3297 @var{font-spec} overrides the previous settings.
3298
3299 For instance, this changes the default fontset to use a font of which
3300 family name is @samp{Kochi Gothic} for all characters belonging to
3301 the charset @code{japanese-jisx0208}.
3302
3303 @smallexample
3304 (set-fontset-font t 'japanese-jisx0208
3305 (font-spec :family "Kochi Gothic"))
3306 @end smallexample
3307 @end defun
3308
3309 @defun char-displayable-p char
3310 This function returns @code{t} if Emacs ought to be able to display
3311 @var{char}. More precisely, if the selected frame's fontset has a
3312 font to display the character set that @var{char} belongs to.
3313
3314 Fontsets can specify a font on a per-character basis; when the fontset
3315 does that, this function's value may not be accurate.
3316 @end defun
3317
3318 @node Low-Level Font
3319 @subsection Low-Level Font Representation
3320 @cindex font property
3321
3322 Normally, it is not necessary to manipulate fonts directly. In case
3323 you need to do so, this section explains how.
3324
3325 In Emacs Lisp, fonts are represented using three different Lisp
3326 object types: @dfn{font objects}, @dfn{font specs}, and @dfn{font
3327 entities}.
3328
3329 @defun fontp object &optional type
3330 Return @code{t} if @var{object} is a font object, font spec, or font
3331 entity. Otherwise, return @code{nil}.
3332
3333 The optional argument @var{type}, if non-@code{nil}, determines the
3334 exact type of Lisp object to check for. In that case, @var{type}
3335 should be one of @code{font-object}, @code{font-spec}, or
3336 @code{font-entity}.
3337 @end defun
3338
3339 @cindex font object
3340 A font object is a Lisp object that represents a font that Emacs has
3341 @dfn{opened}. Font objects cannot be modified in Lisp, but they can
3342 be inspected.
3343
3344 @defun font-at position &optional window string
3345 Return the font object that is being used to display the character at
3346 position @var{position} in the window @var{window}. If @var{window}
3347 is @code{nil}, it defaults to the selected window. If @var{string} is
3348 @code{nil}, @var{position} specifies a position in the current buffer;
3349 otherwise, @var{string} should be a string, and @var{position}
3350 specifies a position in that string.
3351 @end defun
3352
3353 @cindex font spec
3354 A font spec is a Lisp object that contains a set of specifications
3355 that can be used to find a font. More than one font may match the
3356 specifications in a font spec.
3357
3358 @defun font-spec &rest arguments
3359 Return a new font spec using the specifications in @var{arguments},
3360 which should come in @code{property}-@code{value} pairs. The possible
3361 specifications are as follows:
3362
3363 @table @code
3364 @item :name
3365 The font name (a string), in either XLFD, Fontconfig, or GTK format.
3366 @xref{Fonts,,, emacs, The GNU Emacs Manual}.
3367
3368 @item :family
3369 @itemx :foundry
3370 @itemx :weight
3371 @itemx :slant
3372 @itemx :width
3373 These have the same meanings as the face attributes of the same name.
3374 @xref{Face Attributes}.
3375
3376 @item :size
3377 The font size---either a non-negative integer that specifies the pixel
3378 size, or a floating-point number that specifies the point size.
3379
3380 @item :adstyle
3381 Additional typographic style information for the font, such as
3382 @samp{sans}. The value should be a string or a symbol.
3383
3384 @cindex font registry
3385 @item :registry
3386 The charset registry and encoding of the font, such as
3387 @samp{iso8859-1}. The value should be a string or a symbol.
3388
3389 @item :script
3390 The script that the font must support (a symbol).
3391
3392 @item :otf
3393 @cindex OpenType font
3394 The font must be an OpenType font that supports these OpenType
3395 features, provided Emacs is compiled with a library, such as
3396 @samp{libotf} on GNU/Linux, that supports complex text layout for
3397 scripts which need that. The value must be a list of the form
3398
3399 @smallexample
3400 @code{(@var{script-tag} @var{langsys-tag} @var{gsub} @var{gpos})}
3401 @end smallexample
3402
3403 where @var{script-tag} is the OpenType script tag symbol;
3404 @var{langsys-tag} is the OpenType language system tag symbol, or
3405 @code{nil} to use the default language system; @code{gsub} is a list
3406 of OpenType GSUB feature tag symbols, or @code{nil} if none is
3407 required; and @code{gpos} is a list of OpenType GPOS feature tag
3408 symbols, or @code{nil} if none is required. If @code{gsub} or
3409 @code{gpos} is a list, a @code{nil} element in that list means that
3410 the font must not match any of the remaining tag symbols. The
3411 @code{gpos} element may be omitted.
3412 @end table
3413 @end defun
3414
3415 @defun font-put font-spec property value
3416 Set the font property @var{property} in the font-spec @var{font-spec}
3417 to @var{value}.
3418 @end defun
3419
3420 @cindex font entity
3421 A font entity is a reference to a font that need not be open. Its
3422 properties are intermediate between a font object and a font spec:
3423 like a font object, and unlike a font spec, it refers to a single,
3424 specific font. Unlike a font object, creating a font entity does not
3425 load the contents of that font into computer memory. Emacs may open
3426 multiple font objects of different sizes from a single font entity
3427 referring to a scalable font.
3428
3429 @defun find-font font-spec &optional frame
3430 This function returns a font entity that best matches the font spec
3431 @var{font-spec} on frame @var{frame}. If @var{frame} is @code{nil},
3432 it defaults to the selected frame.
3433 @end defun
3434
3435 @defun list-fonts font-spec &optional frame num prefer
3436 This function returns a list of all font entities that match the font
3437 spec @var{font-spec}.
3438
3439 The optional argument @var{frame}, if non-@code{nil}, specifies the
3440 frame on which the fonts are to be displayed. The optional argument
3441 @var{num}, if non-@code{nil}, should be an integer that specifies the
3442 maximum length of the returned list. The optional argument
3443 @var{prefer}, if non-@code{nil}, should be another font spec, which is
3444 used to control the order of the returned list; the returned font
3445 entities are sorted in order of decreasing ``closeness'' to that font
3446 spec.
3447 @end defun
3448
3449 If you call @code{set-face-attribute} and pass a font spec, font
3450 entity, or font name string as the value of the @code{:font}
3451 attribute, Emacs opens the best ``matching'' font that is available
3452 for display. It then stores the corresponding font object as the
3453 actual value of the @code{:font} attribute for that face.
3454
3455 The following functions can be used to obtain information about a
3456 font. For these functions, the @var{font} argument can be a font
3457 object, a font entity, or a font spec.
3458
3459 @defun font-get font property
3460 This function returns the value of the font property @var{property}
3461 for @var{font}.
3462
3463 If @var{font} is a font spec and the font spec does not specify
3464 @var{property}, the return value is @code{nil}. If @var{font} is a
3465 font object or font entity, the value for the @var{:script} property
3466 may be a list of scripts supported by the font.
3467 @end defun
3468
3469 @defun font-face-attributes font &optional frame
3470 This function returns a list of face attributes corresponding to
3471 @var{font}. The optional argument @var{frame} specifies the frame on
3472 which the font is to be displayed. If it is @code{nil}, the selected
3473 frame is used. The return value has the form
3474
3475 @smallexample
3476 (:family @var{family} :height @var{height} :weight @var{weight}
3477 :slant @var{slant} :width @var{width})
3478 @end smallexample
3479
3480 where the values of @var{family}, @var{height}, @var{weight},
3481 @var{slant}, and @var{width} are face attribute values. Some of these
3482 key-attribute pairs may be omitted from the list if they are not
3483 specified by @var{font}.
3484 @end defun
3485
3486 @defun font-xlfd-name font &optional fold-wildcards
3487 This function returns the XLFD (X Logical Font Descriptor), a string,
3488 matching @var{font}. @xref{Fonts,,, emacs, The GNU Emacs Manual}, for
3489 information about XLFDs. If the name is too long for an XLFD (which
3490 can contain at most 255 characters), the function returns @code{nil}.
3491
3492 If the optional argument @var{fold-wildcards} is non-@code{nil},
3493 consecutive wildcards in the XLFD are folded into one.
3494 @end defun
3495
3496 The following two functions return important information about a font.
3497
3498 @defun font-info name &optional frame
3499 This function returns information about a font specified by its
3500 @var{name}, a string, as it is used on @var{frame}. If @var{frame} is
3501 omitted or @code{nil}, it defaults to the selected frame.
3502
3503 The value returned by the function is a vector of the form
3504 @code{[@var{opened-name} @var{full-name} @var{size} @var{height}
3505 @var{baseline-offset} @var{relative-compose} @var{default-ascent}
3506 @var{max-width} @var{ascent} @var{descent} @var{space-width}
3507 @var{average-width} @var{filename} @var{capability}]}. Here's the
3508 description of each components of this vector:
3509
3510 @table @var
3511 @item opened-name
3512 The name used to open the font, a string.
3513
3514 @item full-name
3515 The full name of the font, a string.
3516
3517 @item size
3518 The pixel size of the font.
3519
3520 @item height
3521 The height of the font in pixels.
3522
3523 @item baseline-offset
3524 The offset in pixels from the @acronym{ASCII} baseline, positive
3525 upward.
3526
3527 @item relative-compose
3528 @itemx default-ascent
3529 Numbers controlling how to compose characters.
3530
3531 @item ascent
3532 @itemx descent
3533 The ascent and descent of this font. The sum of these two numbers
3534 should be equal to the value of @var{height} above.
3535
3536 @item space-width
3537 The width, in pixels, of the font's space character.
3538
3539 @item average-width
3540 The average width of the font characters. If this is zero, Emacs uses
3541 the value of @var{space-width} instead, when it calculates text layout
3542 on display.
3543
3544 @item filename
3545 The file name of the font as a string. This can be @code{nil} if the
3546 font back-end does not provide a way to find out the font's file name.
3547
3548 @item capability
3549 A list whose first element is a symbol representing the font type, one
3550 of @code{x}, @code{opentype}, @code{truetype}, @code{type1},
3551 @code{pcf}, or @code{bdf}. For OpenType fonts, the list includes 2
3552 additional elements describing the @sc{gsub} and @sc{gpos} features
3553 supported by the font. Each of these elements is a list of the form
3554 @code{((@var{script} (@var{langsys} @var{feature} @dots{}) @dots{})
3555 @dots{})}, where @var{script} is a symbol representing an OpenType
3556 script tag, @var{langsys} is a symbol representing an OpenType langsys
3557 tag (or @code{nil}, which stands for the default langsys), and each
3558 @var{feature} is a symbol representing an OpenType feature tag.
3559 @end table
3560 @end defun
3561
3562 @defun query-font font-object
3563 This function returns information about a @var{font-object}. (This is
3564 in contrast to @code{font-info}, which takes the font name, a string,
3565 as its argument.)
3566
3567 The value returned by the function is a vector of the form
3568 @code{[@var{name} @var{filename} @var{pixel-size} @var{max-width}
3569 @var{ascent} @var{descent} @var{space-width} @var{average-width}
3570 @var{capability}]}. Here's the description of each components of this
3571 vector:
3572
3573 @table @var
3574 @item name
3575 The font name, a string.
3576
3577 @item filename
3578 The file name of the font as a string. This can be @code{nil} if the
3579 font back-end does not provide a way to find out the font's file name.
3580
3581 @item pixel-size
3582 The pixel size of the font used to open the font.
3583
3584 @item max-width
3585 The maximum advance width of the font.
3586
3587 @item ascent
3588 @itemx descent
3589 The ascent and descent of this font. The sum of these two numbers
3590 gives the font height.
3591
3592 @item space-width
3593 The width, in pixels, of the font's space character.
3594
3595 @item average-width
3596 The average width of the font characters. If this is zero, Emacs uses
3597 the value of @var{space-width} instead, when it calculates text layout
3598 on display.
3599
3600 @item capability
3601 A list whose first element is a symbol representing the font type, one
3602 of @code{x}, @code{opentype}, @code{truetype}, @code{type1},
3603 @code{pcf}, or @code{bdf}. For OpenType fonts, the list includes 2
3604 additional elements describing the @sc{gsub} and @sc{gpos} features
3605 supported by the font. Each of these elements is a list of the form
3606 @code{((@var{script} (@var{langsys} @var{feature} @dots{}) @dots{})
3607 @dots{})}, where @var{script} is a symbol representing an OpenType
3608 script tag, @var{langsys} is a symbol representing an OpenType langsys
3609 tag (or @code{nil}, which stands for the default langsys), and each
3610 @var{feature} is a symbol representing an OpenType feature tag.
3611 @end table
3612 @end defun
3613
3614 @node Fringes
3615 @section Fringes
3616 @cindex fringes
3617
3618 On graphical displays, Emacs draws @dfn{fringes} next to each
3619 window: thin vertical strips down the sides which can display bitmaps
3620 indicating truncation, continuation, horizontal scrolling, and so on.
3621
3622 @menu
3623 * Fringe Size/Pos:: Specifying where to put the window fringes.
3624 * Fringe Indicators:: Displaying indicator icons in the window fringes.
3625 * Fringe Cursors:: Displaying cursors in the right fringe.
3626 * Fringe Bitmaps:: Specifying bitmaps for fringe indicators.
3627 * Customizing Bitmaps:: Specifying your own bitmaps to use in the fringes.
3628 * Overlay Arrow:: Display of an arrow to indicate position.
3629 @end menu
3630
3631 @node Fringe Size/Pos
3632 @subsection Fringe Size and Position
3633
3634 The following buffer-local variables control the position and width
3635 of fringes in windows showing that buffer.
3636
3637 @defvar fringes-outside-margins
3638 The fringes normally appear between the display margins and the window
3639 text. If the value is non-@code{nil}, they appear outside the display
3640 margins. @xref{Display Margins}.
3641 @end defvar
3642
3643 @defvar left-fringe-width
3644 This variable, if non-@code{nil}, specifies the width of the left
3645 fringe in pixels. A value of @code{nil} means to use the left fringe
3646 width from the window's frame.
3647 @end defvar
3648
3649 @defvar right-fringe-width
3650 This variable, if non-@code{nil}, specifies the width of the right
3651 fringe in pixels. A value of @code{nil} means to use the right fringe
3652 width from the window's frame.
3653 @end defvar
3654
3655 Any buffer which does not specify values for these variables uses
3656 the values specified by the @code{left-fringe} and @code{right-fringe}
3657 frame parameters (@pxref{Layout Parameters}).
3658
3659 The above variables actually take effect via the function
3660 @code{set-window-buffer} (@pxref{Buffers and Windows}), which calls
3661 @code{set-window-fringes} as a subroutine. If you change one of these
3662 variables, the fringe display is not updated in existing windows
3663 showing the buffer, unless you call @code{set-window-buffer} again in
3664 each affected window. You can also use @code{set-window-fringes} to
3665 control the fringe display in individual windows.
3666
3667 @defun set-window-fringes window left &optional right outside-margins
3668 This function sets the fringe widths of window @var{window}.
3669 If @var{window} is @code{nil}, the selected window is used.
3670
3671 The argument @var{left} specifies the width in pixels of the left
3672 fringe, and likewise @var{right} for the right fringe. A value of
3673 @code{nil} for either one stands for the default width. If
3674 @var{outside-margins} is non-@code{nil}, that specifies that fringes
3675 should appear outside of the display margins.
3676 @end defun
3677
3678 @defun window-fringes &optional window
3679 This function returns information about the fringes of a window
3680 @var{window}. If @var{window} is omitted or @code{nil}, the selected
3681 window is used. The value has the form @code{(@var{left-width}
3682 @var{right-width} @var{outside-margins})}.
3683 @end defun
3684
3685
3686 @node Fringe Indicators
3687 @subsection Fringe Indicators
3688 @cindex fringe indicators
3689 @cindex indicators, fringe
3690
3691 @dfn{Fringe indicators} are tiny icons displayed in the window
3692 fringe to indicate truncated or continued lines, buffer boundaries,
3693 etc.
3694
3695 @defopt indicate-empty-lines
3696 @cindex fringes, and empty line indication
3697 @cindex empty lines, indicating
3698 When this is non-@code{nil}, Emacs displays a special glyph in the
3699 fringe of each empty line at the end of the buffer, on graphical
3700 displays. @xref{Fringes}. This variable is automatically
3701 buffer-local in every buffer.
3702 @end defopt
3703
3704 @defopt indicate-buffer-boundaries
3705 @cindex buffer boundaries, indicating
3706 This buffer-local variable controls how the buffer boundaries and
3707 window scrolling are indicated in the window fringes.
3708
3709 Emacs can indicate the buffer boundaries---that is, the first and last
3710 line in the buffer---with angle icons when they appear on the screen.
3711 In addition, Emacs can display an up-arrow in the fringe to show
3712 that there is text above the screen, and a down-arrow to show
3713 there is text below the screen.
3714
3715 There are three kinds of basic values:
3716
3717 @table @asis
3718 @item @code{nil}
3719 Don't display any of these fringe icons.
3720 @item @code{left}
3721 Display the angle icons and arrows in the left fringe.
3722 @item @code{right}
3723 Display the angle icons and arrows in the right fringe.
3724 @item any non-alist
3725 Display the angle icons in the left fringe
3726 and don't display the arrows.
3727 @end table
3728
3729 Otherwise the value should be an alist that specifies which fringe
3730 indicators to display and where. Each element of the alist should
3731 have the form @code{(@var{indicator} . @var{position})}. Here,
3732 @var{indicator} is one of @code{top}, @code{bottom}, @code{up},
3733 @code{down}, and @code{t} (which covers all the icons not yet
3734 specified), while @var{position} is one of @code{left}, @code{right}
3735 and @code{nil}.
3736
3737 For example, @code{((top . left) (t . right))} places the top angle
3738 bitmap in left fringe, and the bottom angle bitmap as well as both
3739 arrow bitmaps in right fringe. To show the angle bitmaps in the left
3740 fringe, and no arrow bitmaps, use @code{((top . left) (bottom . left))}.
3741 @end defopt
3742
3743 @defvar fringe-indicator-alist
3744 This buffer-local variable specifies the mapping from logical fringe
3745 indicators to the actual bitmaps displayed in the window fringes. The
3746 value is an alist of elements @code{(@var{indicator}
3747 . @var{bitmaps})}, where @var{indicator} specifies a logical indicator
3748 type and @var{bitmaps} specifies the fringe bitmaps to use for that
3749 indicator.
3750
3751 Each @var{indicator} should be one of the following symbols:
3752
3753 @table @asis
3754 @item @code{truncation}, @code{continuation}.
3755 Used for truncation and continuation lines.
3756
3757 @item @code{up}, @code{down}, @code{top}, @code{bottom}, @code{top-bottom}
3758 Used when @code{indicate-buffer-boundaries} is non-@code{nil}:
3759 @code{up} and @code{down} indicate a buffer boundary lying above or
3760 below the window edge; @code{top} and @code{bottom} indicate the
3761 topmost and bottommost buffer text line; and @code{top-bottom}
3762 indicates where there is just one line of text in the buffer.
3763
3764 @item @code{empty-line}
3765 Used to indicate empty lines when @code{indicate-empty-lines} is
3766 non-@code{nil}.
3767
3768 @item @code{overlay-arrow}
3769 Used for overlay arrows (@pxref{Overlay Arrow}).
3770 @c Is this used anywhere?
3771 @c @item Unknown bitmap indicator:
3772 @c @code{unknown}.
3773 @end table
3774
3775 Each @var{bitmaps} value may be a list of symbols @code{(@var{left}
3776 @var{right} [@var{left1} @var{right1}])}. The @var{left} and
3777 @var{right} symbols specify the bitmaps shown in the left and/or right
3778 fringe, for the specific indicator. @var{left1} and @var{right1} are
3779 specific to the @code{bottom} and @code{top-bottom} indicators, and
3780 are used to indicate that the last text line has no final newline.
3781 Alternatively, @var{bitmaps} may be a single symbol which is used in
3782 both left and right fringes.
3783
3784 @xref{Fringe Bitmaps}, for a list of standard bitmap symbols and how
3785 to define your own. In addition, @code{nil} represents the empty
3786 bitmap (i.e., an indicator that is not shown).
3787
3788 When @code{fringe-indicator-alist} has a buffer-local value, and
3789 there is no bitmap defined for a logical indicator, or the bitmap is
3790 @code{t}, the corresponding value from the default value of
3791 @code{fringe-indicator-alist} is used.
3792 @end defvar
3793
3794 @node Fringe Cursors
3795 @subsection Fringe Cursors
3796 @cindex fringe cursors
3797 @cindex cursor, fringe
3798
3799 When a line is exactly as wide as the window, Emacs displays the
3800 cursor in the right fringe instead of using two lines. Different
3801 bitmaps are used to represent the cursor in the fringe depending on
3802 the current buffer's cursor type.
3803
3804 @defopt overflow-newline-into-fringe
3805 If this is non-@code{nil}, lines exactly as wide as the window (not
3806 counting the final newline character) are not continued. Instead,
3807 when point is at the end of the line, the cursor appears in the right
3808 fringe.
3809 @end defopt
3810
3811 @defvar fringe-cursor-alist
3812 This variable specifies the mapping from logical cursor type to the
3813 actual fringe bitmaps displayed in the right fringe. The value is an
3814 alist where each element has the form @code{(@var{cursor-type}
3815 . @var{bitmap})}, which means to use the fringe bitmap @var{bitmap} to
3816 display cursors of type @var{cursor-type}.
3817
3818 Each @var{cursor-type} should be one of @code{box}, @code{hollow},
3819 @code{bar}, @code{hbar}, or @code{hollow-small}. The first four have
3820 the same meanings as in the @code{cursor-type} frame parameter
3821 (@pxref{Cursor Parameters}). The @code{hollow-small} type is used
3822 instead of @code{hollow} when the normal @code{hollow-rectangle}
3823 bitmap is too tall to fit on a specific display line.
3824
3825 Each @var{bitmap} should be a symbol specifying the fringe bitmap to
3826 be displayed for that logical cursor type.
3827 @iftex
3828 See the next subsection for details.
3829 @end iftex
3830 @ifnottex
3831 @xref{Fringe Bitmaps}.
3832 @end ifnottex
3833
3834 @c FIXME: I can't find the fringes-indicator-alist variable. Maybe
3835 @c it should be fringe-indicator-alist or fringe-cursor-alist? --xfq
3836 When @code{fringe-cursor-alist} has a buffer-local value, and there is
3837 no bitmap defined for a cursor type, the corresponding value from the
3838 default value of @code{fringes-indicator-alist} is used.
3839 @end defvar
3840
3841 @node Fringe Bitmaps
3842 @subsection Fringe Bitmaps
3843 @cindex fringe bitmaps
3844 @cindex bitmaps, fringe
3845
3846 The @dfn{fringe bitmaps} are the actual bitmaps which represent the
3847 logical fringe indicators for truncated or continued lines, buffer
3848 boundaries, overlay arrows, etc. Each bitmap is represented by a
3849 symbol.
3850 @iftex
3851 These symbols are referred to by the variables
3852 @code{fringe-indicator-alist} and @code{fringe-cursor-alist},
3853 described in the previous subsections.
3854 @end iftex
3855 @ifnottex
3856 These symbols are referred to by the variable
3857 @code{fringe-indicator-alist}, which maps fringe indicators to bitmaps
3858 (@pxref{Fringe Indicators}), and the variable
3859 @code{fringe-cursor-alist}, which maps fringe cursors to bitmaps
3860 (@pxref{Fringe Cursors}).
3861 @end ifnottex
3862
3863 Lisp programs can also directly display a bitmap in the left or
3864 right fringe, by using a @code{display} property for one of the
3865 characters appearing in the line (@pxref{Other Display Specs}). Such
3866 a display specification has the form
3867
3868 @example
3869 (@var{fringe} @var{bitmap} [@var{face}])
3870 @end example
3871
3872 @noindent
3873 @var{fringe} is either the symbol @code{left-fringe} or
3874 @code{right-fringe}. @var{bitmap} is a symbol identifying the bitmap
3875 to display. The optional @var{face} names a face whose foreground
3876 color is used to display the bitmap; this face is automatically merged
3877 with the @code{fringe} face.
3878
3879 Here is a list of the standard fringe bitmaps defined in Emacs, and
3880 how they are currently used in Emacs (via
3881 @code{fringe-indicator-alist} and @code{fringe-cursor-alist}):
3882
3883 @table @asis
3884 @item @code{left-arrow}, @code{right-arrow}
3885 Used to indicate truncated lines.
3886
3887 @item @code{left-curly-arrow}, @code{right-curly-arrow}
3888 Used to indicate continued lines.
3889
3890 @item @code{right-triangle}, @code{left-triangle}
3891 The former is used by overlay arrows. The latter is unused.
3892
3893 @item @code{up-arrow}, @code{down-arrow}, @code{top-left-angle} @code{top-right-angle}
3894 @itemx @code{bottom-left-angle}, @code{bottom-right-angle}
3895 @itemx @code{top-right-angle}, @code{top-left-angle}
3896 @itemx @code{left-bracket}, @code{right-bracket}, @code{top-right-angle}, @code{top-left-angle}
3897 Used to indicate buffer boundaries.
3898
3899 @item @code{filled-rectangle}, @code{hollow-rectangle}
3900 @itemx @code{filled-square}, @code{hollow-square}
3901 @itemx @code{vertical-bar}, @code{horizontal-bar}
3902 Used for different types of fringe cursors.
3903
3904 @item @code{empty-line}, @code{exclamation-mark}, @code{question-mark}, @code{exclamation-mark}
3905 Not used by core Emacs features.
3906 @end table
3907
3908 @noindent
3909 The next subsection describes how to define your own fringe bitmaps.
3910
3911 @defun fringe-bitmaps-at-pos &optional pos window
3912 This function returns the fringe bitmaps of the display line
3913 containing position @var{pos} in window @var{window}. The return
3914 value has the form @code{(@var{left} @var{right} @var{ov})}, where @var{left}
3915 is the symbol for the fringe bitmap in the left fringe (or @code{nil}
3916 if no bitmap), @var{right} is similar for the right fringe, and @var{ov}
3917 is non-@code{nil} if there is an overlay arrow in the left fringe.
3918
3919 The value is @code{nil} if @var{pos} is not visible in @var{window}.
3920 If @var{window} is @code{nil}, that stands for the selected window.
3921 If @var{pos} is @code{nil}, that stands for the value of point in
3922 @var{window}.
3923 @end defun
3924
3925 @node Customizing Bitmaps
3926 @subsection Customizing Fringe Bitmaps
3927 @cindex fringe bitmaps, customizing
3928
3929 @defun define-fringe-bitmap bitmap bits &optional height width align
3930 This function defines the symbol @var{bitmap} as a new fringe bitmap,
3931 or replaces an existing bitmap with that name.
3932
3933 The argument @var{bits} specifies the image to use. It should be
3934 either a string or a vector of integers, where each element (an
3935 integer) corresponds to one row of the bitmap. Each bit of an integer
3936 corresponds to one pixel of the bitmap, where the low bit corresponds
3937 to the rightmost pixel of the bitmap.
3938
3939 The height is normally the length of @var{bits}. However, you
3940 can specify a different height with non-@code{nil} @var{height}. The width
3941 is normally 8, but you can specify a different width with non-@code{nil}
3942 @var{width}. The width must be an integer between 1 and 16.
3943
3944 The argument @var{align} specifies the positioning of the bitmap
3945 relative to the range of rows where it is used; the default is to
3946 center the bitmap. The allowed values are @code{top}, @code{center},
3947 or @code{bottom}.
3948
3949 The @var{align} argument may also be a list @code{(@var{align}
3950 @var{periodic})} where @var{align} is interpreted as described above.
3951 If @var{periodic} is non-@code{nil}, it specifies that the rows in
3952 @code{bits} should be repeated enough times to reach the specified
3953 height.
3954 @end defun
3955
3956 @defun destroy-fringe-bitmap bitmap
3957 This function destroy the fringe bitmap identified by @var{bitmap}.
3958 If @var{bitmap} identifies a standard fringe bitmap, it actually
3959 restores the standard definition of that bitmap, instead of
3960 eliminating it entirely.
3961 @end defun
3962
3963 @defun set-fringe-bitmap-face bitmap &optional face
3964 This sets the face for the fringe bitmap @var{bitmap} to @var{face}.
3965 If @var{face} is @code{nil}, it selects the @code{fringe} face. The
3966 bitmap's face controls the color to draw it in.
3967
3968 @var{face} is merged with the @code{fringe} face, so normally
3969 @var{face} should specify only the foreground color.
3970 @end defun
3971
3972 @node Overlay Arrow
3973 @subsection The Overlay Arrow
3974 @c @cindex overlay arrow Duplicates variable names
3975
3976 The @dfn{overlay arrow} is useful for directing the user's attention
3977 to a particular line in a buffer. For example, in the modes used for
3978 interface to debuggers, the overlay arrow indicates the line of code
3979 about to be executed. This feature has nothing to do with
3980 @dfn{overlays} (@pxref{Overlays}).
3981
3982 @defvar overlay-arrow-string
3983 This variable holds the string to display to call attention to a
3984 particular line, or @code{nil} if the arrow feature is not in use.
3985 On a graphical display the contents of the string are ignored; instead a
3986 glyph is displayed in the fringe area to the left of the display area.
3987 @end defvar
3988
3989 @defvar overlay-arrow-position
3990 This variable holds a marker that indicates where to display the overlay
3991 arrow. It should point at the beginning of a line. On a non-graphical
3992 display the arrow text
3993 appears at the beginning of that line, overlaying any text that would
3994 otherwise appear. Since the arrow is usually short, and the line
3995 usually begins with indentation, normally nothing significant is
3996 overwritten.
3997
3998 The overlay-arrow string is displayed in any given buffer if the value
3999 of @code{overlay-arrow-position} in that buffer points into that
4000 buffer. Thus, it is possible to display multiple overlay arrow strings
4001 by creating buffer-local bindings of @code{overlay-arrow-position}.
4002 However, it is usually cleaner to use
4003 @code{overlay-arrow-variable-list} to achieve this result.
4004 @c !!! overlay-arrow-position: but the overlay string may remain in the display
4005 @c of some other buffer until an update is required. This should be fixed
4006 @c now. Is it?
4007 @end defvar
4008
4009 You can do a similar job by creating an overlay with a
4010 @code{before-string} property. @xref{Overlay Properties}.
4011
4012 You can define multiple overlay arrows via the variable
4013 @code{overlay-arrow-variable-list}.
4014
4015 @defvar overlay-arrow-variable-list
4016 This variable's value is a list of variables, each of which specifies
4017 the position of an overlay arrow. The variable
4018 @code{overlay-arrow-position} has its normal meaning because it is on
4019 this list.
4020 @end defvar
4021
4022 Each variable on this list can have properties
4023 @code{overlay-arrow-string} and @code{overlay-arrow-bitmap} that
4024 specify an overlay arrow string (for text terminals) or fringe bitmap
4025 (for graphical terminals) to display at the corresponding overlay
4026 arrow position. If either property is not set, the default
4027 @code{overlay-arrow-string} or @code{overlay-arrow} fringe indicator
4028 is used.
4029
4030
4031 @node Scroll Bars
4032 @section Scroll Bars
4033 @cindex scroll bars
4034
4035 Normally the frame parameter @code{vertical-scroll-bars} controls
4036 whether the windows in the frame have vertical scroll bars, and whether
4037 they are on the left or right. The frame parameter
4038 @code{scroll-bar-width} specifies how wide they are (@code{nil} meaning
4039 the default).
4040
4041 The frame parameter @code{horizontal-scroll-bars} controls whether
4042 the windows in the frame have horizontal scroll bars. The frame
4043 parameter @code{scroll-bar-height} specifies how high they are
4044 (@code{nil} meaning the default). @xref{Layout Parameters}.
4045
4046 @vindex horizontal-scroll-bars-available-p
4047 Horizontal scroll bars are not available on all platforms. The
4048 function @code{horizontal-scroll-bars-available-p} which takes no
4049 argument returns non-@code{nil} if they are available on your system.
4050
4051 The following three functions take as argument a live frame which
4052 defaults to the selected one.
4053
4054 @defun frame-current-scroll-bars &optional frame
4055 This function reports the scroll bar types for frame @var{frame}. The
4056 value is a cons cell @code{(@var{vertical-type} .@:
4057 @var{horizontal-type})}, where @var{vertical-type} is either
4058 @code{left}, @code{right}, or @code{nil} (which means no vertical scroll
4059 bar.) @var{horizontal-type} is either @code{bottom} or @code{nil}
4060 (which means no horizontal scroll bar).
4061 @end defun
4062
4063 @defun frame-scroll-bar-width &optional Lisp_Object &optional frame
4064 This function returns the width of vertical scroll bars of @var{frame}
4065 in pixels.
4066 @end defun
4067
4068 @defun frame-scroll-bar-height &optional Lisp_Object &optional frame
4069 This function returns the height of horizontal scroll bars of
4070 @var{frame} in pixels.
4071 @end defun
4072
4073 You can override the frame specific settings for individual windows by
4074 using the following function:
4075
4076 @defun set-window-scroll-bars window &optional width vertical-type height horizontal-type
4077 This function sets the width and/or height and the types of scroll bars
4078 for window @var{window}.
4079
4080 @var{width} specifies the width of the vertical scroll bar in pixels
4081 (@code{nil} means use the width specified for the frame).
4082 @var{vertical-type} specifies whether to have a vertical scroll bar and,
4083 if so, where. The possible values are @code{left}, @code{right},
4084 @code{t}, which means to use the frame's default, and @code{nil} for no
4085 vertical scroll bar.
4086
4087 @var{height} specifies the height of the horizontal scroll bar in pixels
4088 (@code{nil} means use the height specified for the frame).
4089 @var{horizontal-type} specifies whether to have a horizontal scroll bar.
4090 The possible values are @code{bottom}, @code{t}, which means to use the
4091 frame's default, and @code{nil} for no horizontal scroll bar.
4092
4093 If @var{window} is @code{nil}, the selected window is used.
4094 @end defun
4095
4096 The following four functions take as argument a live window which
4097 defaults to the selected one.
4098
4099 @defun window-scroll-bars &optional window
4100 This function returns a list of the form @code{(@var{width}
4101 @var{columns} @var{vertical-type} @var{height} @var{lines}
4102 @var{horizontal-type})}.
4103
4104 The value @var{width} is the value that was specified for the width of
4105 the vertical scroll bar (which may be @code{nil}); @var{columns} is the
4106 (possibly rounded) number of columns that the vertical scroll bar
4107 actually occupies.
4108
4109 The value @var{height} is the value that was specified for the height of
4110 the horizontal scroll bar (which may be @code{nil}); @var{lines} is the
4111 (possibly rounded) number of lines that the horizontally scroll bar
4112 actually occupies.
4113 @end defun
4114
4115 @defun window-current-scroll-bars &optional window
4116 This function reports the scroll bar type for window @var{window}. The
4117 value is a cons cell @code{(@var{vertical-type} .@:
4118 @var{horizontal-type})}. Unlike @code{window-scroll-bars}, this reports
4119 the scroll bar type actually used, once frame defaults and
4120 @code{scroll-bar-mode} are taken into account.
4121 @end defun
4122
4123 @defun window-scroll-bar-width &optional window
4124 This function returns the width in pixels of @var{window}'s vertical
4125 scrollbar.
4126 @end defun
4127
4128 @defun window-scroll-bar-height &optional window
4129 This function returns the height in pixels of @var{window}'s horizontal
4130 scrollbar.
4131 @end defun
4132
4133 If you don't specify these values for a window with
4134 @code{set-window-scroll-bars}, the buffer-local variables
4135 @code{vertical-scroll-bar}, @code{horizontal-scroll-bar},
4136 @code{scroll-bar-width} and @code{scroll-bar-height} in the buffer being
4137 displayed control the window's scroll bars. The function
4138 @code{set-window-buffer} examines these variables. If you change them
4139 in a buffer that is already visible in a window, you can make the window
4140 take note of the new values by calling @code{set-window-buffer}
4141 specifying the same buffer that is already displayed.
4142
4143 You can control the appearance of scroll bars for a particular buffer by
4144 setting the following variables which automatically become buffer-local
4145 when set.
4146
4147 @defvar vertical-scroll-bar
4148 This variable specifies the location of the vertical scroll bar. The
4149 possible values are @code{left}, @code{right}, @code{t}, which means to
4150 use the frame's default, and @code{nil} for no scroll bar.
4151 @end defvar
4152
4153 @defvar horizontal-scroll-bar
4154 This variable specifies the location of the horizontal scroll bar. The
4155 possible values are @code{bottom}, @code{t}, which means to use the
4156 frame's default, and @code{nil} for no scroll bar.
4157 @end defvar
4158
4159 @defvar scroll-bar-width
4160 This variable specifies the width of the buffer's vertical scroll bars,
4161 measured in pixels. A value of @code{nil} means to use the value
4162 specified by the frame.
4163 @end defvar
4164
4165 @defvar scroll-bar-height
4166 This variable specifies the height of the buffer's horizontal scroll
4167 bar, measured in pixels. A value of @code{nil} means to use the value
4168 specified by the frame.
4169 @end defvar
4170
4171 Finally you can toggle the display of scroll bars on all frames by
4172 customizing the variables @code{scroll-bar-mode} and
4173 @code{horizontal-scroll-bar-mode}.
4174
4175 @defopt scroll-bar-mode
4176 This variable controls whether and where to put vertical scroll bars in
4177 all frames. The possible values are @code{nil} for no scroll bars,
4178 @code{left} to put scroll bars on the left and @code{right} to put
4179 scroll bars on the right.
4180 @end defopt
4181
4182 @defopt horizontal-scroll-bar-mode
4183 This variable controls whether to display horizontal scroll bars on all
4184 frames.
4185 @end defopt
4186
4187
4188 @node Window Dividers
4189 @section Window Dividers
4190 @cindex window dividers
4191 @cindex right dividers
4192 @cindex bottom dividers
4193
4194 Window dividers are bars drawn between a frame's windows. A ``right''
4195 divider is drawn between a window and any adjacent windows on the right.
4196 Its width (thickness) is specified by the frame parameter
4197 @code{right-divider-width}. A ``bottom'' divider is drawn between a
4198 window and adjacent windows on the bottom or the echo area. Its width
4199 is specified by the frame parameter @code{bottom-divider-width}. In
4200 either case, specifying a width of zero means to not draw such dividers.
4201 @xref{Layout Parameters}.
4202
4203 Technically, a right divider ``belongs'' to the window on its left,
4204 which means that its width contributes to the total width of that
4205 window. A bottom divider ``belongs'' to the window above it, which
4206 means that its width contributes to the total height of that window.
4207 @xref{Window Sizes}. When a window has both, a right and a bottom
4208 divider, the bottom divider ``prevails''. This means that a bottom
4209 divider is drawn over the full total width of its window while the right
4210 divider ends above the bottom divider.
4211
4212 Dividers can be dragged with the mouse and are therefore useful for
4213 adjusting the sizes of adjacent windows with the mouse. They also serve
4214 to visually set apart adjacent windows when no scroll bars or mode lines
4215 are present. The following three faces allow to customize the
4216 appearance of dividers:
4217
4218 @table @code
4219 @item window-divider
4220 When a divider is less than three pixels wide, it is drawn solidly with
4221 the foreground of this face. For larger dividers this face is used for
4222 the inner part only, excluding the first and last pixel.
4223
4224 @item window-divider-first-pixel
4225 This is the face used for drawing the first pixel of a divider that is
4226 at least three pixels wide. To obtain a solid appearance, set this to
4227 the same value used for the @code{window-divider} face.
4228
4229 @item window-divider-last-pixel
4230 This is the face used for drawing the last pixel of a divider that is at
4231 least three pixels wide. To obtain a solid appearance, set this to the
4232 same value used for the @code{window-divider} face.
4233 @end table
4234
4235 You can get the sizes of the dividers of a specific window with the
4236 following two functions.
4237
4238 @defun window-right-divider-width &optional window
4239 Return the width (thickness) in pixels of @var{window}'s right divider.
4240 @var{window} must be a live window and defaults to the selected one.
4241 The return value is always zero for a rightmost window.
4242 @end defun
4243
4244 @defun window-bottom-divider-width &optional window
4245 Return the width (thickness) in pixels of @var{window}'s bottom divider.
4246 @var{window} must be a live window and defaults to the selected one.
4247 The return value is zero for the minibuffer window or a bottommost
4248 window on a minibuffer-less frame.
4249 @end defun
4250
4251
4252 @node Display Property
4253 @section The @code{display} Property
4254 @cindex display specification
4255 @kindex display @r{(text property)}
4256
4257 The @code{display} text property (or overlay property) is used to
4258 insert images into text, and to control other aspects of how text
4259 displays. The value of the @code{display} property should be a
4260 display specification, or a list or vector containing several display
4261 specifications. Display specifications in the same @code{display}
4262 property value generally apply in parallel to the text they cover.
4263
4264 If several sources (overlays and/or a text property) specify values
4265 for the @code{display} property, only one of the values takes effect,
4266 following the rules of @code{get-char-property}. @xref{Examining
4267 Properties}.
4268
4269 The rest of this section describes several kinds of
4270 display specifications and what they mean.
4271
4272 @menu
4273 * Replacing Specs:: Display specs that replace the text.
4274 * Specified Space:: Displaying one space with a specified width.
4275 * Pixel Specification:: Specifying space width or height in pixels.
4276 * Other Display Specs:: Displaying an image; adjusting the height,
4277 spacing, and other properties of text.
4278 * Display Margins:: Displaying text or images to the side of the main text.
4279 @end menu
4280
4281 @node Replacing Specs
4282 @subsection Display Specs That Replace The Text
4283 @cindex replacing display specs
4284
4285 Some kinds of display specifications specify something to display
4286 instead of the text that has the property. These are called
4287 @dfn{replacing} display specifications. Emacs does not allow the user
4288 to interactively move point into the middle of buffer text that is
4289 replaced in this way.
4290
4291 If a list of display specifications includes more than one replacing
4292 display specification, the first overrides the rest. Replacing
4293 display specifications make most other display specifications
4294 irrelevant, since those don't apply to the replacement.
4295
4296 For replacing display specifications, ``the text that has the
4297 property'' means all the consecutive characters that have the same
4298 Lisp object as their @code{display} property; these characters are
4299 replaced as a single unit. If two characters have different Lisp
4300 objects as their @code{display} properties (i.e., objects which are
4301 not @code{eq}), they are handled separately.
4302
4303 Here is an example which illustrates this point. A string serves as
4304 a replacing display specification, which replaces the text that has
4305 the property with the specified string (@pxref{Other Display Specs}).
4306 Consider the following function:
4307
4308 @smallexample
4309 (defun foo ()
4310 (dotimes (i 5)
4311 (let ((string (concat "A"))
4312 (start (+ i i (point-min))))
4313 (put-text-property start (1+ start) 'display string)
4314 (put-text-property start (+ 2 start) 'display string))))
4315 @end smallexample
4316
4317 @noindent
4318 This function gives each of the first ten characters in the buffer a
4319 @code{display} property which is a string @code{"A"}, but they don't
4320 all get the same string object. The first two characters get the same
4321 string object, so they are replaced with one @samp{A}; the fact that
4322 the display property was assigned in two separate calls to
4323 @code{put-text-property} is irrelevant. Similarly, the next two
4324 characters get a second string (@code{concat} creates a new string
4325 object), so they are replaced with one @samp{A}; and so on. Thus, the
4326 ten characters appear as five A's.
4327
4328 @node Specified Space
4329 @subsection Specified Spaces
4330 @cindex spaces, specified height or width
4331 @cindex variable-width spaces
4332
4333 To display a space of specified width and/or height, use a display
4334 specification of the form @code{(space . @var{props})}, where
4335 @var{props} is a property list (a list of alternating properties and
4336 values). You can put this property on one or more consecutive
4337 characters; a space of the specified height and width is displayed in
4338 place of @emph{all} of those characters. These are the properties you
4339 can use in @var{props} to specify the weight of the space:
4340
4341 @table @code
4342 @item :width @var{width}
4343 If @var{width} is a number, it specifies
4344 that the space width should be @var{width} times the normal character
4345 width. @var{width} can also be a @dfn{pixel width} specification
4346 (@pxref{Pixel Specification}).
4347
4348 @item :relative-width @var{factor}
4349 Specifies that the width of the stretch should be computed from the
4350 first character in the group of consecutive characters that have the
4351 same @code{display} property. The space width is the width of that
4352 character, multiplied by @var{factor}.
4353
4354 @item :align-to @var{hpos}
4355 Specifies that the space should be wide enough to reach @var{hpos}.
4356 If @var{hpos} is a number, it is measured in units of the normal
4357 character width. @var{hpos} can also be a @dfn{pixel width}
4358 specification (@pxref{Pixel Specification}).
4359 @end table
4360
4361 You should use one and only one of the above properties. You can
4362 also specify the height of the space, with these properties:
4363
4364 @table @code
4365 @item :height @var{height}
4366 Specifies the height of the space.
4367 If @var{height} is a number, it specifies
4368 that the space height should be @var{height} times the normal character
4369 height. The @var{height} may also be a @dfn{pixel height} specification
4370 (@pxref{Pixel Specification}).
4371
4372 @item :relative-height @var{factor}
4373 Specifies the height of the space, multiplying the ordinary height
4374 of the text having this display specification by @var{factor}.
4375
4376 @item :ascent @var{ascent}
4377 If the value of @var{ascent} is a non-negative number no greater than
4378 100, it specifies that @var{ascent} percent of the height of the space
4379 should be considered as the ascent of the space---that is, the part
4380 above the baseline. The ascent may also be specified in pixel units
4381 with a @dfn{pixel ascent} specification (@pxref{Pixel Specification}).
4382
4383 @end table
4384
4385 Don't use both @code{:height} and @code{:relative-height} together.
4386
4387 The @code{:width} and @code{:align-to} properties are supported on
4388 non-graphic terminals, but the other space properties in this section
4389 are not.
4390
4391 Note that space properties are treated as paragraph separators for
4392 the purposes of reordering bidirectional text for display.
4393 @xref{Bidirectional Display}, for the details.
4394
4395 @node Pixel Specification
4396 @subsection Pixel Specification for Spaces
4397 @cindex spaces, pixel specification
4398
4399 The value of the @code{:width}, @code{:align-to}, @code{:height},
4400 and @code{:ascent} properties can be a special kind of expression that
4401 is evaluated during redisplay. The result of the evaluation is used
4402 as an absolute number of pixels.
4403
4404 The following expressions are supported:
4405
4406 @smallexample
4407 @group
4408 @var{expr} ::= @var{num} | (@var{num}) | @var{unit} | @var{elem} | @var{pos} | @var{image} | @var{form}
4409 @var{num} ::= @var{integer} | @var{float} | @var{symbol}
4410 @var{unit} ::= in | mm | cm | width | height
4411 @end group
4412 @group
4413 @var{elem} ::= left-fringe | right-fringe | left-margin | right-margin
4414 | scroll-bar | text
4415 @var{pos} ::= left | center | right
4416 @var{form} ::= (@var{num} . @var{expr}) | (@var{op} @var{expr} ...)
4417 @var{op} ::= + | -
4418 @end group
4419 @end smallexample
4420
4421 The form @var{num} specifies a fraction of the default frame font
4422 height or width. The form @code{(@var{num})} specifies an absolute
4423 number of pixels. If @var{num} is a symbol, @var{symbol}, its
4424 buffer-local variable binding is used.
4425
4426 The @code{in}, @code{mm}, and @code{cm} units specify the number of
4427 pixels per inch, millimeter, and centimeter, respectively. The
4428 @code{width} and @code{height} units correspond to the default width
4429 and height of the current face. An image specification @code{image}
4430 corresponds to the width or height of the image.
4431
4432 The elements @code{left-fringe}, @code{right-fringe},
4433 @code{left-margin}, @code{right-margin}, @code{scroll-bar}, and
4434 @code{text} specify to the width of the corresponding area of the
4435 window.
4436
4437 The @code{left}, @code{center}, and @code{right} positions can be
4438 used with @code{:align-to} to specify a position relative to the left
4439 edge, center, or right edge of the text area.
4440
4441 Any of the above window elements (except @code{text}) can also be
4442 used with @code{:align-to} to specify that the position is relative to
4443 the left edge of the given area. Once the base offset for a relative
4444 position has been set (by the first occurrence of one of these
4445 symbols), further occurrences of these symbols are interpreted as the
4446 width of the specified area. For example, to align to the center of
4447 the left-margin, use
4448
4449 @example
4450 :align-to (+ left-margin (0.5 . left-margin))
4451 @end example
4452
4453 If no specific base offset is set for alignment, it is always relative
4454 to the left edge of the text area. For example, @samp{:align-to 0} in a
4455 header-line aligns with the first text column in the text area.
4456
4457 A value of the form @code{(@var{num} . @var{expr})} stands for the
4458 product of the values of @var{num} and @var{expr}. For example,
4459 @code{(2 . in)} specifies a width of 2 inches, while @code{(0.5 .
4460 @var{image})} specifies half the width (or height) of the specified
4461 image.
4462
4463 The form @code{(+ @var{expr} ...)} adds up the value of the
4464 expressions. The form @code{(- @var{expr} ...)} negates or subtracts
4465 the value of the expressions.
4466
4467 @node Other Display Specs
4468 @subsection Other Display Specifications
4469
4470 Here are the other sorts of display specifications that you can use
4471 in the @code{display} text property.
4472
4473 @table @code
4474 @item @var{string}
4475 Display @var{string} instead of the text that has this property.
4476
4477 Recursive display specifications are not supported---@var{string}'s
4478 @code{display} properties, if any, are not used.
4479
4480 @item (image . @var{image-props})
4481 This kind of display specification is an image descriptor (@pxref{Images}).
4482 When used as a display specification, it means to display the image
4483 instead of the text that has the display specification.
4484
4485 @item (slice @var{x} @var{y} @var{width} @var{height})
4486 This specification together with @code{image} specifies a @dfn{slice}
4487 (a partial area) of the image to display. The elements @var{y} and
4488 @var{x} specify the top left corner of the slice, within the image;
4489 @var{width} and @var{height} specify the width and height of the
4490 slice. Integers are numbers of pixels. A floating-point number
4491 in the range 0.0--1.0 stands for that fraction of the width or height
4492 of the entire image.
4493
4494 @item ((margin nil) @var{string})
4495 A display specification of this form means to display @var{string}
4496 instead of the text that has the display specification, at the same
4497 position as that text. It is equivalent to using just @var{string},
4498 but it is done as a special case of marginal display (@pxref{Display
4499 Margins}).
4500
4501 @item (left-fringe @var{bitmap} @r{[}@var{face}@r{]})
4502 @itemx (right-fringe @var{bitmap} @r{[}@var{face}@r{]})
4503 This display specification on any character of a line of text causes
4504 the specified @var{bitmap} be displayed in the left or right fringes
4505 for that line, instead of the characters that have the display
4506 specification. The optional @var{face} specifies the colors to be
4507 used for the bitmap. @xref{Fringe Bitmaps}, for the details.
4508
4509 @item (space-width @var{factor})
4510 This display specification affects all the space characters within the
4511 text that has the specification. It displays all of these spaces
4512 @var{factor} times as wide as normal. The element @var{factor} should
4513 be an integer or float. Characters other than spaces are not affected
4514 at all; in particular, this has no effect on tab characters.
4515
4516 @item (height @var{height})
4517 This display specification makes the text taller or shorter.
4518 Here are the possibilities for @var{height}:
4519
4520 @table @asis
4521 @item @code{(+ @var{n})}
4522 @c FIXME: Add an index for "step"? --xfq
4523 This means to use a font that is @var{n} steps larger. A ``step'' is
4524 defined by the set of available fonts---specifically, those that match
4525 what was otherwise specified for this text, in all attributes except
4526 height. Each size for which a suitable font is available counts as
4527 another step. @var{n} should be an integer.
4528
4529 @item @code{(- @var{n})}
4530 This means to use a font that is @var{n} steps smaller.
4531
4532 @item a number, @var{factor}
4533 A number, @var{factor}, means to use a font that is @var{factor} times
4534 as tall as the default font.
4535
4536 @item a symbol, @var{function}
4537 A symbol is a function to compute the height. It is called with the
4538 current height as argument, and should return the new height to use.
4539
4540 @item anything else, @var{form}
4541 If the @var{height} value doesn't fit the previous possibilities, it is
4542 a form. Emacs evaluates it to get the new height, with the symbol
4543 @code{height} bound to the current specified font height.
4544 @end table
4545
4546 @item (raise @var{factor})
4547 This kind of display specification raises or lowers the text
4548 it applies to, relative to the baseline of the line.
4549
4550 @var{factor} must be a number, which is interpreted as a multiple of the
4551 height of the affected text. If it is positive, that means to display
4552 the characters raised. If it is negative, that means to display them
4553 lower down.
4554
4555 If the text also has a @code{height} display specification, that does
4556 not affect the amount of raising or lowering, which is based on the
4557 faces used for the text.
4558 @end table
4559
4560 @c We put all the `@code{(when ...)}' on one line to encourage
4561 @c makeinfo's end-of-sentence heuristics to DTRT. Previously, the dot
4562 @c was at eol; the info file ended up w/ two spaces rendered after it.
4563 You can make any display specification conditional. To do that,
4564 package it in another list of the form
4565 @code{(when @var{condition} . @var{spec})}.
4566 Then the specification @var{spec} applies only when
4567 @var{condition} evaluates to a non-@code{nil} value. During the
4568 evaluation, @code{object} is bound to the string or buffer having the
4569 conditional @code{display} property. @code{position} and
4570 @code{buffer-position} are bound to the position within @code{object}
4571 and the buffer position where the @code{display} property was found,
4572 respectively. Both positions can be different when @code{object} is a
4573 string.
4574
4575 @node Display Margins
4576 @subsection Displaying in the Margins
4577 @cindex display margins
4578 @cindex margins, display
4579
4580 A buffer can have blank areas called @dfn{display margins} on the
4581 left and on the right. Ordinary text never appears in these areas,
4582 but you can put things into the display margins using the
4583 @code{display} property. There is currently no way to make text or
4584 images in the margin mouse-sensitive.
4585
4586 The way to display something in the margins is to specify it in a
4587 margin display specification in the @code{display} property of some
4588 text. This is a replacing display specification, meaning that the
4589 text you put it on does not get displayed; the margin display appears,
4590 but that text does not.
4591
4592 A margin display specification looks like @code{((margin
4593 right-margin) @var{spec})} or @code{((margin left-margin) @var{spec})}.
4594 Here, @var{spec} is another display specification that says what to
4595 display in the margin. Typically it is a string of text to display,
4596 or an image descriptor.
4597
4598 To display something in the margin @emph{in association with}
4599 certain buffer text, without altering or preventing the display of
4600 that text, put a @code{before-string} property on the text and put the
4601 margin display specification on the contents of the before-string.
4602
4603 Before the display margins can display anything, you must give
4604 them a nonzero width. The usual way to do that is to set these
4605 variables:
4606
4607 @defvar left-margin-width
4608 This variable specifies the width of the left margin, in character
4609 cell (a.k.a.@: ``column'') units. It is buffer-local in all buffers.
4610 A value of @code{nil} means no left marginal area.
4611 @end defvar
4612
4613 @defvar right-margin-width
4614 This variable specifies the width of the right margin, in character
4615 cell units. It is buffer-local in all buffers. A value of @code{nil}
4616 means no right marginal area.
4617 @end defvar
4618
4619 Setting these variables does not immediately affect the window. These
4620 variables are checked when a new buffer is displayed in the window.
4621 Thus, you can make changes take effect by calling
4622 @code{set-window-buffer}.
4623
4624 You can also set the margin widths immediately.
4625
4626 @defun set-window-margins window left &optional right
4627 This function specifies the margin widths for window @var{window}, in
4628 character cell units. The argument @var{left} controls the left
4629 margin, and @var{right} controls the right margin (default @code{0}).
4630 @end defun
4631
4632 @defun window-margins &optional window
4633 This function returns the width of the left and right margins of
4634 @var{window} as a cons cell of the form @w{@code{(@var{left}
4635 . @var{right})}}. If one of the two marginal areas does not exist,
4636 its width is returned as @code{nil}; if neither of the two margins exist,
4637 the function returns @code{(nil)}. If @var{window} is @code{nil}, the
4638 selected window is used.
4639 @end defun
4640
4641 @node Images
4642 @section Images
4643 @cindex images in buffers
4644
4645 To display an image in an Emacs buffer, you must first create an image
4646 descriptor, then use it as a display specifier in the @code{display}
4647 property of text that is displayed (@pxref{Display Property}).
4648
4649 Emacs is usually able to display images when it is run on a
4650 graphical terminal. Images cannot be displayed in a text terminal, on
4651 certain graphical terminals that lack the support for this, or if
4652 Emacs is compiled without image support. You can use the function
4653 @code{display-images-p} to determine if images can in principle be
4654 displayed (@pxref{Display Feature Testing}).
4655
4656 @menu
4657 * Image Formats:: Supported image formats.
4658 * Image Descriptors:: How to specify an image for use in @code{:display}.
4659 * XBM Images:: Special features for XBM format.
4660 * XPM Images:: Special features for XPM format.
4661 * PostScript Images:: Special features for PostScript format.
4662 * ImageMagick Images:: Special features available through ImageMagick.
4663 * Other Image Types:: Various other formats are supported.
4664 * Defining Images:: Convenient ways to define an image for later use.
4665 * Showing Images:: Convenient ways to display an image once it is defined.
4666 * Multi-Frame Images:: Some images contain more than one frame.
4667 * Image Cache:: Internal mechanisms of image display.
4668 @end menu
4669
4670 @node Image Formats
4671 @subsection Image Formats
4672 @cindex image formats
4673 @cindex image types
4674
4675 Emacs can display a number of different image formats. Some of
4676 these image formats are supported only if particular support libraries
4677 are installed. On some platforms, Emacs can load support libraries on
4678 demand; if so, the variable @code{dynamic-library-alist} can be used
4679 to modify the set of known names for these dynamic libraries.
4680 @xref{Dynamic Libraries}.
4681
4682 Supported image formats (and the required support libraries) include
4683 PBM and XBM (which do not depend on support libraries and are always
4684 available), XPM (@code{libXpm}), GIF (@code{libgif} or
4685 @code{libungif}), PostScript (@code{gs}), JPEG (@code{libjpeg}), TIFF
4686 (@code{libtiff}), PNG (@code{libpng}), and SVG (@code{librsvg}).
4687
4688 Each of these image formats is associated with an @dfn{image type
4689 symbol}. The symbols for the above formats are, respectively,
4690 @code{pbm}, @code{xbm}, @code{xpm}, @code{gif}, @code{postscript},
4691 @code{jpeg}, @code{tiff}, @code{png}, and @code{svg}.
4692
4693 Furthermore, if you build Emacs with ImageMagick
4694 (@code{libMagickWand}) support, Emacs can display any image format
4695 that ImageMagick can. @xref{ImageMagick Images}. All images
4696 displayed via ImageMagick have type symbol @code{imagemagick}.
4697
4698 @defvar image-types
4699 This variable contains a list of type symbols for image formats which
4700 are potentially supported in the current configuration.
4701
4702 ``Potentially'' means that Emacs knows about the image types, not
4703 necessarily that they can be used (for example, they could depend on
4704 unavailable dynamic libraries). To know which image types are really
4705 available, use @code{image-type-available-p}.
4706 @end defvar
4707
4708 @defun image-type-available-p type
4709 This function returns non-@code{nil} if images of type @var{type} can
4710 be loaded and displayed. @var{type} must be an image type symbol.
4711
4712 For image types whose support libraries are statically linked, this
4713 function always returns @code{t}. For image types whose support
4714 libraries are dynamically loaded, it returns @code{t} if the library
4715 could be loaded and @code{nil} otherwise.
4716 @end defun
4717
4718 @node Image Descriptors
4719 @subsection Image Descriptors
4720 @cindex image descriptor
4721
4722 An @dfn{image descriptor} is a list which specifies the underlying
4723 data for an image, and how to display it. It is typically used as the
4724 value of a @code{display} overlay or text property (@pxref{Other
4725 Display Specs}); but @xref{Showing Images}, for convenient helper
4726 functions to insert images into buffers.
4727
4728 Each image descriptor has the form @code{(image . @var{props})},
4729 where @var{props} is a property list of alternating keyword symbols
4730 and values, including at least the pair @code{:type @var{type}} that
4731 specifies the image type.
4732
4733 The following is a list of properties that are meaningful for all
4734 image types (there are also properties which are meaningful only for
4735 certain image types, as documented in the following subsections):
4736
4737 @table @code
4738 @item :type @var{type}
4739 The image type.
4740 @ifnottex
4741 @xref{Image Formats}.
4742 @end ifnottex
4743 Every image descriptor must include this property.
4744
4745 @item :file @var{file}
4746 This says to load the image from file @var{file}. If @var{file} is
4747 not an absolute file name, it is expanded in @code{data-directory}.
4748
4749 @item :data @var{data}
4750 This specifies the raw image data. Each image descriptor must have
4751 either @code{:data} or @code{:file}, but not both.
4752
4753 For most image types, the value of a @code{:data} property should be a
4754 string containing the image data. Some image types do not support
4755 @code{:data}; for some others, @code{:data} alone is not enough, so
4756 you need to use other image properties along with @code{:data}. See
4757 the following subsections for details.
4758
4759 @item :margin @var{margin}
4760 This specifies how many pixels to add as an extra margin around the
4761 image. The value, @var{margin}, must be a non-negative number, or a
4762 pair @code{(@var{x} . @var{y})} of such numbers. If it is a pair,
4763 @var{x} specifies how many pixels to add horizontally, and @var{y}
4764 specifies how many pixels to add vertically. If @code{:margin} is not
4765 specified, the default is zero.
4766
4767 @item :ascent @var{ascent}
4768 This specifies the amount of the image's height to use for its
4769 ascent---that is, the part above the baseline. The value,
4770 @var{ascent}, must be a number in the range 0 to 100, or the symbol
4771 @code{center}.
4772
4773 If @var{ascent} is a number, that percentage of the image's height is
4774 used for its ascent.
4775
4776 If @var{ascent} is @code{center}, the image is vertically centered
4777 around a centerline which would be the vertical centerline of text drawn
4778 at the position of the image, in the manner specified by the text
4779 properties and overlays that apply to the image.
4780
4781 If this property is omitted, it defaults to 50.
4782
4783 @item :relief @var{relief}
4784 This adds a shadow rectangle around the image. The value,
4785 @var{relief}, specifies the width of the shadow lines, in pixels. If
4786 @var{relief} is negative, shadows are drawn so that the image appears
4787 as a pressed button; otherwise, it appears as an unpressed button.
4788
4789 @item :conversion @var{algorithm}
4790 This specifies a conversion algorithm that should be applied to the
4791 image before it is displayed; the value, @var{algorithm}, specifies
4792 which algorithm.
4793
4794 @table @code
4795 @item laplace
4796 @itemx emboss
4797 Specifies the Laplace edge detection algorithm, which blurs out small
4798 differences in color while highlighting larger differences. People
4799 sometimes consider this useful for displaying the image for a
4800 ``disabled'' button.
4801
4802 @item (edge-detection :matrix @var{matrix} :color-adjust @var{adjust})
4803 @cindex edge detection, images
4804 Specifies a general edge-detection algorithm. @var{matrix} must be
4805 either a nine-element list or a nine-element vector of numbers. A pixel
4806 at position @math{x/y} in the transformed image is computed from
4807 original pixels around that position. @var{matrix} specifies, for each
4808 pixel in the neighborhood of @math{x/y}, a factor with which that pixel
4809 will influence the transformed pixel; element @math{0} specifies the
4810 factor for the pixel at @math{x-1/y-1}, element @math{1} the factor for
4811 the pixel at @math{x/y-1} etc., as shown below:
4812 @iftex
4813 @tex
4814 $$\pmatrix{x-1/y-1 & x/y-1 & x+1/y-1 \cr
4815 x-1/y & x/y & x+1/y \cr
4816 x-1/y+1& x/y+1 & x+1/y+1 \cr}$$
4817 @end tex
4818 @end iftex
4819 @ifnottex
4820 @display
4821 (x-1/y-1 x/y-1 x+1/y-1
4822 x-1/y x/y x+1/y
4823 x-1/y+1 x/y+1 x+1/y+1)
4824 @end display
4825 @end ifnottex
4826
4827 The resulting pixel is computed from the color intensity of the color
4828 resulting from summing up the RGB values of surrounding pixels,
4829 multiplied by the specified factors, and dividing that sum by the sum
4830 of the factors' absolute values.
4831
4832 Laplace edge-detection currently uses a matrix of
4833 @iftex
4834 @tex
4835 $$\pmatrix{1 & 0 & 0 \cr
4836 0& 0 & 0 \cr
4837 0 & 0 & -1 \cr}$$
4838 @end tex
4839 @end iftex
4840 @ifnottex
4841 @display
4842 (1 0 0
4843 0 0 0
4844 0 0 -1)
4845 @end display
4846 @end ifnottex
4847
4848 Emboss edge-detection uses a matrix of
4849 @iftex
4850 @tex
4851 $$\pmatrix{ 2 & -1 & 0 \cr
4852 -1 & 0 & 1 \cr
4853 0 & 1 & -2 \cr}$$
4854 @end tex
4855 @end iftex
4856 @ifnottex
4857 @display
4858 ( 2 -1 0
4859 -1 0 1
4860 0 1 -2)
4861 @end display
4862 @end ifnottex
4863
4864 @item disabled
4865 Specifies transforming the image so that it looks ``disabled''.
4866 @end table
4867
4868 @item :mask @var{mask}
4869 If @var{mask} is @code{heuristic} or @code{(heuristic @var{bg})}, build
4870 a clipping mask for the image, so that the background of a frame is
4871 visible behind the image. If @var{bg} is not specified, or if @var{bg}
4872 is @code{t}, determine the background color of the image by looking at
4873 the four corners of the image, assuming the most frequently occurring
4874 color from the corners is the background color of the image. Otherwise,
4875 @var{bg} must be a list @code{(@var{red} @var{green} @var{blue})}
4876 specifying the color to assume for the background of the image.
4877
4878 If @var{mask} is @code{nil}, remove a mask from the image, if it has
4879 one. Images in some formats include a mask which can be removed by
4880 specifying @code{:mask nil}.
4881
4882 @item :pointer @var{shape}
4883 This specifies the pointer shape when the mouse pointer is over this
4884 image. @xref{Pointer Shape}, for available pointer shapes.
4885
4886 @item :map @var{map}
4887 @cindex image maps
4888 This associates an image map of @dfn{hot spots} with this image.
4889
4890 An image map is an alist where each element has the format
4891 @code{(@var{area} @var{id} @var{plist})}. An @var{area} is specified
4892 as either a rectangle, a circle, or a polygon.
4893
4894 A rectangle is a cons
4895 @code{(rect . ((@var{x0} . @var{y0}) . (@var{x1} . @var{y1})))}
4896 which specifies the pixel coordinates of the upper left and bottom right
4897 corners of the rectangle area.
4898
4899 A circle is a cons
4900 @code{(circle . ((@var{x0} . @var{y0}) . @var{r}))}
4901 which specifies the center and the radius of the circle; @var{r} may
4902 be a float or integer.
4903
4904 A polygon is a cons
4905 @code{(poly . [@var{x0} @var{y0} @var{x1} @var{y1} ...])}
4906 where each pair in the vector describes one corner in the polygon.
4907
4908 When the mouse pointer lies on a hot-spot area of an image, the
4909 @var{plist} of that hot-spot is consulted; if it contains a @code{help-echo}
4910 property, that defines a tool-tip for the hot-spot, and if it contains
4911 a @code{pointer} property, that defines the shape of the mouse cursor when
4912 it is on the hot-spot.
4913 @xref{Pointer Shape}, for available pointer shapes.
4914
4915 When you click the mouse when the mouse pointer is over a hot-spot, an
4916 event is composed by combining the @var{id} of the hot-spot with the
4917 mouse event; for instance, @code{[area4 mouse-1]} if the hot-spot's
4918 @var{id} is @code{area4}.
4919 @end table
4920
4921 @defun image-mask-p spec &optional frame
4922 This function returns @code{t} if image @var{spec} has a mask bitmap.
4923 @var{frame} is the frame on which the image will be displayed.
4924 @var{frame} @code{nil} or omitted means to use the selected frame
4925 (@pxref{Input Focus}).
4926 @end defun
4927
4928 @node XBM Images
4929 @subsection XBM Images
4930 @cindex XBM
4931
4932 To use XBM format, specify @code{xbm} as the image type. This image
4933 format doesn't require an external library, so images of this type are
4934 always supported.
4935
4936 Additional image properties supported for the @code{xbm} image type are:
4937
4938 @table @code
4939 @item :foreground @var{foreground}
4940 The value, @var{foreground}, should be a string specifying the image
4941 foreground color, or @code{nil} for the default color. This color is
4942 used for each pixel in the XBM that is 1. The default is the frame's
4943 foreground color.
4944
4945 @item :background @var{background}
4946 The value, @var{background}, should be a string specifying the image
4947 background color, or @code{nil} for the default color. This color is
4948 used for each pixel in the XBM that is 0. The default is the frame's
4949 background color.
4950 @end table
4951
4952 If you specify an XBM image using data within Emacs instead of an
4953 external file, use the following three properties:
4954
4955 @table @code
4956 @item :data @var{data}
4957 The value, @var{data}, specifies the contents of the image.
4958 There are three formats you can use for @var{data}:
4959
4960 @itemize @bullet
4961 @item
4962 A vector of strings or bool-vectors, each specifying one line of the
4963 image. Do specify @code{:height} and @code{:width}.
4964
4965 @item
4966 A string containing the same byte sequence as an XBM file would contain.
4967 You must not specify @code{:height} and @code{:width} in this case,
4968 because omitting them is what indicates the data has the format of an
4969 XBM file. The file contents specify the height and width of the image.
4970
4971 @item
4972 A string or a bool-vector containing the bits of the image (plus perhaps
4973 some extra bits at the end that will not be used). It should contain at
4974 least @var{width} * @code{height} bits. In this case, you must specify
4975 @code{:height} and @code{:width}, both to indicate that the string
4976 contains just the bits rather than a whole XBM file, and to specify the
4977 size of the image.
4978 @end itemize
4979
4980 @item :width @var{width}
4981 The value, @var{width}, specifies the width of the image, in pixels.
4982
4983 @item :height @var{height}
4984 The value, @var{height}, specifies the height of the image, in pixels.
4985 @end table
4986
4987 @node XPM Images
4988 @subsection XPM Images
4989 @cindex XPM
4990
4991 To use XPM format, specify @code{xpm} as the image type. The
4992 additional image property @code{:color-symbols} is also meaningful with
4993 the @code{xpm} image type:
4994
4995 @table @code
4996 @item :color-symbols @var{symbols}
4997 The value, @var{symbols}, should be an alist whose elements have the
4998 form @code{(@var{name} . @var{color})}. In each element, @var{name} is
4999 the name of a color as it appears in the image file, and @var{color}
5000 specifies the actual color to use for displaying that name.
5001 @end table
5002
5003 @node PostScript Images
5004 @subsection PostScript Images
5005 @cindex postscript images
5006
5007 To use PostScript for an image, specify image type @code{postscript}.
5008 This works only if you have Ghostscript installed. You must always use
5009 these three properties:
5010
5011 @table @code
5012 @item :pt-width @var{width}
5013 The value, @var{width}, specifies the width of the image measured in
5014 points (1/72 inch). @var{width} must be an integer.
5015
5016 @item :pt-height @var{height}
5017 The value, @var{height}, specifies the height of the image in points
5018 (1/72 inch). @var{height} must be an integer.
5019
5020 @item :bounding-box @var{box}
5021 The value, @var{box}, must be a list or vector of four integers, which
5022 specifying the bounding box of the PostScript image, analogous to the
5023 @samp{BoundingBox} comment found in PostScript files.
5024
5025 @example
5026 %%BoundingBox: 22 171 567 738
5027 @end example
5028 @end table
5029
5030 @node ImageMagick Images
5031 @subsection ImageMagick Images
5032 @cindex ImageMagick images
5033 @cindex images, support for more formats
5034
5035 If you build Emacs with ImageMagick support, you can use the
5036 ImageMagick library to load many image formats (@pxref{File
5037 Conveniences,,, emacs, The GNU Emacs Manual}). The image type symbol
5038 for images loaded via ImageMagick is @code{imagemagick}, regardless of
5039 the actual underlying image format.
5040
5041 @defun imagemagick-types
5042 This function returns a list of image file extensions supported by the
5043 current ImageMagick installation. Each list element is a symbol
5044 representing an internal ImageMagick name for an image type, such as
5045 @code{BMP} for @file{.bmp} images.
5046 @end defun
5047
5048 @defopt imagemagick-enabled-types
5049 The value of this variable is a list of ImageMagick image types which
5050 Emacs may attempt to render using ImageMagick. Each list element
5051 should be one of the symbols in the list returned by
5052 @code{imagemagick-types}, or an equivalent string. Alternatively, a
5053 value of @code{t} enables ImageMagick for all possible image types.
5054 Regardless of the value of this variable,
5055 @code{imagemagick-types-inhibit} (see below) takes precedence.
5056 @end defopt
5057
5058 @defopt imagemagick-types-inhibit
5059 The value of this variable lists the ImageMagick image types which
5060 should never be rendered using ImageMagick, regardless of the value of
5061 @code{imagemagick-enabled-types}. A value of @code{t} disables
5062 ImageMagick entirely.
5063 @end defopt
5064
5065 @defvar image-format-suffixes
5066 This variable is an alist mapping image types to file name extensions.
5067 Emacs uses this in conjunction with the @code{:format} image property
5068 (see below) to give a hint to the ImageMagick library as to the type
5069 of an image. Each element has the form @code{(@var{type}
5070 @var{extension})}, where @var{type} is a symbol specifying an image
5071 content-type, and @var{extension} is a string that specifies the
5072 associated file name extension.
5073 @end defvar
5074
5075 Images loaded with ImageMagick support the following additional
5076 image descriptor properties:
5077
5078 @table @code
5079 @item :background @var{background}
5080 @var{background}, if non-@code{nil}, should be a string specifying a
5081 color, which is used as the image's background color if the image
5082 supports transparency. If the value is @code{nil}, it defaults to the
5083 frame's background color.
5084
5085 @item :width @var{width}, :height @var{height}
5086 The @code{:width} and @code{:height} keywords are used for scaling the
5087 image. If only one of them is specified, the other one will be
5088 calculated so as to preserve the aspect ratio. If both are specified,
5089 aspect ratio may not be preserved.
5090
5091 @item :max-width @var{max-width}, :max-height @var{max-height}
5092 The @code{:max-width} and @code{:max-height} keywords are used for
5093 scaling if the size of the image of the image exceeds these values.
5094 If @code{:width} is set it will have precedence over @code{max-width},
5095 and if @code{:height} is set it will have precedence over
5096 @code{max-height}, but you can otherwise mix these keywords as you
5097 wish. @code{:max-width} and @code{:max-height} will always preserve
5098 the aspect ratio.
5099
5100 @item :format @var{type}
5101 The value, @var{type}, should be a symbol specifying the type of the
5102 image data, as found in @code{image-format-suffixes}. This is used
5103 when the image does not have an associated file name, to provide a
5104 hint to ImageMagick to help it detect the image type.
5105
5106 @item :rotation @var{angle}
5107 Specifies a rotation angle in degrees.
5108
5109 @item :index @var{frame}
5110 @c Doesn't work: http://debbugs.gnu.org/7978
5111 @xref{Multi-Frame Images}.
5112 @end table
5113
5114 @node Other Image Types
5115 @subsection Other Image Types
5116 @cindex PBM
5117
5118 For PBM images, specify image type @code{pbm}. Color, gray-scale and
5119 monochromatic images are supported. For mono PBM images, two additional
5120 image properties are supported.
5121
5122 @table @code
5123 @item :foreground @var{foreground}
5124 The value, @var{foreground}, should be a string specifying the image
5125 foreground color, or @code{nil} for the default color. This color is
5126 used for each pixel in the PBM that is 1. The default is the frame's
5127 foreground color.
5128
5129 @item :background @var{background}
5130 The value, @var{background}, should be a string specifying the image
5131 background color, or @code{nil} for the default color. This color is
5132 used for each pixel in the PBM that is 0. The default is the frame's
5133 background color.
5134 @end table
5135
5136 @noindent
5137 The remaining image types that Emacs can support are:
5138
5139 @table @asis
5140 @item GIF
5141 Image type @code{gif}.
5142 Supports the @code{:index} property. @xref{Multi-Frame Images}.
5143
5144 @item JPEG
5145 Image type @code{jpeg}.
5146
5147 @item PNG
5148 Image type @code{png}.
5149
5150 @item SVG
5151 Image type @code{svg}.
5152
5153 @item TIFF
5154 Image type @code{tiff}.
5155 Supports the @code{:index} property. @xref{Multi-Frame Images}.
5156 @end table
5157
5158 @node Defining Images
5159 @subsection Defining Images
5160 @cindex define image
5161
5162 The functions @code{create-image}, @code{defimage} and
5163 @code{find-image} provide convenient ways to create image descriptors.
5164
5165 @defun create-image file-or-data &optional type data-p &rest props
5166 This function creates and returns an image descriptor which uses the
5167 data in @var{file-or-data}. @var{file-or-data} can be a file name or
5168 a string containing the image data; @var{data-p} should be @code{nil}
5169 for the former case, non-@code{nil} for the latter case.
5170
5171 The optional argument @var{type} is a symbol specifying the image type.
5172 If @var{type} is omitted or @code{nil}, @code{create-image} tries to
5173 determine the image type from the file's first few bytes, or else
5174 from the file's name.
5175
5176 The remaining arguments, @var{props}, specify additional image
5177 properties---for example,
5178
5179 @c ':heuristic-mask' is not documented?
5180 @example
5181 (create-image "foo.xpm" 'xpm nil :heuristic-mask t)
5182 @end example
5183
5184 The function returns @code{nil} if images of this type are not
5185 supported. Otherwise it returns an image descriptor.
5186 @end defun
5187
5188 @defmac defimage symbol specs &optional doc
5189 This macro defines @var{symbol} as an image name. The arguments
5190 @var{specs} is a list which specifies how to display the image.
5191 The third argument, @var{doc}, is an optional documentation string.
5192
5193 Each argument in @var{specs} has the form of a property list, and each
5194 one should specify at least the @code{:type} property and either the
5195 @code{:file} or the @code{:data} property. The value of @code{:type}
5196 should be a symbol specifying the image type, the value of
5197 @code{:file} is the file to load the image from, and the value of
5198 @code{:data} is a string containing the actual image data. Here is an
5199 example:
5200
5201 @example
5202 (defimage test-image
5203 ((:type xpm :file "~/test1.xpm")
5204 (:type xbm :file "~/test1.xbm")))
5205 @end example
5206
5207 @code{defimage} tests each argument, one by one, to see if it is
5208 usable---that is, if the type is supported and the file exists. The
5209 first usable argument is used to make an image descriptor which is
5210 stored in @var{symbol}.
5211
5212 If none of the alternatives will work, then @var{symbol} is defined
5213 as @code{nil}.
5214 @end defmac
5215
5216 @defun find-image specs
5217 This function provides a convenient way to find an image satisfying one
5218 of a list of image specifications @var{specs}.
5219
5220 Each specification in @var{specs} is a property list with contents
5221 depending on image type. All specifications must at least contain the
5222 properties @code{:type @var{type}} and either @w{@code{:file @var{file}}}
5223 or @w{@code{:data @var{data}}}, where @var{type} is a symbol specifying
5224 the image type, e.g., @code{xbm}, @var{file} is the file to load the
5225 image from, and @var{data} is a string containing the actual image data.
5226 The first specification in the list whose @var{type} is supported, and
5227 @var{file} exists, is used to construct the image specification to be
5228 returned. If no specification is satisfied, @code{nil} is returned.
5229
5230 The image is looked for in @code{image-load-path}.
5231 @end defun
5232
5233 @defvar image-load-path
5234 This variable's value is a list of locations in which to search for
5235 image files. If an element is a string or a variable symbol whose
5236 value is a string, the string is taken to be the name of a directory
5237 to search. If an element is a variable symbol whose value is a list,
5238 that is taken to be a list of directory names to search.
5239
5240 The default is to search in the @file{images} subdirectory of the
5241 directory specified by @code{data-directory}, then the directory
5242 specified by @code{data-directory}, and finally in the directories in
5243 @code{load-path}. Subdirectories are not automatically included in
5244 the search, so if you put an image file in a subdirectory, you have to
5245 supply the subdirectory name explicitly. For example, to find the
5246 image @file{images/foo/bar.xpm} within @code{data-directory}, you
5247 should specify the image as follows:
5248
5249 @example
5250 (defimage foo-image '((:type xpm :file "foo/bar.xpm")))
5251 @end example
5252 @end defvar
5253
5254 @defun image-load-path-for-library library image &optional path no-error
5255 This function returns a suitable search path for images used by the
5256 Lisp package @var{library}.
5257
5258 The function searches for @var{image} first using @code{image-load-path},
5259 excluding @file{@code{data-directory}/images}, and then in
5260 @code{load-path}, followed by a path suitable for @var{library}, which
5261 includes @file{../../etc/images} and @file{../etc/images} relative to
5262 the library file itself, and finally in
5263 @file{@code{data-directory}/images}.
5264
5265 Then this function returns a list of directories which contains first
5266 the directory in which @var{image} was found, followed by the value of
5267 @code{load-path}. If @var{path} is given, it is used instead of
5268 @code{load-path}.
5269
5270 If @var{no-error} is non-@code{nil} and a suitable path can't be
5271 found, don't signal an error. Instead, return a list of directories as
5272 before, except that @code{nil} appears in place of the image directory.
5273
5274 Here is an example of using @code{image-load-path-for-library}:
5275
5276 @example
5277 (defvar image-load-path) ; shush compiler
5278 (let* ((load-path (image-load-path-for-library
5279 "mh-e" "mh-logo.xpm"))
5280 (image-load-path (cons (car load-path)
5281 image-load-path)))
5282 (mh-tool-bar-folder-buttons-init))
5283 @end example
5284 @end defun
5285
5286 @node Showing Images
5287 @subsection Showing Images
5288 @cindex show image
5289
5290 You can use an image descriptor by setting up the @code{display}
5291 property yourself, but it is easier to use the functions in this
5292 section.
5293
5294 @defun insert-image image &optional string area slice
5295 This function inserts @var{image} in the current buffer at point. The
5296 value @var{image} should be an image descriptor; it could be a value
5297 returned by @code{create-image}, or the value of a symbol defined with
5298 @code{defimage}. The argument @var{string} specifies the text to put
5299 in the buffer to hold the image. If it is omitted or @code{nil},
5300 @code{insert-image} uses @code{" "} by default.
5301
5302 The argument @var{area} specifies whether to put the image in a margin.
5303 If it is @code{left-margin}, the image appears in the left margin;
5304 @code{right-margin} specifies the right margin. If @var{area} is
5305 @code{nil} or omitted, the image is displayed at point within the
5306 buffer's text.
5307
5308 The argument @var{slice} specifies a slice of the image to insert. If
5309 @var{slice} is @code{nil} or omitted the whole image is inserted.
5310 Otherwise, @var{slice} is a list @code{(@var{x} @var{y} @var{width}
5311 @var{height})} which specifies the @var{x} and @var{y} positions and
5312 @var{width} and @var{height} of the image area to insert. Integer
5313 values are in units of pixels. A floating-point number in the range
5314 0.0--1.0 stands for that fraction of the width or height of the entire
5315 image.
5316
5317 Internally, this function inserts @var{string} in the buffer, and gives
5318 it a @code{display} property which specifies @var{image}. @xref{Display
5319 Property}.
5320 @end defun
5321
5322 @cindex slice, image
5323 @cindex image slice
5324 @defun insert-sliced-image image &optional string area rows cols
5325 This function inserts @var{image} in the current buffer at point, like
5326 @code{insert-image}, but splits the image into @var{rows}x@var{cols}
5327 equally sized slices.
5328
5329 If an image is inserted ``sliced'', Emacs displays each slice as a
5330 separate image, and allow more intuitive scrolling up/down, instead of
5331 jumping up/down the entire image when paging through a buffer that
5332 displays (large) images.
5333 @end defun
5334
5335 @defun put-image image pos &optional string area
5336 This function puts image @var{image} in front of @var{pos} in the
5337 current buffer. The argument @var{pos} should be an integer or a
5338 marker. It specifies the buffer position where the image should appear.
5339 The argument @var{string} specifies the text that should hold the image
5340 as an alternative to the default.
5341
5342 The argument @var{image} must be an image descriptor, perhaps returned
5343 by @code{create-image} or stored by @code{defimage}.
5344
5345 The argument @var{area} specifies whether to put the image in a margin.
5346 If it is @code{left-margin}, the image appears in the left margin;
5347 @code{right-margin} specifies the right margin. If @var{area} is
5348 @code{nil} or omitted, the image is displayed at point within the
5349 buffer's text.
5350
5351 Internally, this function creates an overlay, and gives it a
5352 @code{before-string} property containing text that has a @code{display}
5353 property whose value is the image. (Whew!)
5354 @end defun
5355
5356 @defun remove-images start end &optional buffer
5357 This function removes images in @var{buffer} between positions
5358 @var{start} and @var{end}. If @var{buffer} is omitted or @code{nil},
5359 images are removed from the current buffer.
5360
5361 This removes only images that were put into @var{buffer} the way
5362 @code{put-image} does it, not images that were inserted with
5363 @code{insert-image} or in other ways.
5364 @end defun
5365
5366 @defun image-size spec &optional pixels frame
5367 @cindex size of image
5368 This function returns the size of an image as a pair
5369 @w{@code{(@var{width} . @var{height})}}. @var{spec} is an image
5370 specification. @var{pixels} non-@code{nil} means return sizes
5371 measured in pixels, otherwise return sizes measured in canonical
5372 character units (fractions of the width/height of the frame's default
5373 font). @var{frame} is the frame on which the image will be displayed.
5374 @var{frame} null or omitted means use the selected frame (@pxref{Input
5375 Focus}).
5376 @end defun
5377
5378 @defvar max-image-size
5379 This variable is used to define the maximum size of image that Emacs
5380 will load. Emacs will refuse to load (and display) any image that is
5381 larger than this limit.
5382
5383 If the value is an integer, it directly specifies the maximum
5384 image height and width, measured in pixels. If it is floating
5385 point, it specifies the maximum image height and width
5386 as a ratio to the frame height and width. If the value is
5387 non-numeric, there is no explicit limit on the size of images.
5388
5389 The purpose of this variable is to prevent unreasonably large images
5390 from accidentally being loaded into Emacs. It only takes effect the
5391 first time an image is loaded. Once an image is placed in the image
5392 cache, it can always be displayed, even if the value of
5393 @code{max-image-size} is subsequently changed (@pxref{Image Cache}).
5394 @end defvar
5395
5396 @node Multi-Frame Images
5397 @subsection Multi-Frame Images
5398 @cindex multi-frame images
5399
5400 @cindex animation
5401 @cindex image animation
5402 @cindex image frames
5403 Some image files can contain more than one image. We say that there
5404 are multiple ``frames'' in the image. At present, Emacs supports
5405 multiple frames for GIF, TIFF, and certain ImageMagick formats such as
5406 DJVM@.
5407
5408 The frames can be used either to represent multiple ``pages'' (this is
5409 usually the case with multi-frame TIFF files, for example), or to
5410 create animation (usually the case with multi-frame GIF files).
5411
5412 A multi-frame image has a property @code{:index}, whose value is an
5413 integer (counting from 0) that specifies which frame is being displayed.
5414
5415 @defun image-multi-frame-p image
5416 This function returns non-@code{nil} if @var{image} contains more than
5417 one frame. The actual return value is a cons @code{(@var{nimages}
5418 . @var{delay})}, where @var{nimages} is the number of frames and
5419 @var{delay} is the delay in seconds between them, or @code{nil}
5420 if the image does not specify a delay. Images that are intended to be
5421 animated usually specify a frame delay, whereas ones that are intended
5422 to be treated as multiple pages do not.
5423 @end defun
5424
5425 @defun image-current-frame image
5426 This function returns the index of the current frame number for
5427 @var{image}, counting from 0.
5428 @end defun
5429
5430 @defun image-show-frame image n &optional nocheck
5431 This function switches @var{image} to frame number @var{n}. It
5432 replaces a frame number outside the valid range with that of the end
5433 of the range, unless @var{nocheck} is non-@code{nil}. If @var{image}
5434 does not contain a frame with the specified number, the image displays
5435 as a hollow box.
5436 @end defun
5437
5438 @defun image-animate image &optional index limit
5439 This function animates @var{image}. The optional integer @var{index}
5440 specifies the frame from which to start (default 0). The optional
5441 argument @var{limit} controls the length of the animation. If omitted
5442 or @code{nil}, the image animates once only; if @code{t} it loops
5443 forever; if a number animation stops after that many seconds.
5444 @end defun
5445
5446 @vindex image-minimum-frame-delay
5447 @vindex image-default-frame-delay
5448 @noindent Animation operates by means of a timer. Note that Emacs imposes a
5449 minimum frame delay of 0.01 (@code{image-minimum-frame-delay}) seconds.
5450 If the image itself does not specify a delay, Emacs uses
5451 @code{image-default-frame-delay}.
5452
5453 @defun image-animate-timer image
5454 This function returns the timer responsible for animating @var{image},
5455 if there is one.
5456 @end defun
5457
5458
5459 @node Image Cache
5460 @subsection Image Cache
5461 @cindex image cache
5462
5463 Emacs caches images so that it can display them again more
5464 efficiently. When Emacs displays an image, it searches the image
5465 cache for an existing image specification @code{equal} to the desired
5466 specification. If a match is found, the image is displayed from the
5467 cache. Otherwise, Emacs loads the image normally.
5468
5469 @defun image-flush spec &optional frame
5470 This function removes the image with specification @var{spec} from the
5471 image cache of frame @var{frame}. Image specifications are compared
5472 using @code{equal}. If @var{frame} is @code{nil}, it defaults to the
5473 selected frame. If @var{frame} is @code{t}, the image is flushed on
5474 all existing frames.
5475
5476 In Emacs's current implementation, each graphical terminal possesses an
5477 image cache, which is shared by all the frames on that terminal
5478 (@pxref{Multiple Terminals}). Thus, refreshing an image in one frame
5479 also refreshes it in all other frames on the same terminal.
5480 @end defun
5481
5482 One use for @code{image-flush} is to tell Emacs about a change in an
5483 image file. If an image specification contains a @code{:file}
5484 property, the image is cached based on the file's contents when the
5485 image is first displayed. Even if the file subsequently changes,
5486 Emacs continues displaying the old version of the image. Calling
5487 @code{image-flush} flushes the image from the cache, forcing Emacs to
5488 re-read the file the next time it needs to display that image.
5489
5490 Another use for @code{image-flush} is for memory conservation. If
5491 your Lisp program creates a large number of temporary images over a
5492 period much shorter than @code{image-cache-eviction-delay} (see
5493 below), you can opt to flush unused images yourself, instead of
5494 waiting for Emacs to do it automatically.
5495
5496 @defun clear-image-cache &optional filter
5497 This function clears an image cache, removing all the images stored in
5498 it. If @var{filter} is omitted or @code{nil}, it clears the cache for
5499 the selected frame. If @var{filter} is a frame, it clears the cache
5500 for that frame. If @var{filter} is @code{t}, all image caches are
5501 cleared. Otherwise, @var{filter} is taken to be a file name, and all
5502 images associated with that file name are removed from all image
5503 caches.
5504 @end defun
5505
5506 If an image in the image cache has not been displayed for a specified
5507 period of time, Emacs removes it from the cache and frees the
5508 associated memory.
5509
5510 @defvar image-cache-eviction-delay
5511 This variable specifies the number of seconds an image can remain in
5512 the cache without being displayed. When an image is not displayed for
5513 this length of time, Emacs removes it from the image cache.
5514
5515 Under some circumstances, if the number of images in the cache grows
5516 too large, the actual eviction delay may be shorter than this.
5517
5518 If the value is @code{nil}, Emacs does not remove images from the cache
5519 except when you explicitly clear it. This mode can be useful for
5520 debugging.
5521 @end defvar
5522
5523 @node Buttons
5524 @section Buttons
5525 @cindex buttons in buffers
5526 @cindex clickable buttons in buffers
5527
5528 The Button package defines functions for inserting and manipulating
5529 @dfn{buttons} that can be activated with the mouse or via keyboard
5530 commands. These buttons are typically used for various kinds of
5531 hyperlinks.
5532
5533 A button is essentially a set of text or overlay properties,
5534 attached to a stretch of text in a buffer. These properties are
5535 called @dfn{button properties}. One of these properties, the
5536 @dfn{action property}, specifies a function which is called when the
5537 user invokes the button using the keyboard or the mouse. The action
5538 function may examine the button and use its other properties as
5539 desired.
5540
5541 In some ways, the Button package duplicates the functionality in the
5542 Widget package. @xref{Top, , Introduction, widget, The Emacs Widget
5543 Library}. The advantage of the Button package is that it is faster,
5544 smaller, and simpler to program. From the point of view of the user,
5545 the interfaces produced by the two packages are very similar.
5546
5547 @menu
5548 * Button Properties:: Button properties with special meanings.
5549 * Button Types:: Defining common properties for classes of buttons.
5550 * Making Buttons:: Adding buttons to Emacs buffers.
5551 * Manipulating Buttons:: Getting and setting properties of buttons.
5552 * Button Buffer Commands:: Buffer-wide commands and bindings for buttons.
5553 @end menu
5554
5555 @node Button Properties
5556 @subsection Button Properties
5557 @cindex button properties
5558
5559 Each button has an associated list of properties defining its
5560 appearance and behavior, and other arbitrary properties may be used
5561 for application specific purposes. The following properties have
5562 special meaning to the Button package:
5563
5564 @table @code
5565 @item action
5566 @kindex action @r{(button property)}
5567 The function to call when the user invokes the button, which is passed
5568 the single argument @var{button}. By default this is @code{ignore},
5569 which does nothing.
5570
5571 @item mouse-action
5572 @kindex mouse-action @r{(button property)}
5573 This is similar to @code{action}, and when present, will be used
5574 instead of @code{action} for button invocations resulting from
5575 mouse-clicks (instead of the user hitting @key{RET}). If not
5576 present, mouse-clicks use @code{action} instead.
5577
5578 @item face
5579 @kindex face @r{(button property)}
5580 This is an Emacs face controlling how buttons of this type are
5581 displayed; by default this is the @code{button} face.
5582
5583 @item mouse-face
5584 @kindex mouse-face @r{(button property)}
5585 This is an additional face which controls appearance during
5586 mouse-overs (merged with the usual button face); by default this is
5587 the usual Emacs @code{highlight} face.
5588
5589 @item keymap
5590 @kindex keymap @r{(button property)}
5591 The button's keymap, defining bindings active within the button
5592 region. By default this is the usual button region keymap, stored
5593 in the variable @code{button-map}, which defines @key{RET} and
5594 @key{mouse-2} to invoke the button.
5595
5596 @item type
5597 @kindex type @r{(button property)}
5598 The button type. @xref{Button Types}.
5599
5600 @item help-echo
5601 @kindex help-index @r{(button property)}
5602 A string displayed by the Emacs tool-tip help system; by default,
5603 @code{"mouse-2, RET: Push this button"}.
5604
5605 @item follow-link
5606 @kindex follow-link @r{(button property)}
5607 The follow-link property, defining how a @key{Mouse-1} click behaves
5608 on this button, @xref{Clickable Text}.
5609
5610 @item button
5611 @kindex button @r{(button property)}
5612 All buttons have a non-@code{nil} @code{button} property, which may be useful
5613 in finding regions of text that comprise buttons (which is what the
5614 standard button functions do).
5615 @end table
5616
5617 There are other properties defined for the regions of text in a
5618 button, but these are not generally interesting for typical uses.
5619
5620 @node Button Types
5621 @subsection Button Types
5622 @cindex button types
5623
5624 Every button has a @dfn{button type}, which defines default values
5625 for the button's properties. Button types are arranged in a
5626 hierarchy, with specialized types inheriting from more general types,
5627 so that it's easy to define special-purpose types of buttons for
5628 specific tasks.
5629
5630 @defun define-button-type name &rest properties
5631 Define a `button type' called @var{name} (a symbol).
5632 The remaining arguments
5633 form a sequence of @var{property value} pairs, specifying default
5634 property values for buttons with this type (a button's type may be set
5635 by giving it a @code{type} property when creating the button, using
5636 the @code{:type} keyword argument).
5637
5638 In addition, the keyword argument @code{:supertype} may be used to
5639 specify a button-type from which @var{name} inherits its default
5640 property values. Note that this inheritance happens only when
5641 @var{name} is defined; subsequent changes to a supertype are not
5642 reflected in its subtypes.
5643 @end defun
5644
5645 Using @code{define-button-type} to define default properties for
5646 buttons is not necessary---buttons without any specified type use the
5647 built-in button-type @code{button}---but it is encouraged, since
5648 doing so usually makes the resulting code clearer and more efficient.
5649
5650 @node Making Buttons
5651 @subsection Making Buttons
5652 @cindex making buttons
5653
5654 Buttons are associated with a region of text, using an overlay or
5655 text properties to hold button-specific information, all of which are
5656 initialized from the button's type (which defaults to the built-in
5657 button type @code{button}). Like all Emacs text, the appearance of
5658 the button is governed by the @code{face} property; by default (via
5659 the @code{face} property inherited from the @code{button} button-type)
5660 this is a simple underline, like a typical web-page link.
5661
5662 For convenience, there are two sorts of button-creation functions,
5663 those that add button properties to an existing region of a buffer,
5664 called @code{make-...button}, and those that also insert the button
5665 text, called @code{insert-...button}.
5666
5667 The button-creation functions all take the @code{&rest} argument
5668 @var{properties}, which should be a sequence of @var{property value}
5669 pairs, specifying properties to add to the button; see @ref{Button
5670 Properties}. In addition, the keyword argument @code{:type} may be
5671 used to specify a button-type from which to inherit other properties;
5672 see @ref{Button Types}. Any properties not explicitly specified
5673 during creation will be inherited from the button's type (if the type
5674 defines such a property).
5675
5676 The following functions add a button using an overlay
5677 (@pxref{Overlays}) to hold the button properties:
5678
5679 @defun make-button beg end &rest properties
5680 This makes a button from @var{beg} to @var{end} in the
5681 current buffer, and returns it.
5682 @end defun
5683
5684 @defun insert-button label &rest properties
5685 This insert a button with the label @var{label} at point,
5686 and returns it.
5687 @end defun
5688
5689 The following functions are similar, but using text properties
5690 (@pxref{Text Properties}) to hold the button properties. Such buttons
5691 do not add markers to the buffer, so editing in the buffer does not
5692 slow down if there is an extremely large numbers of buttons. However,
5693 if there is an existing face text property on the text (e.g., a face
5694 assigned by Font Lock mode), the button face may not be visible. Both
5695 of these functions return the starting position of the new button.
5696
5697 @defun make-text-button beg end &rest properties
5698 This makes a button from @var{beg} to @var{end} in the current buffer,
5699 using text properties.
5700 @end defun
5701
5702 @defun insert-text-button label &rest properties
5703 This inserts a button with the label @var{label} at point, using text
5704 properties.
5705 @end defun
5706
5707 @node Manipulating Buttons
5708 @subsection Manipulating Buttons
5709 @cindex manipulating buttons
5710
5711 These are functions for getting and setting properties of buttons.
5712 Often these are used by a button's invocation function to determine
5713 what to do.
5714
5715 Where a @var{button} parameter is specified, it means an object
5716 referring to a specific button, either an overlay (for overlay
5717 buttons), or a buffer-position or marker (for text property buttons).
5718 Such an object is passed as the first argument to a button's
5719 invocation function when it is invoked.
5720
5721 @defun button-start button
5722 Return the position at which @var{button} starts.
5723 @end defun
5724
5725 @defun button-end button
5726 Return the position at which @var{button} ends.
5727 @end defun
5728
5729 @defun button-get button prop
5730 Get the property of button @var{button} named @var{prop}.
5731 @end defun
5732
5733 @defun button-put button prop val
5734 Set @var{button}'s @var{prop} property to @var{val}.
5735 @end defun
5736
5737 @defun button-activate button &optional use-mouse-action
5738 Call @var{button}'s @code{action} property (i.e., invoke the function
5739 that is the value of that property, passing it the single argument
5740 @var{button}). If @var{use-mouse-action} is non-@code{nil}, try to
5741 invoke the button's @code{mouse-action} property instead of
5742 @code{action}; if the button has no @code{mouse-action} property, use
5743 @code{action} as normal.
5744 @end defun
5745
5746 @defun button-label button
5747 Return @var{button}'s text label.
5748 @end defun
5749
5750 @defun button-type button
5751 Return @var{button}'s button-type.
5752 @end defun
5753
5754 @defun button-has-type-p button type
5755 Return @code{t} if @var{button} has button-type @var{type}, or one of
5756 @var{type}'s subtypes.
5757 @end defun
5758
5759 @defun button-at pos
5760 Return the button at position @var{pos} in the current buffer, or
5761 @code{nil}. If the button at @var{pos} is a text property button, the
5762 return value is a marker pointing to @var{pos}.
5763 @end defun
5764
5765 @defun button-type-put type prop val
5766 Set the button-type @var{type}'s @var{prop} property to @var{val}.
5767 @end defun
5768
5769 @defun button-type-get type prop
5770 Get the property of button-type @var{type} named @var{prop}.
5771 @end defun
5772
5773 @defun button-type-subtype-p type supertype
5774 Return @code{t} if button-type @var{type} is a subtype of @var{supertype}.
5775 @end defun
5776
5777 @node Button Buffer Commands
5778 @subsection Button Buffer Commands
5779 @cindex button buffer commands
5780
5781 These are commands and functions for locating and operating on
5782 buttons in an Emacs buffer.
5783
5784 @code{push-button} is the command that a user uses to actually `push'
5785 a button, and is bound by default in the button itself to @key{RET}
5786 and to @key{mouse-2} using a local keymap in the button's overlay or
5787 text properties. Commands that are useful outside the buttons itself,
5788 such as @code{forward-button} and @code{backward-button} are
5789 additionally available in the keymap stored in
5790 @code{button-buffer-map}; a mode which uses buttons may want to use
5791 @code{button-buffer-map} as a parent keymap for its keymap.
5792
5793 If the button has a non-@code{nil} @code{follow-link} property, and
5794 @code{mouse-1-click-follows-link} is set, a quick @key{Mouse-1} click
5795 will also activate the @code{push-button} command.
5796 @xref{Clickable Text}.
5797
5798 @deffn Command push-button &optional pos use-mouse-action
5799 Perform the action specified by a button at location @var{pos}.
5800 @var{pos} may be either a buffer position or a mouse-event. If
5801 @var{use-mouse-action} is non-@code{nil}, or @var{pos} is a
5802 mouse-event (@pxref{Mouse Events}), try to invoke the button's
5803 @code{mouse-action} property instead of @code{action}; if the button
5804 has no @code{mouse-action} property, use @code{action} as normal.
5805 @var{pos} defaults to point, except when @code{push-button} is invoked
5806 interactively as the result of a mouse-event, in which case, the mouse
5807 event's position is used. If there's no button at @var{pos}, do
5808 nothing and return @code{nil}, otherwise return @code{t}.
5809 @end deffn
5810
5811 @deffn Command forward-button n &optional wrap display-message
5812 Move to the @var{n}th next button, or @var{n}th previous button if
5813 @var{n} is negative. If @var{n} is zero, move to the start of any
5814 button at point. If @var{wrap} is non-@code{nil}, moving past either
5815 end of the buffer continues from the other end. If
5816 @var{display-message} is non-@code{nil}, the button's help-echo string
5817 is displayed. Any button with a non-@code{nil} @code{skip} property
5818 is skipped over. Returns the button found.
5819 @end deffn
5820
5821 @deffn Command backward-button n &optional wrap display-message
5822 Move to the @var{n}th previous button, or @var{n}th next button if
5823 @var{n} is negative. If @var{n} is zero, move to the start of any
5824 button at point. If @var{wrap} is non-@code{nil}, moving past either
5825 end of the buffer continues from the other end. If
5826 @var{display-message} is non-@code{nil}, the button's help-echo string
5827 is displayed. Any button with a non-@code{nil} @code{skip} property
5828 is skipped over. Returns the button found.
5829 @end deffn
5830
5831 @defun next-button pos &optional count-current
5832 @defunx previous-button pos &optional count-current
5833 Return the next button after (for @code{next-button}) or before (for
5834 @code{previous-button}) position @var{pos} in the current buffer. If
5835 @var{count-current} is non-@code{nil}, count any button at @var{pos}
5836 in the search, instead of starting at the next button.
5837 @end defun
5838
5839 @node Abstract Display
5840 @section Abstract Display
5841 @cindex ewoc
5842 @cindex display, abstract
5843 @cindex display, arbitrary objects
5844 @cindex model/view/controller
5845 @cindex view part, model/view/controller
5846
5847 The Ewoc package constructs buffer text that represents a structure
5848 of Lisp objects, and updates the text to follow changes in that
5849 structure. This is like the ``view'' component in the
5850 ``model/view/controller'' design paradigm. Ewoc means ``Emacs's
5851 Widget for Object Collections''.
5852
5853 An @dfn{ewoc} is a structure that organizes information required to
5854 construct buffer text that represents certain Lisp data. The buffer
5855 text of the ewoc has three parts, in order: first, fixed @dfn{header}
5856 text; next, textual descriptions of a series of data elements (Lisp
5857 objects that you specify); and last, fixed @dfn{footer} text.
5858 Specifically, an ewoc contains information on:
5859
5860 @itemize @bullet
5861 @item
5862 The buffer which its text is generated in.
5863
5864 @item
5865 The text's start position in the buffer.
5866
5867 @item
5868 The header and footer strings.
5869
5870 @item
5871 @cindex node, ewoc
5872 @c or "@cindex node, abstract display"?
5873 A doubly-linked chain of @dfn{nodes}, each of which contains:
5874
5875 @itemize
5876 @item
5877 A @dfn{data element}, a single Lisp object.
5878
5879 @item
5880 Links to the preceding and following nodes in the chain.
5881 @end itemize
5882
5883 @item
5884 A @dfn{pretty-printer} function which is responsible for
5885 inserting the textual representation of a data
5886 element value into the current buffer.
5887 @end itemize
5888
5889 Typically, you define an ewoc with @code{ewoc-create}, and then pass
5890 the resulting ewoc structure to other functions in the Ewoc package to
5891 build nodes within it, and display it in the buffer. Once it is
5892 displayed in the buffer, other functions determine the correspondence
5893 between buffer positions and nodes, move point from one node's textual
5894 representation to another, and so forth. @xref{Abstract Display
5895 Functions}.
5896
5897 @cindex encapsulation, ewoc
5898 @c or "@cindex encapsulation, abstract display"?
5899 A node @dfn{encapsulates} a data element much the way a variable
5900 holds a value. Normally, encapsulation occurs as a part of adding a
5901 node to the ewoc. You can retrieve the data element value and place a
5902 new value in its place, like so:
5903
5904 @lisp
5905 (ewoc-data @var{node})
5906 @result{} value
5907
5908 (ewoc-set-data @var{node} @var{new-value})
5909 @result{} @var{new-value}
5910 @end lisp
5911
5912 @noindent
5913 You can also use, as the data element value, a Lisp object (list or
5914 vector) that is a container for the ``real'' value, or an index into
5915 some other structure. The example (@pxref{Abstract Display Example})
5916 uses the latter approach.
5917
5918 When the data changes, you will want to update the text in the
5919 buffer. You can update all nodes by calling @code{ewoc-refresh}, or
5920 just specific nodes using @code{ewoc-invalidate}, or all nodes
5921 satisfying a predicate using @code{ewoc-map}. Alternatively, you can
5922 delete invalid nodes using @code{ewoc-delete} or @code{ewoc-filter},
5923 and add new nodes in their place. Deleting a node from an ewoc deletes
5924 its associated textual description from buffer, as well.
5925
5926 @menu
5927 * Abstract Display Functions:: Functions in the Ewoc package.
5928 * Abstract Display Example:: Example of using Ewoc.
5929 @end menu
5930
5931 @node Abstract Display Functions
5932 @subsection Abstract Display Functions
5933
5934 In this subsection, @var{ewoc} and @var{node} stand for the
5935 structures described above (@pxref{Abstract Display}), while
5936 @var{data} stands for an arbitrary Lisp object used as a data element.
5937
5938 @defun ewoc-create pretty-printer &optional header footer nosep
5939 This constructs and returns a new ewoc, with no nodes (and thus no data
5940 elements). @var{pretty-printer} should be a function that takes one
5941 argument, a data element of the sort you plan to use in this ewoc, and
5942 inserts its textual description at point using @code{insert} (and never
5943 @code{insert-before-markers}, because that would interfere with the
5944 Ewoc package's internal mechanisms).
5945
5946 Normally, a newline is automatically inserted after the header,
5947 the footer and every node's textual description. If @var{nosep}
5948 is non-@code{nil}, no newline is inserted. This may be useful for
5949 displaying an entire ewoc on a single line, for example, or for
5950 making nodes ``invisible'' by arranging for @var{pretty-printer}
5951 to do nothing for those nodes.
5952
5953 An ewoc maintains its text in the buffer that is current when
5954 you create it, so switch to the intended buffer before calling
5955 @code{ewoc-create}.
5956 @end defun
5957
5958 @defun ewoc-buffer ewoc
5959 This returns the buffer where @var{ewoc} maintains its text.
5960 @end defun
5961
5962 @defun ewoc-get-hf ewoc
5963 This returns a cons cell @code{(@var{header} . @var{footer})}
5964 made from @var{ewoc}'s header and footer.
5965 @end defun
5966
5967 @defun ewoc-set-hf ewoc header footer
5968 This sets the header and footer of @var{ewoc} to the strings
5969 @var{header} and @var{footer}, respectively.
5970 @end defun
5971
5972 @defun ewoc-enter-first ewoc data
5973 @defunx ewoc-enter-last ewoc data
5974 These add a new node encapsulating @var{data}, putting it, respectively,
5975 at the beginning or end of @var{ewoc}'s chain of nodes.
5976 @end defun
5977
5978 @defun ewoc-enter-before ewoc node data
5979 @defunx ewoc-enter-after ewoc node data
5980 These add a new node encapsulating @var{data}, adding it to
5981 @var{ewoc} before or after @var{node}, respectively.
5982 @end defun
5983
5984 @defun ewoc-prev ewoc node
5985 @defunx ewoc-next ewoc node
5986 These return, respectively, the previous node and the next node of @var{node}
5987 in @var{ewoc}.
5988 @end defun
5989
5990 @defun ewoc-nth ewoc n
5991 This returns the node in @var{ewoc} found at zero-based index @var{n}.
5992 A negative @var{n} means count from the end. @code{ewoc-nth} returns
5993 @code{nil} if @var{n} is out of range.
5994 @end defun
5995
5996 @defun ewoc-data node
5997 This extracts the data encapsulated by @var{node} and returns it.
5998 @end defun
5999
6000 @defun ewoc-set-data node data
6001 This sets the data encapsulated by @var{node} to @var{data}.
6002 @end defun
6003
6004 @defun ewoc-locate ewoc &optional pos guess
6005 This determines the node in @var{ewoc} which contains point (or
6006 @var{pos} if specified), and returns that node. If @var{ewoc} has no
6007 nodes, it returns @code{nil}. If @var{pos} is before the first node,
6008 it returns the first node; if @var{pos} is after the last node, it returns
6009 the last node. The optional third arg @var{guess}
6010 should be a node that is likely to be near @var{pos}; this doesn't
6011 alter the result, but makes the function run faster.
6012 @end defun
6013
6014 @defun ewoc-location node
6015 This returns the start position of @var{node}.
6016 @end defun
6017
6018 @defun ewoc-goto-prev ewoc arg
6019 @defunx ewoc-goto-next ewoc arg
6020 These move point to the previous or next, respectively, @var{arg}th node
6021 in @var{ewoc}. @code{ewoc-goto-prev} does not move if it is already at
6022 the first node or if @var{ewoc} is empty, whereas @code{ewoc-goto-next}
6023 moves past the last node, returning @code{nil}. Excepting this special
6024 case, these functions return the node moved to.
6025 @end defun
6026
6027 @defun ewoc-goto-node ewoc node
6028 This moves point to the start of @var{node} in @var{ewoc}.
6029 @end defun
6030
6031 @defun ewoc-refresh ewoc
6032 This function regenerates the text of @var{ewoc}. It works by
6033 deleting the text between the header and the footer, i.e., all the
6034 data elements' representations, and then calling the pretty-printer
6035 function for each node, one by one, in order.
6036 @end defun
6037
6038 @defun ewoc-invalidate ewoc &rest nodes
6039 This is similar to @code{ewoc-refresh}, except that only @var{nodes} in
6040 @var{ewoc} are updated instead of the entire set.
6041 @end defun
6042
6043 @defun ewoc-delete ewoc &rest nodes
6044 This deletes each node in @var{nodes} from @var{ewoc}.
6045 @end defun
6046
6047 @defun ewoc-filter ewoc predicate &rest args
6048 This calls @var{predicate} for each data element in @var{ewoc} and
6049 deletes those nodes for which @var{predicate} returns @code{nil}.
6050 Any @var{args} are passed to @var{predicate}.
6051 @end defun
6052
6053 @defun ewoc-collect ewoc predicate &rest args
6054 This calls @var{predicate} for each data element in @var{ewoc}
6055 and returns a list of those elements for which @var{predicate}
6056 returns non-@code{nil}. The elements in the list are ordered
6057 as in the buffer. Any @var{args} are passed to @var{predicate}.
6058 @end defun
6059
6060 @defun ewoc-map map-function ewoc &rest args
6061 This calls @var{map-function} for each data element in @var{ewoc} and
6062 updates those nodes for which @var{map-function} returns non-@code{nil}.
6063 Any @var{args} are passed to @var{map-function}.
6064 @end defun
6065
6066 @node Abstract Display Example
6067 @subsection Abstract Display Example
6068
6069 Here is a simple example using functions of the ewoc package to
6070 implement a ``color components display'', an area in a buffer that
6071 represents a vector of three integers (itself representing a 24-bit RGB
6072 value) in various ways.
6073
6074 @example
6075 (setq colorcomp-ewoc nil
6076 colorcomp-data nil
6077 colorcomp-mode-map nil
6078 colorcomp-labels ["Red" "Green" "Blue"])
6079
6080 (defun colorcomp-pp (data)
6081 (if data
6082 (let ((comp (aref colorcomp-data data)))
6083 (insert (aref colorcomp-labels data) "\t: #x"
6084 (format "%02X" comp) " "
6085 (make-string (ash comp -2) ?#) "\n"))
6086 (let ((cstr (format "#%02X%02X%02X"
6087 (aref colorcomp-data 0)
6088 (aref colorcomp-data 1)
6089 (aref colorcomp-data 2)))
6090 (samp " (sample text) "))
6091 (insert "Color\t: "
6092 (propertize samp 'face
6093 `(foreground-color . ,cstr))
6094 (propertize samp 'face
6095 `(background-color . ,cstr))
6096 "\n"))))
6097
6098 (defun colorcomp (color)
6099 "Allow fiddling with COLOR in a new buffer.
6100 The buffer is in Color Components mode."
6101 (interactive "sColor (name or #RGB or #RRGGBB): ")
6102 (when (string= "" color)
6103 (setq color "green"))
6104 (unless (color-values color)
6105 (error "No such color: %S" color))
6106 (switch-to-buffer
6107 (generate-new-buffer (format "originally: %s" color)))
6108 (kill-all-local-variables)
6109 (setq major-mode 'colorcomp-mode
6110 mode-name "Color Components")
6111 (use-local-map colorcomp-mode-map)
6112 (erase-buffer)
6113 (buffer-disable-undo)
6114 (let ((data (apply 'vector (mapcar (lambda (n) (ash n -8))
6115 (color-values color))))
6116 (ewoc (ewoc-create 'colorcomp-pp
6117 "\nColor Components\n\n"
6118 (substitute-command-keys
6119 "\n\\@{colorcomp-mode-map@}"))))
6120 (set (make-local-variable 'colorcomp-data) data)
6121 (set (make-local-variable 'colorcomp-ewoc) ewoc)
6122 (ewoc-enter-last ewoc 0)
6123 (ewoc-enter-last ewoc 1)
6124 (ewoc-enter-last ewoc 2)
6125 (ewoc-enter-last ewoc nil)))
6126 @end example
6127
6128 @cindex controller part, model/view/controller
6129 This example can be extended to be a ``color selection widget'' (in
6130 other words, the controller part of the ``model/view/controller''
6131 design paradigm) by defining commands to modify @code{colorcomp-data}
6132 and to ``finish'' the selection process, and a keymap to tie it all
6133 together conveniently.
6134
6135 @smallexample
6136 (defun colorcomp-mod (index limit delta)
6137 (let ((cur (aref colorcomp-data index)))
6138 (unless (= limit cur)
6139 (aset colorcomp-data index (+ cur delta)))
6140 (ewoc-invalidate
6141 colorcomp-ewoc
6142 (ewoc-nth colorcomp-ewoc index)
6143 (ewoc-nth colorcomp-ewoc -1))))
6144
6145 (defun colorcomp-R-more () (interactive) (colorcomp-mod 0 255 1))
6146 (defun colorcomp-G-more () (interactive) (colorcomp-mod 1 255 1))
6147 (defun colorcomp-B-more () (interactive) (colorcomp-mod 2 255 1))
6148 (defun colorcomp-R-less () (interactive) (colorcomp-mod 0 0 -1))
6149 (defun colorcomp-G-less () (interactive) (colorcomp-mod 1 0 -1))
6150 (defun colorcomp-B-less () (interactive) (colorcomp-mod 2 0 -1))
6151
6152 (defun colorcomp-copy-as-kill-and-exit ()
6153 "Copy the color components into the kill ring and kill the buffer.
6154 The string is formatted #RRGGBB (hash followed by six hex digits)."
6155 (interactive)
6156 (kill-new (format "#%02X%02X%02X"
6157 (aref colorcomp-data 0)
6158 (aref colorcomp-data 1)
6159 (aref colorcomp-data 2)))
6160 (kill-buffer nil))
6161
6162 (setq colorcomp-mode-map
6163 (let ((m (make-sparse-keymap)))
6164 (suppress-keymap m)
6165 (define-key m "i" 'colorcomp-R-less)
6166 (define-key m "o" 'colorcomp-R-more)
6167 (define-key m "k" 'colorcomp-G-less)
6168 (define-key m "l" 'colorcomp-G-more)
6169 (define-key m "," 'colorcomp-B-less)
6170 (define-key m "." 'colorcomp-B-more)
6171 (define-key m " " 'colorcomp-copy-as-kill-and-exit)
6172 m))
6173 @end smallexample
6174
6175 Note that we never modify the data in each node, which is fixed when the
6176 ewoc is created to be either @code{nil} or an index into the vector
6177 @code{colorcomp-data}, the actual color components.
6178
6179 @node Blinking
6180 @section Blinking Parentheses
6181 @cindex parenthesis matching
6182 @cindex blinking parentheses
6183 @cindex balancing parentheses
6184
6185 This section describes the mechanism by which Emacs shows a matching
6186 open parenthesis when the user inserts a close parenthesis.
6187
6188 @defvar blink-paren-function
6189 The value of this variable should be a function (of no arguments) to
6190 be called whenever a character with close parenthesis syntax is inserted.
6191 The value of @code{blink-paren-function} may be @code{nil}, in which
6192 case nothing is done.
6193 @end defvar
6194
6195 @defopt blink-matching-paren
6196 If this variable is @code{nil}, then @code{blink-matching-open} does
6197 nothing.
6198 @end defopt
6199
6200 @defopt blink-matching-paren-distance
6201 This variable specifies the maximum distance to scan for a matching
6202 parenthesis before giving up.
6203 @end defopt
6204
6205 @defopt blink-matching-delay
6206 This variable specifies the number of seconds to keep indicating the
6207 matching parenthesis. A fraction of a second often gives good
6208 results, but the default is 1, which works on all systems.
6209 @end defopt
6210
6211 @deffn Command blink-matching-open
6212 This function is the default value of @code{blink-paren-function}. It
6213 assumes that point follows a character with close parenthesis syntax
6214 and applies the appropriate effect momentarily to the matching opening
6215 character. If that character is not already on the screen, it
6216 displays the character's context in the echo area. To avoid long
6217 delays, this function does not search farther than
6218 @code{blink-matching-paren-distance} characters.
6219
6220 Here is an example of calling this function explicitly.
6221
6222 @smallexample
6223 @group
6224 (defun interactive-blink-matching-open ()
6225 "Indicate momentarily the start of parenthesized sexp before point."
6226 (interactive)
6227 @end group
6228 @group
6229 (let ((blink-matching-paren-distance
6230 (buffer-size))
6231 (blink-matching-paren t))
6232 (blink-matching-open)))
6233 @end group
6234 @end smallexample
6235 @end deffn
6236
6237 @node Character Display
6238 @section Character Display
6239
6240 This section describes how characters are actually displayed by
6241 Emacs. Typically, a character is displayed as a @dfn{glyph} (a
6242 graphical symbol which occupies one character position on the screen),
6243 whose appearance corresponds to the character itself. For example,
6244 the character @samp{a} (character code 97) is displayed as @samp{a}.
6245 Some characters, however, are displayed specially. For example, the
6246 formfeed character (character code 12) is usually displayed as a
6247 sequence of two glyphs, @samp{^L}, while the newline character
6248 (character code 10) starts a new screen line.
6249
6250 You can modify how each character is displayed by defining a
6251 @dfn{display table}, which maps each character code into a sequence of
6252 glyphs. @xref{Display Tables}.
6253
6254 @menu
6255 * Usual Display:: The usual conventions for displaying characters.
6256 * Display Tables:: What a display table consists of.
6257 * Active Display Table:: How Emacs selects a display table to use.
6258 * Glyphs:: How to define a glyph, and what glyphs mean.
6259 * Glyphless Chars:: How glyphless characters are drawn.
6260 @end menu
6261
6262 @node Usual Display
6263 @subsection Usual Display Conventions
6264
6265 Here are the conventions for displaying each character code (in the
6266 absence of a display table, which can override these
6267 @iftex
6268 conventions).
6269 @end iftex
6270 @ifnottex
6271 conventions; @pxref{Display Tables}).
6272 @end ifnottex
6273
6274 @cindex printable ASCII characters
6275 @itemize @bullet
6276 @item
6277 The @dfn{printable @acronym{ASCII} characters}, character codes 32
6278 through 126 (consisting of numerals, English letters, and symbols like
6279 @samp{#}) are displayed literally.
6280
6281 @item
6282 The tab character (character code 9) displays as whitespace stretching
6283 up to the next tab stop column. @xref{Text Display,,, emacs, The GNU
6284 Emacs Manual}. The variable @code{tab-width} controls the number of
6285 spaces per tab stop (see below).
6286
6287 @item
6288 The newline character (character code 10) has a special effect: it
6289 ends the preceding line and starts a new line.
6290
6291 @cindex ASCII control characters
6292 @item
6293 The non-printable @dfn{@acronym{ASCII} control characters}---character
6294 codes 0 through 31, as well as the @key{DEL} character (character code
6295 127)---display in one of two ways according to the variable
6296 @code{ctl-arrow}. If this variable is non-@code{nil} (the default),
6297 these characters are displayed as sequences of two glyphs, where the
6298 first glyph is @samp{^} (a display table can specify a glyph to use
6299 instead of @samp{^}); e.g., the @key{DEL} character is displayed as
6300 @samp{^?}.
6301
6302 If @code{ctl-arrow} is @code{nil}, these characters are displayed as
6303 octal escapes (see below).
6304
6305 This rule also applies to carriage return (character code 13), if that
6306 character appears in the buffer. But carriage returns usually do not
6307 appear in buffer text; they are eliminated as part of end-of-line
6308 conversion (@pxref{Coding System Basics}).
6309
6310 @cindex octal escapes
6311 @item
6312 @dfn{Raw bytes} are non-@acronym{ASCII} characters with codes 128
6313 through 255 (@pxref{Text Representations}). These characters display
6314 as @dfn{octal escapes}: sequences of four glyphs, where the first
6315 glyph is the @acronym{ASCII} code for @samp{\}, and the others are
6316 digit characters representing the character code in octal. (A display
6317 table can specify a glyph to use instead of @samp{\}.)
6318
6319 @item
6320 Each non-@acronym{ASCII} character with code above 255 is displayed
6321 literally, if the terminal supports it. If the terminal does not
6322 support it, the character is said to be @dfn{glyphless}, and it is
6323 usually displayed using a placeholder glyph. For example, if a
6324 graphical terminal has no font for a character, Emacs usually displays
6325 a box containing the character code in hexadecimal. @xref{Glyphless
6326 Chars}.
6327 @end itemize
6328
6329 The above display conventions apply even when there is a display
6330 table, for any character whose entry in the active display table is
6331 @code{nil}. Thus, when you set up a display table, you need only
6332 specify the characters for which you want special behavior.
6333
6334 The following variables affect how certain characters are displayed
6335 on the screen. Since they change the number of columns the characters
6336 occupy, they also affect the indentation functions. They also affect
6337 how the mode line is displayed; if you want to force redisplay of the
6338 mode line using the new values, call the function
6339 @code{force-mode-line-update} (@pxref{Mode Line Format}).
6340
6341 @defopt ctl-arrow
6342 @cindex control characters in display
6343 This buffer-local variable controls how control characters are
6344 displayed. If it is non-@code{nil}, they are displayed as a caret
6345 followed by the character: @samp{^A}. If it is @code{nil}, they are
6346 displayed as octal escapes: a backslash followed by three octal
6347 digits, as in @samp{\001}.
6348 @end defopt
6349
6350 @defopt tab-width
6351 The value of this buffer-local variable is the spacing between tab
6352 stops used for displaying tab characters in Emacs buffers. The value
6353 is in units of columns, and the default is 8. Note that this feature
6354 is completely independent of the user-settable tab stops used by the
6355 command @code{tab-to-tab-stop}. @xref{Indent Tabs}.
6356 @end defopt
6357
6358 @node Display Tables
6359 @subsection Display Tables
6360
6361 @cindex display table
6362 A display table is a special-purpose char-table
6363 (@pxref{Char-Tables}), with @code{display-table} as its subtype, which
6364 is used to override the usual character display conventions. This
6365 section describes how to make, inspect, and assign elements to a
6366 display table object.
6367
6368 @defun make-display-table
6369 This creates and returns a display table. The table initially has
6370 @code{nil} in all elements.
6371 @end defun
6372
6373 The ordinary elements of the display table are indexed by character
6374 codes; the element at index @var{c} says how to display the character
6375 code @var{c}. The value should be @code{nil} (which means to display
6376 the character @var{c} according to the usual display conventions;
6377 @pxref{Usual Display}), or a vector of glyph codes (which means to
6378 display the character @var{c} as those glyphs; @pxref{Glyphs}).
6379
6380 @strong{Warning:} if you use the display table to change the display
6381 of newline characters, the whole buffer will be displayed as one long
6382 ``line''.
6383
6384 The display table also has six ``extra slots'' which serve special
6385 purposes. Here is a table of their meanings; @code{nil} in any slot
6386 means to use the default for that slot, as stated below.
6387
6388 @table @asis
6389 @item 0
6390 The glyph for the end of a truncated screen line (the default for this
6391 is @samp{$}). @xref{Glyphs}. On graphical terminals, Emacs uses
6392 arrows in the fringes to indicate truncation, so the display table has
6393 no effect.
6394
6395 @item 1
6396 The glyph for the end of a continued line (the default is @samp{\}).
6397 On graphical terminals, Emacs uses curved arrows in the fringes to
6398 indicate continuation, so the display table has no effect.
6399
6400 @item 2
6401 The glyph for indicating a character displayed as an octal character
6402 code (the default is @samp{\}).
6403
6404 @item 3
6405 The glyph for indicating a control character (the default is @samp{^}).
6406
6407 @item 4
6408 A vector of glyphs for indicating the presence of invisible lines (the
6409 default is @samp{...}). @xref{Selective Display}.
6410
6411 @item 5
6412 The glyph used to draw the border between side-by-side windows (the
6413 default is @samp{|}). @xref{Splitting Windows}. This takes effect only
6414 when there are no scroll bars; if scroll bars are supported and in use,
6415 a scroll bar separates the two windows.
6416 @end table
6417
6418 For example, here is how to construct a display table that mimics
6419 the effect of setting @code{ctl-arrow} to a non-@code{nil} value
6420 (@pxref{Glyphs}, for the function @code{make-glyph-code}):
6421
6422 @example
6423 (setq disptab (make-display-table))
6424 (dotimes (i 32)
6425 (or (= i ?\t)
6426 (= i ?\n)
6427 (aset disptab i
6428 (vector (make-glyph-code ?^ 'escape-glyph)
6429 (make-glyph-code (+ i 64) 'escape-glyph)))))
6430 (aset disptab 127
6431 (vector (make-glyph-code ?^ 'escape-glyph)
6432 (make-glyph-code ?? 'escape-glyph)))))
6433 @end example
6434
6435 @defun display-table-slot display-table slot
6436 This function returns the value of the extra slot @var{slot} of
6437 @var{display-table}. The argument @var{slot} may be a number from 0 to
6438 5 inclusive, or a slot name (symbol). Valid symbols are
6439 @code{truncation}, @code{wrap}, @code{escape}, @code{control},
6440 @code{selective-display}, and @code{vertical-border}.
6441 @end defun
6442
6443 @defun set-display-table-slot display-table slot value
6444 This function stores @var{value} in the extra slot @var{slot} of
6445 @var{display-table}. The argument @var{slot} may be a number from 0 to
6446 5 inclusive, or a slot name (symbol). Valid symbols are
6447 @code{truncation}, @code{wrap}, @code{escape}, @code{control},
6448 @code{selective-display}, and @code{vertical-border}.
6449 @end defun
6450
6451 @defun describe-display-table display-table
6452 This function displays a description of the display table
6453 @var{display-table} in a help buffer.
6454 @end defun
6455
6456 @deffn Command describe-current-display-table
6457 This command displays a description of the current display table in a
6458 help buffer.
6459 @end deffn
6460
6461 @node Active Display Table
6462 @subsection Active Display Table
6463 @cindex active display table
6464
6465 Each window can specify a display table, and so can each buffer.
6466 The window's display table, if there is one, takes precedence over the
6467 buffer's display table. If neither exists, Emacs tries to use the
6468 standard display table; if that is @code{nil}, Emacs uses the usual
6469 character display conventions (@pxref{Usual Display}).
6470
6471 Note that display tables affect how the mode line is displayed, so
6472 if you want to force redisplay of the mode line using a new display
6473 table, call @code{force-mode-line-update} (@pxref{Mode Line Format}).
6474
6475 @defun window-display-table &optional window
6476 This function returns @var{window}'s display table, or @code{nil} if
6477 there is none. The default for @var{window} is the selected window.
6478 @end defun
6479
6480 @defun set-window-display-table window table
6481 This function sets the display table of @var{window} to @var{table}.
6482 The argument @var{table} should be either a display table or
6483 @code{nil}.
6484 @end defun
6485
6486 @defvar buffer-display-table
6487 This variable is automatically buffer-local in all buffers; its value
6488 specifies the buffer's display table. If it is @code{nil}, there is
6489 no buffer display table.
6490 @end defvar
6491
6492 @defvar standard-display-table
6493 The value of this variable is the standard display table, which is
6494 used when Emacs is displaying a buffer in a window with neither a
6495 window display table nor a buffer display table defined. Its default
6496 is @code{nil}.
6497 @end defvar
6498
6499 The @file{disp-table} library defines several functions for changing
6500 the standard display table.
6501
6502 @node Glyphs
6503 @subsection Glyphs
6504 @cindex glyph
6505
6506 @cindex glyph code
6507 A @dfn{glyph} is a graphical symbol which occupies a single
6508 character position on the screen. Each glyph is represented in Lisp
6509 as a @dfn{glyph code}, which specifies a character and optionally a
6510 face to display it in (@pxref{Faces}). The main use of glyph codes is
6511 as the entries of display tables (@pxref{Display Tables}). The
6512 following functions are used to manipulate glyph codes:
6513
6514 @defun make-glyph-code char &optional face
6515 This function returns a glyph code representing char @var{char} with
6516 face @var{face}. If @var{face} is omitted or @code{nil}, the glyph
6517 uses the default face; in that case, the glyph code is an integer. If
6518 @var{face} is non-@code{nil}, the glyph code is not necessarily an
6519 integer object.
6520 @end defun
6521
6522 @defun glyph-char glyph
6523 This function returns the character of glyph code @var{glyph}.
6524 @end defun
6525
6526 @defun glyph-face glyph
6527 This function returns face of glyph code @var{glyph}, or @code{nil} if
6528 @var{glyph} uses the default face.
6529 @end defun
6530
6531 @ifnottex
6532 You can set up a @dfn{glyph table} to change how glyph codes are
6533 actually displayed on text terminals. This feature is semi-obsolete;
6534 use @code{glyphless-char-display} instead (@pxref{Glyphless Chars}).
6535
6536 @defvar glyph-table
6537 The value of this variable, if non-@code{nil}, is the current glyph
6538 table. It takes effect only on character terminals; on graphical
6539 displays, all glyphs are displayed literally. The glyph table should
6540 be a vector whose @var{g}th element specifies how to display glyph
6541 code @var{g}, where @var{g} is the glyph code for a glyph whose face
6542 is unspecified. Each element should be one of the following:
6543
6544 @table @asis
6545 @item @code{nil}
6546 Display this glyph literally.
6547
6548 @item a string
6549 Display this glyph by sending the specified string to the terminal.
6550
6551 @item a glyph code
6552 Display the specified glyph code instead.
6553 @end table
6554
6555 Any integer glyph code greater than or equal to the length of the
6556 glyph table is displayed literally.
6557 @end defvar
6558 @end ifnottex
6559
6560 @node Glyphless Chars
6561 @subsection Glyphless Character Display
6562 @cindex glyphless characters
6563
6564 @dfn{Glyphless characters} are characters which are displayed in a
6565 special way, e.g., as a box containing a hexadecimal code, instead of
6566 being displayed literally. These include characters which are
6567 explicitly defined to be glyphless, as well as characters for which
6568 there is no available font (on a graphical display), and characters
6569 which cannot be encoded by the terminal's coding system (on a text
6570 terminal).
6571
6572 @defvar glyphless-char-display
6573 The value of this variable is a char-table which defines glyphless
6574 characters and how they are displayed. Each entry must be one of the
6575 following display methods:
6576
6577 @table @asis
6578 @item @code{nil}
6579 Display the character in the usual way.
6580
6581 @item @code{zero-width}
6582 Don't display the character.
6583
6584 @item @code{thin-space}
6585 Display a thin space, 1-pixel wide on graphical displays, or
6586 1-character wide on text terminals.
6587
6588 @item @code{empty-box}
6589 Display an empty box.
6590
6591 @item @code{hex-code}
6592 Display a box containing the Unicode codepoint of the character, in
6593 hexadecimal notation.
6594
6595 @item an @acronym{ASCII} string
6596 Display a box containing that string.
6597
6598 @item a cons cell @code{(@var{graphical} . @var{text})}
6599 Display with @var{graphical} on graphical displays, and with
6600 @var{text} on text terminals. Both @var{graphical} and @var{text}
6601 must be one of the display methods described above.
6602 @end table
6603
6604 @noindent
6605 The @code{thin-space}, @code{empty-box}, @code{hex-code}, and
6606 @acronym{ASCII} string display methods are drawn with the
6607 @code{glyphless-char} face.
6608
6609 The char-table has one extra slot, which determines how to display any
6610 character that cannot be displayed with any available font, or cannot
6611 be encoded by the terminal's coding system. Its value should be one
6612 of the above display methods, except @code{zero-width} or a cons cell.
6613
6614 If a character has a non-@code{nil} entry in an active display table,
6615 the display table takes effect; in this case, Emacs does not consult
6616 @code{glyphless-char-display} at all.
6617 @end defvar
6618
6619 @defopt glyphless-char-display-control
6620 This user option provides a convenient way to set
6621 @code{glyphless-char-display} for groups of similar characters. Do
6622 not set its value directly from Lisp code; the value takes effect only
6623 via a custom @code{:set} function (@pxref{Variable Definitions}),
6624 which updates @code{glyphless-char-display}.
6625
6626 Its value should be an alist of elements @code{(@var{group}
6627 . @var{method})}, where @var{group} is a symbol specifying a group of
6628 characters, and @var{method} is a symbol specifying how to display
6629 them.
6630
6631 @var{group} should be one of the following:
6632
6633 @table @code
6634 @item c0-control
6635 @acronym{ASCII} control characters @code{U+0000} to @code{U+001F},
6636 excluding the newline and tab characters (normally displayed as escape
6637 sequences like @samp{^A}; @pxref{Text Display,, How Text Is Displayed,
6638 emacs, The GNU Emacs Manual}).
6639
6640 @item c1-control
6641 Non-@acronym{ASCII}, non-printing characters @code{U+0080} to
6642 @code{U+009F} (normally displayed as octal escape sequences like
6643 @samp{\230}).
6644
6645 @item format-control
6646 Characters of Unicode General Category `Cf', such as @samp{U+200E}
6647 (Left-to-Right Mark), but excluding characters that have graphic
6648 images, such as @samp{U+00AD} (Soft Hyphen).
6649
6650 @item no-font
6651 Characters for there is no suitable font, or which cannot be encoded
6652 by the terminal's coding system.
6653 @end table
6654
6655 @c FIXME: this can also be `acronym', but that's not currently
6656 @c completely implemented; it applies only to the format-control
6657 @c group, and only works if the acronym is in `char-acronym-table'.
6658 The @var{method} symbol should be one of @code{zero-width},
6659 @code{thin-space}, @code{empty-box}, or @code{hex-code}. These have
6660 the same meanings as in @code{glyphless-char-display}, above.
6661 @end defopt
6662
6663 @node Beeping
6664 @section Beeping
6665 @cindex bell
6666
6667 This section describes how to make Emacs ring the bell (or blink the
6668 screen) to attract the user's attention. Be conservative about how
6669 often you do this; frequent bells can become irritating. Also be
6670 careful not to use just beeping when signaling an error is more
6671 appropriate (@pxref{Errors}).
6672
6673 @defun ding &optional do-not-terminate
6674 @cindex keyboard macro termination
6675 This function beeps, or flashes the screen (see @code{visible-bell} below).
6676 It also terminates any keyboard macro currently executing unless
6677 @var{do-not-terminate} is non-@code{nil}.
6678 @end defun
6679
6680 @defun beep &optional do-not-terminate
6681 This is a synonym for @code{ding}.
6682 @end defun
6683
6684 @defopt visible-bell
6685 This variable determines whether Emacs should flash the screen to
6686 represent a bell. Non-@code{nil} means yes, @code{nil} means no.
6687 This is effective on graphical displays, and on text terminals
6688 provided the terminal's Termcap entry defines the visible bell
6689 capability (@samp{vb}).
6690 @end defopt
6691
6692 @defvar ring-bell-function
6693 If this is non-@code{nil}, it specifies how Emacs should ``ring the
6694 bell''. Its value should be a function of no arguments. If this is
6695 non-@code{nil}, it takes precedence over the @code{visible-bell}
6696 variable.
6697 @end defvar
6698
6699 @node Window Systems
6700 @section Window Systems
6701
6702 Emacs works with several window systems, most notably the X Window
6703 System. Both Emacs and X use the term ``window'', but use it
6704 differently. An Emacs frame is a single window as far as X is
6705 concerned; the individual Emacs windows are not known to X at all.
6706
6707 @defvar window-system
6708 This terminal-local variable tells Lisp programs what window system
6709 Emacs is using for displaying the frame. The possible values are
6710
6711 @table @code
6712 @item x
6713 @cindex X Window System
6714 Emacs is displaying the frame using X.
6715 @item w32
6716 Emacs is displaying the frame using native MS-Windows GUI.
6717 @item ns
6718 Emacs is displaying the frame using the Nextstep interface (used on
6719 GNUstep and Mac OS X).
6720 @item pc
6721 Emacs is displaying the frame using MS-DOS direct screen writes.
6722 @item nil
6723 Emacs is displaying the frame on a character-based terminal.
6724 @end table
6725 @end defvar
6726
6727 @defvar initial-window-system
6728 This variable holds the value of @code{window-system} used for the
6729 first frame created by Emacs during startup. (When Emacs is invoked
6730 with the @option{--daemon} option, it does not create any initial
6731 frames, so @code{initial-window-system} is @code{nil}. @xref{Initial
6732 Options, daemon,, emacs, The GNU Emacs Manual}.)
6733 @end defvar
6734
6735 @defun window-system &optional frame
6736 This function returns a symbol whose name tells what window system is
6737 used for displaying @var{frame} (which defaults to the currently
6738 selected frame). The list of possible symbols it returns is the same
6739 one documented for the variable @code{window-system} above.
6740 @end defun
6741
6742 Do @emph{not} use @code{window-system} and
6743 @code{initial-window-system} as predicates or boolean flag variables,
6744 if you want to write code that works differently on text terminals and
6745 graphic displays. That is because @code{window-system} is not a good
6746 indicator of Emacs capabilities on a given display type. Instead, use
6747 @code{display-graphic-p} or any of the other @code{display-*-p}
6748 predicates described in @ref{Display Feature Testing}.
6749
6750 @node Bidirectional Display
6751 @section Bidirectional Display
6752 @cindex bidirectional display
6753 @cindex right-to-left text
6754
6755 Emacs can display text written in scripts, such as Arabic, Farsi,
6756 and Hebrew, whose natural ordering for horizontal text display runs
6757 from right to left. Furthermore, segments of Latin script and digits
6758 embedded in right-to-left text are displayed left-to-right, while
6759 segments of right-to-left script embedded in left-to-right text
6760 (e.g., Arabic or Hebrew text in comments or strings in a program
6761 source file) are appropriately displayed right-to-left. We call such
6762 mixtures of left-to-right and right-to-left text @dfn{bidirectional
6763 text}. This section describes the facilities and options for editing
6764 and displaying bidirectional text.
6765
6766 @cindex logical order
6767 @cindex reading order
6768 @cindex visual order
6769 @cindex unicode bidirectional algorithm
6770 @cindex UBA
6771 @cindex bidirectional reordering
6772 @cindex reordering, of bidirectional text
6773 Text is stored in Emacs buffers and strings in @dfn{logical} (or
6774 @dfn{reading}) order, i.e., the order in which a human would read
6775 each character. In right-to-left and bidirectional text, the order in
6776 which characters are displayed on the screen (called @dfn{visual
6777 order}) is not the same as logical order; the characters' screen
6778 positions do not increase monotonically with string or buffer
6779 position. In performing this @dfn{bidirectional reordering}, Emacs
6780 follows the Unicode Bidirectional Algorithm (a.k.a.@: @acronym{UBA}),
6781 which is described in Annex #9 of the Unicode standard
6782 (@url{http://www.unicode.org/reports/tr9/}). Emacs provides a ``Full
6783 Bidirectionality'' class implementation of the @acronym{UBA},
6784 consistent with the requirements of the Unicode Standard v7.0.
6785
6786 @defvar bidi-display-reordering
6787 If the value of this buffer-local variable is non-@code{nil} (the
6788 default), Emacs performs bidirectional reordering for display. The
6789 reordering affects buffer text, as well as display strings and overlay
6790 strings from text and overlay properties in the buffer (@pxref{Overlay
6791 Properties}, and @pxref{Display Property}). If the value is
6792 @code{nil}, Emacs does not perform bidirectional reordering in the
6793 buffer.
6794
6795 The default value of @code{bidi-display-reordering} controls the
6796 reordering of strings which are not directly supplied by a buffer,
6797 including the text displayed in mode lines (@pxref{Mode Line Format})
6798 and header lines (@pxref{Header Lines}).
6799 @end defvar
6800
6801 @cindex unibyte buffers, and bidi reordering
6802 Emacs never reorders the text of a unibyte buffer, even if
6803 @code{bidi-display-reordering} is non-@code{nil} in the buffer. This
6804 is because unibyte buffers contain raw bytes, not characters, and thus
6805 lack the directionality properties required for reordering.
6806 Therefore, to test whether text in a buffer will be reordered for
6807 display, it is not enough to test the value of
6808 @code{bidi-display-reordering} alone. The correct test is this:
6809
6810 @example
6811 (if (and enable-multibyte-characters
6812 bidi-display-reordering)
6813 ;; Buffer is being reordered for display
6814 )
6815 @end example
6816
6817 However, unibyte display and overlay strings @emph{are} reordered if
6818 their parent buffer is reordered. This is because plain-@sc{ascii}
6819 strings are stored by Emacs as unibyte strings. If a unibyte display
6820 or overlay string includes non-@sc{ascii} characters, these characters
6821 are assumed to have left-to-right direction.
6822
6823 @cindex display properties, and bidi reordering of text
6824 Text covered by @code{display} text properties, by overlays with
6825 @code{display} properties whose value is a string, and by any other
6826 properties that replace buffer text, is treated as a single unit when
6827 it is reordered for display. That is, the entire chunk of text
6828 covered by these properties is reordered together. Moreover, the
6829 bidirectional properties of the characters in such a chunk of text are
6830 ignored, and Emacs reorders them as if they were replaced with a
6831 single character @code{U+FFFC}, known as the @dfn{Object Replacement
6832 Character}. This means that placing a display property over a portion
6833 of text may change the way that the surrounding text is reordered for
6834 display. To prevent this unexpected effect, always place such
6835 properties on text whose directionality is identical with text that
6836 surrounds it.
6837
6838 @cindex base direction of a paragraph
6839 Each paragraph of bidirectional text has a @dfn{base direction},
6840 either right-to-left or left-to-right. Left-to-right paragraphs are
6841 displayed beginning at the left margin of the window, and are
6842 truncated or continued when the text reaches the right margin.
6843 Right-to-left paragraphs are displayed beginning at the right margin,
6844 and are continued or truncated at the left margin.
6845
6846 By default, Emacs determines the base direction of each paragraph by
6847 looking at the text at its beginning. The precise method of
6848 determining the base direction is specified by the @acronym{UBA}; in a
6849 nutshell, the first character in a paragraph that has an explicit
6850 directionality determines the base direction of the paragraph.
6851 However, sometimes a buffer may need to force a certain base direction
6852 for its paragraphs. For example, buffers containing program source
6853 code should force all paragraphs to be displayed left-to-right. You
6854 can use following variable to do this:
6855
6856 @defvar bidi-paragraph-direction
6857 If the value of this buffer-local variable is the symbol
6858 @code{right-to-left} or @code{left-to-right}, all paragraphs in the
6859 buffer are assumed to have that specified direction. Any other value
6860 is equivalent to @code{nil} (the default), which means to determine
6861 the base direction of each paragraph from its contents.
6862
6863 @cindex @code{prog-mode}, and @code{bidi-paragraph-direction}
6864 Modes for program source code should set this to @code{left-to-right}.
6865 Prog mode does this by default, so modes derived from Prog mode do not
6866 need to set this explicitly (@pxref{Basic Major Modes}).
6867 @end defvar
6868
6869 @defun current-bidi-paragraph-direction &optional buffer
6870 This function returns the paragraph direction at point in the named
6871 @var{buffer}. The returned value is a symbol, either
6872 @code{left-to-right} or @code{right-to-left}. If @var{buffer} is
6873 omitted or @code{nil}, it defaults to the current buffer. If the
6874 buffer-local value of the variable @code{bidi-paragraph-direction} is
6875 non-@code{nil}, the returned value will be identical to that value;
6876 otherwise, the returned value reflects the paragraph direction
6877 determined dynamically by Emacs. For buffers whose value of
6878 @code{bidi-display-reordering} is @code{nil} as well as unibyte
6879 buffers, this function always returns @code{left-to-right}.
6880 @end defun
6881
6882 @cindex visual-order cursor motion
6883 Sometimes there's a need to move point in strict visual order,
6884 either to the left or to the right of its current screen position.
6885 Emacs provides a primitive to do that.
6886
6887 @defun move-point-visually direction
6888 This function moves point of the currently selected window to the
6889 buffer position that appears immediately to the right or to the left
6890 of point on the screen. If @var{direction} is positive, point will
6891 move one screen position to the right, otherwise it will move one
6892 screen position to the left. Note that, depending on the surrounding
6893 bidirectional context, this could potentially move point many buffer
6894 positions away. If invoked at the end of a screen line, the function
6895 moves point to the rightmost or leftmost screen position of the next
6896 or previous screen line, as appropriate for the value of
6897 @var{direction}.
6898
6899 The function returns the new buffer position as its value.
6900 @end defun
6901
6902 @cindex layout on display, and bidirectional text
6903 @cindex jumbled display of bidirectional text
6904 @cindex concatenating bidirectional strings
6905 Bidirectional reordering can have surprising and unpleasant effects
6906 when two strings with bidirectional content are juxtaposed in a
6907 buffer, or otherwise programmatically concatenated into a string of
6908 text. A typical problematic case is when a buffer consists of
6909 sequences of text ``fields'' separated by whitespace or punctuation
6910 characters, like Buffer Menu mode or Rmail Summary Mode. Because the
6911 punctuation characters used as separators have @dfn{weak
6912 directionality}, they take on the directionality of surrounding text.
6913 As result, a numeric field that follows a field with bidirectional
6914 content can be displayed @emph{to the left} of the preceding field,
6915 messing up the expected layout. There are several ways to avoid this
6916 problem:
6917
6918 @itemize @minus
6919 @item
6920 Append the special character @code{U+200E}, LEFT-TO-RIGHT MARK, or
6921 @acronym{LRM}, to the end of each field that may have bidirectional
6922 content, or prepend it to the beginning of the following field. The
6923 function @code{bidi-string-mark-left-to-right}, described below, comes
6924 in handy for this purpose. (In a right-to-left paragraph, use
6925 @code{U+200F}, RIGHT-TO-LEFT MARK, or @acronym{RLM}, instead.) This
6926 is one of the solutions recommended by the UBA.
6927
6928 @item
6929 Include the tab character in the field separator. The tab character
6930 plays the role of @dfn{segment separator} in bidirectional reordering,
6931 causing the text on either side to be reordered separately.
6932
6933 @cindex @code{space} display spec, and bidirectional text
6934 @item
6935 Separate fields with a @code{display} property or overlay with a
6936 property value of the form @code{(space . PROPS)} (@pxref{Specified
6937 Space}). Emacs treats this display specification as a @dfn{paragraph
6938 separator}, and reorders the text on either side separately.
6939 @end itemize
6940
6941 @defun bidi-string-mark-left-to-right string
6942 This function returns its argument @var{string}, possibly modified,
6943 such that the result can be safely concatenated with another string,
6944 or juxtaposed with another string in a buffer, without disrupting the
6945 relative layout of this string and the next one on display. If the
6946 string returned by this function is displayed as part of a
6947 left-to-right paragraph, it will always appear on display to the left
6948 of the text that follows it. The function works by examining the
6949 characters of its argument, and if any of those characters could cause
6950 reordering on display, the function appends the @acronym{LRM}
6951 character to the string. The appended @acronym{LRM} character is made
6952 invisible by giving it an @code{invisible} text property of @code{t}
6953 (@pxref{Invisible Text}).
6954 @end defun
6955
6956 The reordering algorithm uses the bidirectional properties of the
6957 characters stored as their @code{bidi-class} property
6958 (@pxref{Character Properties}). Lisp programs can change these
6959 properties by calling the @code{put-char-code-property} function.
6960 However, doing this requires a thorough understanding of the
6961 @acronym{UBA}, and is therefore not recommended. Any changes to the
6962 bidirectional properties of a character have global effect: they
6963 affect all Emacs frames and windows.
6964
6965 Similarly, the @code{mirroring} property is used to display the
6966 appropriate mirrored character in the reordered text. Lisp programs
6967 can affect the mirrored display by changing this property. Again, any
6968 such changes affect all of Emacs display.
6969
6970 @cindex overriding bidirectional properties
6971 @cindex directional overrides
6972 @cindex LRO
6973 @cindex RLO
6974 The bidirectional properties of characters can be overridden by
6975 inserting into the text special directional control characters,
6976 LEFT-TO-RIGHT OVERRIDE (@acronym{LRO}) and RIGHT-TO-LEFT OVERRIDE
6977 (@acronym{RLO}). Any characters between a @acronym{RLO} and the
6978 following newline or POP DIRECTIONAL FORMATTING (@acronym{PDF})
6979 control character, whichever comes first, will be displayed as if they
6980 were strong right-to-left characters, i.e.@: they will be reversed on
6981 display. Similarly, any characters between @acronym{LRO} and
6982 @acronym{PDF} or newline will display as if they were strong
6983 left-to-right, and will @emph{not} be reversed even if they are strong
6984 right-to-left characters.
6985
6986 @cindex phishing using directional overrides
6987 @cindex malicious use of directional overrides
6988 These overrides are useful when you want to make some text
6989 unaffected by the reordering algorithm, and instead directly control
6990 the display order. But they can also be used for malicious purposes,
6991 known as @dfn{phishing}. Specifically, a URL on a Web page or a link
6992 in an email message can be manipulated to make its visual appearance
6993 unrecognizable, or similar to some popular benign location, while the
6994 real location, interpreted by a browser in the logical order, is very
6995 different.
6996
6997 Emacs provides a primitive that applications can use to detect
6998 instances of text whose bidirectional properties were overridden so as
6999 to make a left-to-right character display as if it were a
7000 right-to-left character, or vise versa.
7001
7002 @defun bidi-find-overridden-directionality from to &optional object
7003 This function looks at the text of the specified @var{object} between
7004 positions @var{from} (inclusive) and @var{to} (exclusive), and returns
7005 the first position where it finds a strong left-to-right character
7006 whose directional properties were forced to display the character as
7007 right-to-left, or for a strong right-to-left character that was forced
7008 to display as left-to-right. If it finds no such characters in the
7009 specified region of text, it returns @code{nil}.
7010
7011 The optional argument @var{object} specifies which text to search, and
7012 defaults to the current buffer. If @var{object} is non-@code{nil}, it
7013 can be some other buffer, or it can be a string or a window. If it is
7014 a string, the function searches that string. If it is a window, the
7015 function searches the buffer displayed in that window. If a buffer
7016 whose text you want to examine is displayed in some window, we
7017 recommend to specify it by that window, rather than pass the buffer to
7018 the function. This is because telling the function about the window
7019 allows it to correctly account for window-specific overlays, which
7020 might change the result of the function if some text in the buffer is
7021 covered by overlays.
7022 @end defun
7023
7024 @cindex copying bidirectional text, preserve visual order
7025 @cindex visual order, preserve when copying bidirectional text
7026 When text that includes mixed right-to-left and left-to-right
7027 characters and bidirectional controls is copied into a different
7028 location, it can change its visual appearance, and also can affect the
7029 visual appearance of the surrounding text at destination. This is
7030 because reordering of bidirectional text specified by the
7031 @acronym{UBA} has non-trivial context-dependent effects both on the
7032 copied text and on the text at copy destination that will surround it.
7033
7034 Sometimes, a Lisp program may need to preserve the exact visual
7035 appearance of the copied text at destination, and of the text that
7036 surrounds the copy. Lisp programs can use the following function to
7037 achieve that effect.
7038
7039 @defun buffer-substring-with-bidi-context start end &optional no-properties
7040 This function works similar to @code{buffer-substring} (@pxref{Buffer
7041 Contents}), but it prepends and appends to the copied text bidi
7042 directional control characters necessary to preserve the visual
7043 appearance of the text when it is inserted at another place. Optional
7044 argument @var{no-properties}, if non-@code{nil}, means remove the text
7045 properties from the copy of the text.
7046 @end defun