unexmacosx.c (copy_data_segment): Added two section names used on Mac
[bpt/emacs.git] / doc / lispref / text.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-2012 Free Software Foundation, Inc.
4 @c See the file elisp.texi for copying conditions.
5 @node Text
6 @chapter Text
7 @cindex text
8
9 This chapter describes the functions that deal with the text in a
10 buffer. Most examine, insert, or delete text in the current buffer,
11 often operating at point or on text adjacent to point. Many are
12 interactive. All the functions that change the text provide for undoing
13 the changes (@pxref{Undo}).
14
15 Many text-related functions operate on a region of text defined by two
16 buffer positions passed in arguments named @var{start} and @var{end}.
17 These arguments should be either markers (@pxref{Markers}) or numeric
18 character positions (@pxref{Positions}). The order of these arguments
19 does not matter; it is all right for @var{start} to be the end of the
20 region and @var{end} the beginning. For example, @code{(delete-region 1
21 10)} and @code{(delete-region 10 1)} are equivalent. An
22 @code{args-out-of-range} error is signaled if either @var{start} or
23 @var{end} is outside the accessible portion of the buffer. In an
24 interactive call, point and the mark are used for these arguments.
25
26 @cindex buffer contents
27 Throughout this chapter, ``text'' refers to the characters in the
28 buffer, together with their properties (when relevant). Keep in mind
29 that point is always between two characters, and the cursor appears on
30 the character after point.
31
32 @menu
33 * Near Point:: Examining text in the vicinity of point.
34 * Buffer Contents:: Examining text in a general fashion.
35 * Comparing Text:: Comparing substrings of buffers.
36 * Insertion:: Adding new text to a buffer.
37 * Commands for Insertion:: User-level commands to insert text.
38 * Deletion:: Removing text from a buffer.
39 * User-Level Deletion:: User-level commands to delete text.
40 * The Kill Ring:: Where removed text sometimes is saved for later use.
41 * Undo:: Undoing changes to the text of a buffer.
42 * Maintaining Undo:: How to enable and disable undo information.
43 How to control how much information is kept.
44 * Filling:: Functions for explicit filling.
45 * Margins:: How to specify margins for filling commands.
46 * Adaptive Fill:: Adaptive Fill mode chooses a fill prefix from context.
47 * Auto Filling:: How auto-fill mode is implemented to break lines.
48 * Sorting:: Functions for sorting parts of the buffer.
49 * Columns:: Computing horizontal positions, and using them.
50 * Indentation:: Functions to insert or adjust indentation.
51 * Case Changes:: Case conversion of parts of the buffer.
52 * Text Properties:: Assigning Lisp property lists to text characters.
53 * Substitution:: Replacing a given character wherever it appears.
54 * Transposition:: Swapping two portions of a buffer.
55 * Registers:: How registers are implemented. Accessing the text or
56 position stored in a register.
57 * Base 64:: Conversion to or from base 64 encoding.
58 * Checksum/Hash:: Computing cryptographic hashes.
59 * Parsing HTML/XML:: Parsing HTML and XML.
60 * Atomic Changes:: Installing several buffer changes "atomically".
61 * Change Hooks:: Supplying functions to be run when text is changed.
62 @end menu
63
64 @node Near Point
65 @section Examining Text Near Point
66 @cindex text near point
67
68 Many functions are provided to look at the characters around point.
69 Several simple functions are described here. See also @code{looking-at}
70 in @ref{Regexp Search}.
71
72 In the following four functions, ``beginning'' or ``end'' of buffer
73 refers to the beginning or end of the accessible portion.
74
75 @defun char-after &optional position
76 This function returns the character in the current buffer at (i.e.,
77 immediately after) position @var{position}. If @var{position} is out of
78 range for this purpose, either before the beginning of the buffer, or at
79 or beyond the end, then the value is @code{nil}. The default for
80 @var{position} is point.
81
82 In the following example, assume that the first character in the
83 buffer is @samp{@@}:
84
85 @example
86 @group
87 (string (char-after 1))
88 @result{} "@@"
89 @end group
90 @end example
91 @end defun
92
93 @defun char-before &optional position
94 This function returns the character in the current buffer immediately
95 before position @var{position}. If @var{position} is out of range for
96 this purpose, either at or before the beginning of the buffer, or beyond
97 the end, then the value is @code{nil}. The default for
98 @var{position} is point.
99 @end defun
100
101 @defun following-char
102 This function returns the character following point in the current
103 buffer. This is similar to @code{(char-after (point))}. However, if
104 point is at the end of the buffer, then @code{following-char} returns 0.
105
106 Remember that point is always between characters, and the cursor
107 normally appears over the character following point. Therefore, the
108 character returned by @code{following-char} is the character the
109 cursor is over.
110
111 In this example, point is between the @samp{a} and the @samp{c}.
112
113 @example
114 @group
115 ---------- Buffer: foo ----------
116 Gentlemen may cry ``Pea@point{}ce! Peace!,''
117 but there is no peace.
118 ---------- Buffer: foo ----------
119 @end group
120
121 @group
122 (string (preceding-char))
123 @result{} "a"
124 (string (following-char))
125 @result{} "c"
126 @end group
127 @end example
128 @end defun
129
130 @defun preceding-char
131 This function returns the character preceding point in the current
132 buffer. See above, under @code{following-char}, for an example. If
133 point is at the beginning of the buffer, @code{preceding-char} returns
134 0.
135 @end defun
136
137 @defun bobp
138 This function returns @code{t} if point is at the beginning of the
139 buffer. If narrowing is in effect, this means the beginning of the
140 accessible portion of the text. See also @code{point-min} in
141 @ref{Point}.
142 @end defun
143
144 @defun eobp
145 This function returns @code{t} if point is at the end of the buffer.
146 If narrowing is in effect, this means the end of accessible portion of
147 the text. See also @code{point-max} in @xref{Point}.
148 @end defun
149
150 @defun bolp
151 This function returns @code{t} if point is at the beginning of a line.
152 @xref{Text Lines}. The beginning of the buffer (or of its accessible
153 portion) always counts as the beginning of a line.
154 @end defun
155
156 @defun eolp
157 This function returns @code{t} if point is at the end of a line. The
158 end of the buffer (or of its accessible portion) is always considered
159 the end of a line.
160 @end defun
161
162 @node Buffer Contents
163 @section Examining Buffer Contents
164
165 This section describes functions that allow a Lisp program to
166 convert any portion of the text in the buffer into a string.
167
168 @defun buffer-substring start end
169 This function returns a string containing a copy of the text of the
170 region defined by positions @var{start} and @var{end} in the current
171 buffer. If the arguments are not positions in the accessible portion
172 of the buffer, @code{buffer-substring} signals an
173 @code{args-out-of-range} error.
174
175 Here's an example which assumes Font-Lock mode is not enabled:
176
177 @example
178 @group
179 ---------- Buffer: foo ----------
180 This is the contents of buffer foo
181
182 ---------- Buffer: foo ----------
183 @end group
184
185 @group
186 (buffer-substring 1 10)
187 @result{} "This is t"
188 @end group
189 @group
190 (buffer-substring (point-max) 10)
191 @result{} "he contents of buffer foo\n"
192 @end group
193 @end example
194
195 If the text being copied has any text properties, these are copied into
196 the string along with the characters they belong to. @xref{Text
197 Properties}. However, overlays (@pxref{Overlays}) in the buffer and
198 their properties are ignored, not copied.
199
200 For example, if Font-Lock mode is enabled, you might get results like
201 these:
202
203 @example
204 @group
205 (buffer-substring 1 10)
206 @result{} #("This is t" 0 1 (fontified t) 1 9 (fontified t))
207 @end group
208 @end example
209 @end defun
210
211 @defun buffer-substring-no-properties start end
212 This is like @code{buffer-substring}, except that it does not copy text
213 properties, just the characters themselves. @xref{Text Properties}.
214 @end defun
215
216 @defun buffer-string
217 This function returns the contents of the entire accessible portion of
218 the current buffer, as a string.
219 @end defun
220
221 @defun filter-buffer-substring start end &optional delete
222 This function passes the buffer text between @var{start} and @var{end}
223 through the filter functions specified by the wrapper hook
224 @code{filter-buffer-substring-functions}, and returns the result. The
225 obsolete variable @code{buffer-substring-filters} is also consulted.
226 If both of these variables are @code{nil}, the value is the unaltered
227 text from the buffer, i.e.@: what @code{buffer-substring} would
228 return.
229
230 If @var{delete} is non-@code{nil}, this function deletes the text
231 between @var{start} and @var{end} after copying it, like
232 @code{delete-and-extract-region}.
233
234 Lisp code should use this function instead of @code{buffer-substring},
235 @code{buffer-substring-no-properties},
236 or @code{delete-and-extract-region} when copying into user-accessible
237 data structures such as the kill-ring, X clipboard, and registers.
238 Major and minor modes can add functions to
239 @code{filter-buffer-substring-functions} to alter such text as it is
240 copied out of the buffer.
241 @end defun
242
243 @defvar filter-buffer-substring-functions
244 This variable is a wrapper hook (@pxref{Running Hooks}), whose members
245 should be functions that accept four arguments: @var{fun},
246 @var{start}, @var{end}, and @var{delete}. @var{fun} is a function
247 that takes three arguments (@var{start}, @var{end}, and @var{delete}),
248 and returns a string. In both cases, the @var{start}, @var{end}, and
249 @var{delete} arguments are the same as those of
250 @code{filter-buffer-substring}.
251
252 The first hook function is passed a @var{fun} that is equivalent to
253 the default operation of @code{filter-buffer-substring}, i.e. it
254 returns the buffer-substring between @var{start} and @var{end}
255 (processed by any @code{buffer-substring-filters}) and optionally
256 deletes the original text from the buffer. In most cases, the hook
257 function will call @var{fun} once, and then do its own processing of
258 the result. The next hook function receives a @var{fun} equivalent to
259 this, and so on. The actual return value is the result of all the
260 hook functions acting in sequence.
261 @end defvar
262
263 @defvar buffer-substring-filters
264 This variable is obsoleted by
265 @code{filter-buffer-substring-functions}, but is still supported for
266 backward compatibility. Its value should should be a list of
267 functions which accept a single string argument and return another
268 string. @code{filter-buffer-substring} passes the buffer substring to
269 the first function in this list, and the return value of each function
270 is passed to the next function. The return value of the last function
271 is passed to @code{filter-buffer-substring-functions}.
272 @end defvar
273
274 @defun current-word &optional strict really-word
275 This function returns the symbol (or word) at or near point, as a
276 string. The return value includes no text properties.
277
278 If the optional argument @var{really-word} is non-@code{nil}, it finds a
279 word; otherwise, it finds a symbol (which includes both word
280 characters and symbol constituent characters).
281
282 If the optional argument @var{strict} is non-@code{nil}, then point
283 must be in or next to the symbol or word---if no symbol or word is
284 there, the function returns @code{nil}. Otherwise, a nearby symbol or
285 word on the same line is acceptable.
286 @end defun
287
288 @defun thing-at-point thing
289 Return the @var{thing} around or next to point, as a string.
290
291 The argument @var{thing} is a symbol which specifies a kind of syntactic
292 entity. Possibilities include @code{symbol}, @code{list}, @code{sexp},
293 @code{defun}, @code{filename}, @code{url}, @code{word}, @code{sentence},
294 @code{whitespace}, @code{line}, @code{page}, and others.
295
296 @example
297 ---------- Buffer: foo ----------
298 Gentlemen may cry ``Pea@point{}ce! Peace!,''
299 but there is no peace.
300 ---------- Buffer: foo ----------
301
302 (thing-at-point 'word)
303 @result{} "Peace"
304 (thing-at-point 'line)
305 @result{} "Gentlemen may cry ``Peace! Peace!,''\n"
306 (thing-at-point 'whitespace)
307 @result{} nil
308 @end example
309 @end defun
310
311 @node Comparing Text
312 @section Comparing Text
313 @cindex comparing buffer text
314
315 This function lets you compare portions of the text in a buffer, without
316 copying them into strings first.
317
318 @defun compare-buffer-substrings buffer1 start1 end1 buffer2 start2 end2
319 This function lets you compare two substrings of the same buffer or two
320 different buffers. The first three arguments specify one substring,
321 giving a buffer (or a buffer name) and two positions within the
322 buffer. The last three arguments specify the other substring in the
323 same way. You can use @code{nil} for @var{buffer1}, @var{buffer2}, or
324 both to stand for the current buffer.
325
326 The value is negative if the first substring is less, positive if the
327 first is greater, and zero if they are equal. The absolute value of
328 the result is one plus the index of the first differing characters
329 within the substrings.
330
331 This function ignores case when comparing characters
332 if @code{case-fold-search} is non-@code{nil}. It always ignores
333 text properties.
334
335 Suppose the current buffer contains the text @samp{foobarbar
336 haha!rara!}; then in this example the two substrings are @samp{rbar }
337 and @samp{rara!}. The value is 2 because the first substring is greater
338 at the second character.
339
340 @example
341 (compare-buffer-substrings nil 6 11 nil 16 21)
342 @result{} 2
343 @end example
344 @end defun
345
346 @node Insertion
347 @section Inserting Text
348 @cindex insertion of text
349 @cindex text insertion
350
351 @cindex insertion before point
352 @cindex before point, insertion
353 @dfn{Insertion} means adding new text to a buffer. The inserted text
354 goes at point---between the character before point and the character
355 after point. Some insertion functions leave point before the inserted
356 text, while other functions leave it after. We call the former
357 insertion @dfn{after point} and the latter insertion @dfn{before point}.
358
359 Insertion moves markers located at positions after the insertion
360 point, so that they stay with the surrounding text (@pxref{Markers}).
361 When a marker points at the place of insertion, insertion may or may
362 not relocate the marker, depending on the marker's insertion type
363 (@pxref{Marker Insertion Types}). Certain special functions such as
364 @code{insert-before-markers} relocate all such markers to point after
365 the inserted text, regardless of the markers' insertion type.
366
367 Insertion functions signal an error if the current buffer is
368 read-only or if they insert within read-only text.
369
370 These functions copy text characters from strings and buffers along
371 with their properties. The inserted characters have exactly the same
372 properties as the characters they were copied from. By contrast,
373 characters specified as separate arguments, not part of a string or
374 buffer, inherit their text properties from the neighboring text.
375
376 The insertion functions convert text from unibyte to multibyte in
377 order to insert in a multibyte buffer, and vice versa---if the text
378 comes from a string or from a buffer. However, they do not convert
379 unibyte character codes 128 through 255 to multibyte characters, not
380 even if the current buffer is a multibyte buffer. @xref{Converting
381 Representations}.
382
383 @defun insert &rest args
384 This function inserts the strings and/or characters @var{args} into the
385 current buffer, at point, moving point forward. In other words, it
386 inserts the text before point. An error is signaled unless all
387 @var{args} are either strings or characters. The value is @code{nil}.
388 @end defun
389
390 @defun insert-before-markers &rest args
391 This function inserts the strings and/or characters @var{args} into the
392 current buffer, at point, moving point forward. An error is signaled
393 unless all @var{args} are either strings or characters. The value is
394 @code{nil}.
395
396 This function is unlike the other insertion functions in that it
397 relocates markers initially pointing at the insertion point, to point
398 after the inserted text. If an overlay begins at the insertion point,
399 the inserted text falls outside the overlay; if a nonempty overlay
400 ends at the insertion point, the inserted text falls inside that
401 overlay.
402 @end defun
403
404 @defun insert-char character count &optional inherit
405 This function inserts @var{count} instances of @var{character} into the
406 current buffer before point. The argument @var{count} should be an
407 integer, and @var{character} must be a character. The value is @code{nil}.
408
409 This function does not convert unibyte character codes 128 through 255
410 to multibyte characters, not even if the current buffer is a multibyte
411 buffer. @xref{Converting Representations}.
412
413 If @var{inherit} is non-@code{nil}, then the inserted characters inherit
414 sticky text properties from the two characters before and after the
415 insertion point. @xref{Sticky Properties}.
416 @end defun
417
418 @defun insert-buffer-substring from-buffer-or-name &optional start end
419 This function inserts a portion of buffer @var{from-buffer-or-name}
420 (which must already exist) into the current buffer before point. The
421 text inserted is the region between @var{start} and @var{end}. (These
422 arguments default to the beginning and end of the accessible portion of
423 that buffer.) This function returns @code{nil}.
424
425 In this example, the form is executed with buffer @samp{bar} as the
426 current buffer. We assume that buffer @samp{bar} is initially empty.
427
428 @example
429 @group
430 ---------- Buffer: foo ----------
431 We hold these truths to be self-evident, that all
432 ---------- Buffer: foo ----------
433 @end group
434
435 @group
436 (insert-buffer-substring "foo" 1 20)
437 @result{} nil
438
439 ---------- Buffer: bar ----------
440 We hold these truth@point{}
441 ---------- Buffer: bar ----------
442 @end group
443 @end example
444 @end defun
445
446 @defun insert-buffer-substring-no-properties from-buffer-or-name &optional start end
447 This is like @code{insert-buffer-substring} except that it does not
448 copy any text properties.
449 @end defun
450
451 @xref{Sticky Properties}, for other insertion functions that inherit
452 text properties from the nearby text in addition to inserting it.
453 Whitespace inserted by indentation functions also inherits text
454 properties.
455
456 @node Commands for Insertion
457 @section User-Level Insertion Commands
458
459 This section describes higher-level commands for inserting text,
460 commands intended primarily for the user but useful also in Lisp
461 programs.
462
463 @deffn Command insert-buffer from-buffer-or-name
464 This command inserts the entire accessible contents of
465 @var{from-buffer-or-name} (which must exist) into the current buffer
466 after point. It leaves the mark after the inserted text. The value
467 is @code{nil}.
468 @end deffn
469
470 @deffn Command self-insert-command count
471 @cindex character insertion
472 @cindex self-insertion
473 This command inserts the last character typed; it does so @var{count}
474 times, before point, and returns @code{nil}. Most printing characters
475 are bound to this command. In routine use, @code{self-insert-command}
476 is the most frequently called function in Emacs, but programs rarely use
477 it except to install it on a keymap.
478
479 In an interactive call, @var{count} is the numeric prefix argument.
480
481 Self-insertion translates the input character through
482 @code{translation-table-for-input}. @xref{Translation of Characters}.
483
484 This command calls @code{auto-fill-function} whenever that is
485 non-@code{nil} and the character inserted is in the table
486 @code{auto-fill-chars} (@pxref{Auto Filling}).
487
488 @c Cross refs reworded to prevent overfull hbox. --rjc 15mar92
489 This command performs abbrev expansion if Abbrev mode is enabled and
490 the inserted character does not have word-constituent
491 syntax. (@xref{Abbrevs}, and @ref{Syntax Class Table}.) It is also
492 responsible for calling @code{blink-paren-function} when the inserted
493 character has close parenthesis syntax (@pxref{Blinking}).
494
495 @vindex post-self-insert-hook
496 The final thing this command does is to run the hook
497 @code{post-self-insert-hook}. You could use this to automatically
498 reindent text as it is typed, for example.
499
500 Do not try substituting your own definition of
501 @code{self-insert-command} for the standard one. The editor command
502 loop handles this function specially.
503 @end deffn
504
505 @deffn Command newline &optional number-of-newlines
506 This command inserts newlines into the current buffer before point.
507 If @var{number-of-newlines} is supplied, that many newline characters
508 are inserted.
509
510 @cindex newline and Auto Fill mode
511 This function calls @code{auto-fill-function} if the current column
512 number is greater than the value of @code{fill-column} and
513 @var{number-of-newlines} is @code{nil}. Typically what
514 @code{auto-fill-function} does is insert a newline; thus, the overall
515 result in this case is to insert two newlines at different places: one
516 at point, and another earlier in the line. @code{newline} does not
517 auto-fill if @var{number-of-newlines} is non-@code{nil}.
518
519 This command indents to the left margin if that is not zero.
520 @xref{Margins}.
521
522 The value returned is @code{nil}. In an interactive call, @var{count}
523 is the numeric prefix argument.
524 @end deffn
525
526 @defvar overwrite-mode
527 This variable controls whether overwrite mode is in effect. The value
528 should be @code{overwrite-mode-textual}, @code{overwrite-mode-binary},
529 or @code{nil}. @code{overwrite-mode-textual} specifies textual
530 overwrite mode (treats newlines and tabs specially), and
531 @code{overwrite-mode-binary} specifies binary overwrite mode (treats
532 newlines and tabs like any other characters).
533 @end defvar
534
535 @node Deletion
536 @section Deleting Text
537 @cindex text deletion
538
539 @cindex deleting text vs killing
540 Deletion means removing part of the text in a buffer, without saving
541 it in the kill ring (@pxref{The Kill Ring}). Deleted text can't be
542 yanked, but can be reinserted using the undo mechanism (@pxref{Undo}).
543 Some deletion functions do save text in the kill ring in some special
544 cases.
545
546 All of the deletion functions operate on the current buffer.
547
548 @deffn Command erase-buffer
549 This function deletes the entire text of the current buffer
550 (@emph{not} just the accessible portion), leaving it
551 empty. If the buffer is read-only, it signals a @code{buffer-read-only}
552 error; if some of the text in it is read-only, it signals a
553 @code{text-read-only} error. Otherwise, it deletes the text without
554 asking for any confirmation. It returns @code{nil}.
555
556 Normally, deleting a large amount of text from a buffer inhibits further
557 auto-saving of that buffer ``because it has shrunk''. However,
558 @code{erase-buffer} does not do this, the idea being that the future
559 text is not really related to the former text, and its size should not
560 be compared with that of the former text.
561 @end deffn
562
563 @deffn Command delete-region start end
564 This command deletes the text between positions @var{start} and
565 @var{end} in the current buffer, and returns @code{nil}. If point was
566 inside the deleted region, its value afterward is @var{start}.
567 Otherwise, point relocates with the surrounding text, as markers do.
568 @end deffn
569
570 @defun delete-and-extract-region start end
571 This function deletes the text between positions @var{start} and
572 @var{end} in the current buffer, and returns a string containing the
573 text just deleted.
574
575 If point was inside the deleted region, its value afterward is
576 @var{start}. Otherwise, point relocates with the surrounding text, as
577 markers do.
578 @end defun
579
580 @deffn Command delete-char count &optional killp
581 This command deletes @var{count} characters directly after point, or
582 before point if @var{count} is negative. If @var{killp} is
583 non-@code{nil}, then it saves the deleted characters in the kill ring.
584
585 In an interactive call, @var{count} is the numeric prefix argument, and
586 @var{killp} is the unprocessed prefix argument. Therefore, if a prefix
587 argument is supplied, the text is saved in the kill ring. If no prefix
588 argument is supplied, then one character is deleted, but not saved in
589 the kill ring.
590
591 The value returned is always @code{nil}.
592 @end deffn
593
594 @deffn Command delete-backward-char count &optional killp
595 @cindex deleting previous char
596 This command deletes @var{count} characters directly before point, or
597 after point if @var{count} is negative. If @var{killp} is
598 non-@code{nil}, then it saves the deleted characters in the kill ring.
599
600 In an interactive call, @var{count} is the numeric prefix argument, and
601 @var{killp} is the unprocessed prefix argument. Therefore, if a prefix
602 argument is supplied, the text is saved in the kill ring. If no prefix
603 argument is supplied, then one character is deleted, but not saved in
604 the kill ring.
605
606 The value returned is always @code{nil}.
607 @end deffn
608
609 @deffn Command backward-delete-char-untabify count &optional killp
610 @cindex tab deletion
611 This command deletes @var{count} characters backward, changing tabs
612 into spaces. When the next character to be deleted is a tab, it is
613 first replaced with the proper number of spaces to preserve alignment
614 and then one of those spaces is deleted instead of the tab. If
615 @var{killp} is non-@code{nil}, then the command saves the deleted
616 characters in the kill ring.
617
618 Conversion of tabs to spaces happens only if @var{count} is positive.
619 If it is negative, exactly @minus{}@var{count} characters after point
620 are deleted.
621
622 In an interactive call, @var{count} is the numeric prefix argument, and
623 @var{killp} is the unprocessed prefix argument. Therefore, if a prefix
624 argument is supplied, the text is saved in the kill ring. If no prefix
625 argument is supplied, then one character is deleted, but not saved in
626 the kill ring.
627
628 The value returned is always @code{nil}.
629 @end deffn
630
631 @defopt backward-delete-char-untabify-method
632 This option specifies how @code{backward-delete-char-untabify} should
633 deal with whitespace. Possible values include @code{untabify}, the
634 default, meaning convert a tab to many spaces and delete one;
635 @code{hungry}, meaning delete all tabs and spaces before point with
636 one command; @code{all} meaning delete all tabs, spaces and newlines
637 before point, and @code{nil}, meaning do nothing special for
638 whitespace characters.
639 @end defopt
640
641 @node User-Level Deletion
642 @section User-Level Deletion Commands
643
644 This section describes higher-level commands for deleting text,
645 commands intended primarily for the user but useful also in Lisp
646 programs.
647
648 @deffn Command delete-horizontal-space &optional backward-only
649 @cindex deleting whitespace
650 This function deletes all spaces and tabs around point. It returns
651 @code{nil}.
652
653 If @var{backward-only} is non-@code{nil}, the function deletes
654 spaces and tabs before point, but not after point.
655
656 In the following examples, we call @code{delete-horizontal-space} four
657 times, once on each line, with point between the second and third
658 characters on the line each time.
659
660 @example
661 @group
662 ---------- Buffer: foo ----------
663 I @point{}thought
664 I @point{} thought
665 We@point{} thought
666 Yo@point{}u thought
667 ---------- Buffer: foo ----------
668 @end group
669
670 @group
671 (delete-horizontal-space) ; @r{Four times.}
672 @result{} nil
673
674 ---------- Buffer: foo ----------
675 Ithought
676 Ithought
677 Wethought
678 You thought
679 ---------- Buffer: foo ----------
680 @end group
681 @end example
682 @end deffn
683
684 @deffn Command delete-indentation &optional join-following-p
685 This function joins the line point is on to the previous line, deleting
686 any whitespace at the join and in some cases replacing it with one
687 space. If @var{join-following-p} is non-@code{nil},
688 @code{delete-indentation} joins this line to the following line
689 instead. The function returns @code{nil}.
690
691 If there is a fill prefix, and the second of the lines being joined
692 starts with the prefix, then @code{delete-indentation} deletes the
693 fill prefix before joining the lines. @xref{Margins}.
694
695 In the example below, point is located on the line starting
696 @samp{events}, and it makes no difference if there are trailing spaces
697 in the preceding line.
698
699 @smallexample
700 @group
701 ---------- Buffer: foo ----------
702 When in the course of human
703 @point{} events, it becomes necessary
704 ---------- Buffer: foo ----------
705 @end group
706
707 (delete-indentation)
708 @result{} nil
709
710 @group
711 ---------- Buffer: foo ----------
712 When in the course of human@point{} events, it becomes necessary
713 ---------- Buffer: foo ----------
714 @end group
715 @end smallexample
716
717 After the lines are joined, the function @code{fixup-whitespace} is
718 responsible for deciding whether to leave a space at the junction.
719 @end deffn
720
721 @deffn Command fixup-whitespace
722 This function replaces all the horizontal whitespace surrounding point
723 with either one space or no space, according to the context. It
724 returns @code{nil}.
725
726 At the beginning or end of a line, the appropriate amount of space is
727 none. Before a character with close parenthesis syntax, or after a
728 character with open parenthesis or expression-prefix syntax, no space is
729 also appropriate. Otherwise, one space is appropriate. @xref{Syntax
730 Class Table}.
731
732 In the example below, @code{fixup-whitespace} is called the first time
733 with point before the word @samp{spaces} in the first line. For the
734 second invocation, point is directly after the @samp{(}.
735
736 @smallexample
737 @group
738 ---------- Buffer: foo ----------
739 This has too many @point{}spaces
740 This has too many spaces at the start of (@point{} this list)
741 ---------- Buffer: foo ----------
742 @end group
743
744 @group
745 (fixup-whitespace)
746 @result{} nil
747 (fixup-whitespace)
748 @result{} nil
749 @end group
750
751 @group
752 ---------- Buffer: foo ----------
753 This has too many spaces
754 This has too many spaces at the start of (this list)
755 ---------- Buffer: foo ----------
756 @end group
757 @end smallexample
758 @end deffn
759
760 @deffn Command just-one-space &optional n
761 @comment !!SourceFile simple.el
762 This command replaces any spaces and tabs around point with a single
763 space, or @var{n} spaces if @var{n} is specified. It returns
764 @code{nil}.
765 @end deffn
766
767 @deffn Command delete-blank-lines
768 This function deletes blank lines surrounding point. If point is on a
769 blank line with one or more blank lines before or after it, then all but
770 one of them are deleted. If point is on an isolated blank line, then it
771 is deleted. If point is on a nonblank line, the command deletes all
772 blank lines immediately following it.
773
774 A blank line is defined as a line containing only tabs and spaces.
775
776 @code{delete-blank-lines} returns @code{nil}.
777 @end deffn
778
779 @node The Kill Ring
780 @section The Kill Ring
781 @cindex kill ring
782
783 @dfn{Kill functions} delete text like the deletion functions, but save
784 it so that the user can reinsert it by @dfn{yanking}. Most of these
785 functions have @samp{kill-} in their name. By contrast, the functions
786 whose names start with @samp{delete-} normally do not save text for
787 yanking (though they can still be undone); these are ``deletion''
788 functions.
789
790 Most of the kill commands are primarily for interactive use, and are
791 not described here. What we do describe are the functions provided for
792 use in writing such commands. You can use these functions to write
793 commands for killing text. When you need to delete text for internal
794 purposes within a Lisp function, you should normally use deletion
795 functions, so as not to disturb the kill ring contents.
796 @xref{Deletion}.
797
798 Killed text is saved for later yanking in the @dfn{kill ring}. This
799 is a list that holds a number of recent kills, not just the last text
800 kill. We call this a ``ring'' because yanking treats it as having
801 elements in a cyclic order. The list is kept in the variable
802 @code{kill-ring}, and can be operated on with the usual functions for
803 lists; there are also specialized functions, described in this section,
804 that treat it as a ring.
805
806 Some people think this use of the word ``kill'' is unfortunate, since
807 it refers to operations that specifically @emph{do not} destroy the
808 entities ``killed''. This is in sharp contrast to ordinary life, in
809 which death is permanent and ``killed'' entities do not come back to
810 life. Therefore, other metaphors have been proposed. For example, the
811 term ``cut ring'' makes sense to people who, in pre-computer days, used
812 scissors and paste to cut up and rearrange manuscripts. However, it
813 would be difficult to change the terminology now.
814
815 @menu
816 * Kill Ring Concepts:: What text looks like in the kill ring.
817 * Kill Functions:: Functions that kill text.
818 * Yanking:: How yanking is done.
819 * Yank Commands:: Commands that access the kill ring.
820 * Low-Level Kill Ring:: Functions and variables for kill ring access.
821 * Internals of Kill Ring:: Variables that hold kill ring data.
822 @end menu
823
824 @node Kill Ring Concepts
825 @subsection Kill Ring Concepts
826
827 The kill ring records killed text as strings in a list, most recent
828 first. A short kill ring, for example, might look like this:
829
830 @example
831 ("some text" "a different piece of text" "even older text")
832 @end example
833
834 @noindent
835 When the list reaches @code{kill-ring-max} entries in length, adding a
836 new entry automatically deletes the last entry.
837
838 When kill commands are interwoven with other commands, each kill
839 command makes a new entry in the kill ring. Multiple kill commands in
840 succession build up a single kill ring entry, which would be yanked as a
841 unit; the second and subsequent consecutive kill commands add text to
842 the entry made by the first one.
843
844 For yanking, one entry in the kill ring is designated the ``front'' of
845 the ring. Some yank commands ``rotate'' the ring by designating a
846 different element as the ``front''. But this virtual rotation doesn't
847 change the list itself---the most recent entry always comes first in the
848 list.
849
850 @node Kill Functions
851 @subsection Functions for Killing
852
853 @code{kill-region} is the usual subroutine for killing text. Any
854 command that calls this function is a ``kill command'' (and should
855 probably have @samp{kill} in its name). @code{kill-region} puts the
856 newly killed text in a new element at the beginning of the kill ring or
857 adds it to the most recent element. It determines automatically (using
858 @code{last-command}) whether the previous command was a kill command,
859 and if so appends the killed text to the most recent entry.
860
861 @deffn Command kill-region start end
862 This function kills the text in the region defined by @var{start} and
863 @var{end}. The text is deleted but saved in the kill ring, along with
864 its text properties. The value is always @code{nil}.
865
866 In an interactive call, @var{start} and @var{end} are point and
867 the mark.
868
869 If the buffer or text is read-only, @code{kill-region} modifies the kill
870 ring just the same, then signals an error without modifying the buffer.
871 This is convenient because it lets the user use a series of kill
872 commands to copy text from a read-only buffer into the kill ring.
873 @end deffn
874
875 @defopt kill-read-only-ok
876 If this option is non-@code{nil}, @code{kill-region} does not signal an
877 error if the buffer or text is read-only. Instead, it simply returns,
878 updating the kill ring but not changing the buffer.
879 @end defopt
880
881 @deffn Command copy-region-as-kill start end
882 This command saves the region defined by @var{start} and @var{end} on
883 the kill ring (including text properties), but does not delete the text
884 from the buffer. It returns @code{nil}.
885
886 The command does not set @code{this-command} to @code{kill-region}, so a
887 subsequent kill command does not append to the same kill ring entry.
888
889 @c FIXME Why is it better? Why isn't copy-region-as-kill obsolete then?
890 @c Why is it used in many places in Emacs?
891 In Lisp programs, it is better to use @code{kill-new} or
892 @code{kill-append} instead of this command. @xref{Low-Level Kill Ring}.
893 @end deffn
894
895 @node Yanking
896 @subsection Yanking
897
898 Yanking means inserting text from the kill ring, but it does
899 not insert the text blindly. Yank commands and some other commands
900 use @code{insert-for-yank} to perform special processing on the
901 text that they copy into the buffer.
902
903 @defun insert-for-yank string
904 This function normally works like @code{insert} except that it doesn't
905 insert the text properties (@pxref{Text Properties}) in the list
906 variable @code{yank-excluded-properties}. However, if any part of
907 @var{string} has a non-@code{nil} @code{yank-handler} text property,
908 that property can do various special processing on that part of the
909 text being inserted.
910 @end defun
911
912 @defun insert-buffer-substring-as-yank buf &optional start end
913 This function resembles @code{insert-buffer-substring} except that it
914 doesn't insert the text properties in the
915 @code{yank-excluded-properties} list.
916 @end defun
917
918 You can put a @code{yank-handler} text property on all or part of
919 the text to control how it will be inserted if it is yanked. The
920 @code{insert-for-yank} function looks for that property. The property
921 value must be a list of one to four elements, with the following
922 format (where elements after the first may be omitted):
923
924 @example
925 (@var{function} @var{param} @var{noexclude} @var{undo})
926 @end example
927
928 Here is what the elements do:
929
930 @table @var
931 @item function
932 When @var{function} is present and non-@code{nil}, it is called instead of
933 @code{insert} to insert the string. @var{function} takes one
934 argument---the string to insert.
935
936 @item param
937 If @var{param} is present and non-@code{nil}, it replaces @var{string}
938 (or the part of @var{string} being processed) as the object passed to
939 @var{function} (or @code{insert}); for example, if @var{function} is
940 @code{yank-rectangle}, @var{param} should be a list of strings to
941 insert as a rectangle.
942
943 @item noexclude
944 If @var{noexclude} is present and non-@code{nil}, the normal removal of the
945 yank-excluded-properties is not performed; instead @var{function} is
946 responsible for removing those properties. This may be necessary
947 if @var{function} adjusts point before or after inserting the object.
948
949 @item undo
950 If @var{undo} is present and non-@code{nil}, it is a function that will be
951 called by @code{yank-pop} to undo the insertion of the current object.
952 It is called with two arguments, the start and end of the current
953 region. @var{function} can set @code{yank-undo-function} to override
954 the @var{undo} value.
955 @end table
956
957 @cindex yanking and text properties
958 @defopt yank-excluded-properties
959 Yanking discards certain text properties from the yanked text, as
960 described above. The value of this variable is the list of properties
961 to discard. Its default value contains properties that might lead to
962 annoying results, such as causing the text to respond to the mouse or
963 specifying key bindings.
964 @end defopt
965
966 @node Yank Commands
967 @subsection Functions for Yanking
968
969 This section describes higher-level commands for yanking, which are
970 intended primarily for the user but useful also in Lisp programs.
971 Both @code{yank} and @code{yank-pop} honor the
972 @code{yank-excluded-properties} variable and @code{yank-handler} text
973 property (@pxref{Yanking}).
974
975 @deffn Command yank &optional arg
976 @cindex inserting killed text
977 This command inserts before point the text at the front of the kill
978 ring. It sets the mark at the beginning of that text, using
979 @code{push-mark} (@pxref{The Mark}), and puts point at the end.
980
981 If @var{arg} is a non-@code{nil} list (which occurs interactively when
982 the user types @kbd{C-u} with no digits), then @code{yank} inserts the
983 text as described above, but puts point before the yanked text and
984 sets the mark after it.
985
986 If @var{arg} is a number, then @code{yank} inserts the @var{arg}th
987 most recently killed text---the @var{arg}th element of the kill ring
988 list, counted cyclically from the front, which is considered the
989 first element for this purpose.
990
991 @code{yank} does not alter the contents of the kill ring, unless it
992 used text provided by another program, in which case it pushes that text
993 onto the kill ring. However if @var{arg} is an integer different from
994 one, it rotates the kill ring to place the yanked string at the front.
995
996 @code{yank} returns @code{nil}.
997 @end deffn
998
999 @deffn Command yank-pop &optional arg
1000 This command replaces the just-yanked entry from the kill ring with a
1001 different entry from the kill ring.
1002
1003 This is allowed only immediately after a @code{yank} or another
1004 @code{yank-pop}. At such a time, the region contains text that was just
1005 inserted by yanking. @code{yank-pop} deletes that text and inserts in
1006 its place a different piece of killed text. It does not add the deleted
1007 text to the kill ring, since it is already in the kill ring somewhere.
1008 It does however rotate the kill ring to place the newly yanked string at
1009 the front.
1010
1011 If @var{arg} is @code{nil}, then the replacement text is the previous
1012 element of the kill ring. If @var{arg} is numeric, the replacement is
1013 the @var{arg}th previous kill. If @var{arg} is negative, a more recent
1014 kill is the replacement.
1015
1016 The sequence of kills in the kill ring wraps around, so that after the
1017 oldest one comes the newest one, and before the newest one goes the
1018 oldest.
1019
1020 The return value is always @code{nil}.
1021 @end deffn
1022
1023 @defvar yank-undo-function
1024 If this variable is non-@code{nil}, the function @code{yank-pop} uses
1025 its value instead of @code{delete-region} to delete the text
1026 inserted by the previous @code{yank} or
1027 @code{yank-pop} command. The value must be a function of two
1028 arguments, the start and end of the current region.
1029
1030 The function @code{insert-for-yank} automatically sets this variable
1031 according to the @var{undo} element of the @code{yank-handler}
1032 text property, if there is one.
1033 @end defvar
1034
1035 @node Low-Level Kill Ring
1036 @subsection Low-Level Kill Ring
1037
1038 These functions and variables provide access to the kill ring at a
1039 lower level, but are still convenient for use in Lisp programs,
1040 because they take care of interaction with window system selections
1041 (@pxref{Window System Selections}).
1042
1043 @defun current-kill n &optional do-not-move
1044 The function @code{current-kill} rotates the yanking pointer, which
1045 designates the ``front'' of the kill ring, by @var{n} places (from newer
1046 kills to older ones), and returns the text at that place in the ring.
1047
1048 If the optional second argument @var{do-not-move} is non-@code{nil},
1049 then @code{current-kill} doesn't alter the yanking pointer; it just
1050 returns the @var{n}th kill, counting from the current yanking pointer.
1051
1052 If @var{n} is zero, indicating a request for the latest kill,
1053 @code{current-kill} calls the value of
1054 @code{interprogram-paste-function} (documented below) before
1055 consulting the kill ring. If that value is a function and calling it
1056 returns a string or a list of several string, @code{current-kill}
1057 pushes the strings onto the kill ring and returns the first string.
1058 It also sets the yanking pointer to point to the kill-ring entry of
1059 the first string returned by @code{interprogram-paste-function},
1060 regardless of the value of @var{do-not-move}. Otherwise,
1061 @code{current-kill} does not treat a zero value for @var{n} specially:
1062 it returns the entry pointed at by the yanking pointer and does not
1063 move the yanking pointer.
1064 @end defun
1065
1066 @defun kill-new string &optional replace
1067 This function pushes the text @var{string} onto the kill ring and
1068 makes the yanking pointer point to it. It discards the oldest entry
1069 if appropriate. It also invokes the value of
1070 @code{interprogram-cut-function} (see below).
1071
1072 If @var{replace} is non-@code{nil}, then @code{kill-new} replaces the
1073 first element of the kill ring with @var{string}, rather than pushing
1074 @var{string} onto the kill ring.
1075 @end defun
1076
1077 @defun kill-append string before-p
1078 This function appends the text @var{string} to the first entry in the
1079 kill ring and makes the yanking pointer point to the combined entry.
1080 Normally @var{string} goes at the end of the entry, but if
1081 @var{before-p} is non-@code{nil}, it goes at the beginning. This
1082 function also invokes the value of @code{interprogram-cut-function}
1083 (see below).
1084 @end defun
1085
1086 @defvar interprogram-paste-function
1087 This variable provides a way of transferring killed text from other
1088 programs, when you are using a window system. Its value should be
1089 @code{nil} or a function of no arguments.
1090
1091 If the value is a function, @code{current-kill} calls it to get the
1092 ``most recent kill''. If the function returns a non-@code{nil} value,
1093 then that value is used as the ``most recent kill''. If it returns
1094 @code{nil}, then the front of the kill ring is used.
1095
1096 To facilitate support for window systems that support multiple
1097 selections, this function may also return a list of strings. In that
1098 case, the first string is used as the ``most recent kill'', and all
1099 the other strings are pushed onto the kill ring, for easy access by
1100 @code{yank-pop}.
1101
1102 The normal use of this function is to get the window system's
1103 clipboard as the most recent kill, even if the selection belongs to
1104 another application. @xref{Window System Selections}. However, if
1105 the clipboard contents come from the current Emacs session, this
1106 function should return @code{nil}.
1107 @end defvar
1108
1109 @defvar interprogram-cut-function
1110 This variable provides a way of communicating killed text to other
1111 programs, when you are using a window system. Its value should be
1112 @code{nil} or a function of one required argument.
1113
1114 If the value is a function, @code{kill-new} and @code{kill-append} call
1115 it with the new first element of the kill ring as the argument.
1116
1117 The normal use of this function is to put newly killed text in the
1118 window system's clipboard. @xref{Window System Selections}.
1119 @end defvar
1120
1121 @node Internals of Kill Ring
1122 @subsection Internals of the Kill Ring
1123
1124 The variable @code{kill-ring} holds the kill ring contents, in the
1125 form of a list of strings. The most recent kill is always at the front
1126 of the list.
1127
1128 The @code{kill-ring-yank-pointer} variable points to a link in the
1129 kill ring list, whose @sc{car} is the text to yank next. We say it
1130 identifies the ``front'' of the ring. Moving
1131 @code{kill-ring-yank-pointer} to a different link is called
1132 @dfn{rotating the kill ring}. We call the kill ring a ``ring'' because
1133 the functions that move the yank pointer wrap around from the end of the
1134 list to the beginning, or vice-versa. Rotation of the kill ring is
1135 virtual; it does not change the value of @code{kill-ring}.
1136
1137 Both @code{kill-ring} and @code{kill-ring-yank-pointer} are Lisp
1138 variables whose values are normally lists. The word ``pointer'' in the
1139 name of the @code{kill-ring-yank-pointer} indicates that the variable's
1140 purpose is to identify one element of the list for use by the next yank
1141 command.
1142
1143 The value of @code{kill-ring-yank-pointer} is always @code{eq} to one
1144 of the links in the kill ring list. The element it identifies is the
1145 @sc{car} of that link. Kill commands, which change the kill ring, also
1146 set this variable to the value of @code{kill-ring}. The effect is to
1147 rotate the ring so that the newly killed text is at the front.
1148
1149 Here is a diagram that shows the variable @code{kill-ring-yank-pointer}
1150 pointing to the second entry in the kill ring @code{("some text" "a
1151 different piece of text" "yet older text")}.
1152
1153 @example
1154 @group
1155 kill-ring ---- kill-ring-yank-pointer
1156 | |
1157 | v
1158 | --- --- --- --- --- ---
1159 --> | | |------> | | |--> | | |--> nil
1160 --- --- --- --- --- ---
1161 | | |
1162 | | |
1163 | | -->"yet older text"
1164 | |
1165 | --> "a different piece of text"
1166 |
1167 --> "some text"
1168 @end group
1169 @end example
1170
1171 @noindent
1172 This state of affairs might occur after @kbd{C-y} (@code{yank})
1173 immediately followed by @kbd{M-y} (@code{yank-pop}).
1174
1175 @defvar kill-ring
1176 This variable holds the list of killed text sequences, most recently
1177 killed first.
1178 @end defvar
1179
1180 @defvar kill-ring-yank-pointer
1181 This variable's value indicates which element of the kill ring is at the
1182 ``front'' of the ring for yanking. More precisely, the value is a tail
1183 of the value of @code{kill-ring}, and its @sc{car} is the kill string
1184 that @kbd{C-y} should yank.
1185 @end defvar
1186
1187 @defopt kill-ring-max
1188 The value of this variable is the maximum length to which the kill
1189 ring can grow, before elements are thrown away at the end. The default
1190 value for @code{kill-ring-max} is 60.
1191 @end defopt
1192
1193 @node Undo
1194 @section Undo
1195 @cindex redo
1196
1197 Most buffers have an @dfn{undo list}, which records all changes made
1198 to the buffer's text so that they can be undone. (The buffers that
1199 don't have one are usually special-purpose buffers for which Emacs
1200 assumes that undoing is not useful. In particular, any buffer whose
1201 name begins with a space has its undo recording off by default;
1202 see @ref{Buffer Names}.) All the primitives that modify the
1203 text in the buffer automatically add elements to the front of the undo
1204 list, which is in the variable @code{buffer-undo-list}.
1205
1206 @defvar buffer-undo-list
1207 This buffer-local variable's value is the undo list of the current
1208 buffer. A value of @code{t} disables the recording of undo information.
1209 @end defvar
1210
1211 Here are the kinds of elements an undo list can have:
1212
1213 @table @code
1214 @item @var{position}
1215 This kind of element records a previous value of point; undoing this
1216 element moves point to @var{position}. Ordinary cursor motion does not
1217 make any sort of undo record, but deletion operations use these entries
1218 to record where point was before the command.
1219
1220 @item (@var{beg} . @var{end})
1221 This kind of element indicates how to delete text that was inserted.
1222 Upon insertion, the text occupied the range @var{beg}--@var{end} in the
1223 buffer.
1224
1225 @item (@var{text} . @var{position})
1226 This kind of element indicates how to reinsert text that was deleted.
1227 The deleted text itself is the string @var{text}. The place to
1228 reinsert it is @code{(abs @var{position})}. If @var{position} is
1229 positive, point was at the beginning of the deleted text, otherwise it
1230 was at the end.
1231
1232 @item (t @var{high} . @var{low})
1233 This kind of element indicates that an unmodified buffer became
1234 modified. The elements @var{high} and @var{low} are two integers, each
1235 recording 16 bits of the visited file's modification time as of when it
1236 was previously visited or saved. @code{primitive-undo} uses those
1237 values to determine whether to mark the buffer as unmodified once again;
1238 it does so only if the file's modification time matches those numbers.
1239
1240 @item (nil @var{property} @var{value} @var{beg} . @var{end})
1241 This kind of element records a change in a text property.
1242 Here's how you might undo the change:
1243
1244 @example
1245 (put-text-property @var{beg} @var{end} @var{property} @var{value})
1246 @end example
1247
1248 @item (@var{marker} . @var{adjustment})
1249 This kind of element records the fact that the marker @var{marker} was
1250 relocated due to deletion of surrounding text, and that it moved
1251 @var{adjustment} character positions. Undoing this element moves
1252 @var{marker} @minus{} @var{adjustment} characters.
1253
1254 @item (apply @var{funname} . @var{args})
1255 This is an extensible undo item, which is undone by calling
1256 @var{funname} with arguments @var{args}.
1257
1258 @item (apply @var{delta} @var{beg} @var{end} @var{funname} . @var{args})
1259 This is an extensible undo item, which records a change limited to the
1260 range @var{beg} to @var{end}, which increased the size of the buffer
1261 by @var{delta}. It is undone by calling @var{funname} with arguments
1262 @var{args}.
1263
1264 This kind of element enables undo limited to a region to determine
1265 whether the element pertains to that region.
1266
1267 @item nil
1268 This element is a boundary. The elements between two boundaries are
1269 called a @dfn{change group}; normally, each change group corresponds to
1270 one keyboard command, and undo commands normally undo an entire group as
1271 a unit.
1272 @end table
1273
1274 @defun undo-boundary
1275 This function places a boundary element in the undo list. The undo
1276 command stops at such a boundary, and successive undo commands undo
1277 to earlier and earlier boundaries. This function returns @code{nil}.
1278
1279 The editor command loop automatically calls @code{undo-boundary} just
1280 before executing each key sequence, so that each undo normally undoes
1281 the effects of one command. As an exception, the command
1282 @code{self-insert-command}, which produces self-inserting input
1283 characters (@pxref{Commands for Insertion}), may remove the boundary
1284 inserted by the command loop: a boundary is accepted for the first
1285 such character, the next 19 consecutive self-inserting input
1286 characters do not have boundaries, and then the 20th does; and so on
1287 as long as the self-inserting characters continue. Hence, sequences
1288 of consecutive character insertions can be undone as a group.
1289
1290 All buffer modifications add a boundary whenever the previous undoable
1291 change was made in some other buffer. This is to ensure that
1292 each command makes a boundary in each buffer where it makes changes.
1293
1294 Calling this function explicitly is useful for splitting the effects of
1295 a command into more than one unit. For example, @code{query-replace}
1296 calls @code{undo-boundary} after each replacement, so that the user can
1297 undo individual replacements one by one.
1298 @end defun
1299
1300 @defvar undo-in-progress
1301 This variable is normally @code{nil}, but the undo commands bind it to
1302 @code{t}. This is so that various kinds of change hooks can tell when
1303 they're being called for the sake of undoing.
1304 @end defvar
1305
1306 @defun primitive-undo count list
1307 This is the basic function for undoing elements of an undo list.
1308 It undoes the first @var{count} elements of @var{list}, returning
1309 the rest of @var{list}.
1310
1311 @code{primitive-undo} adds elements to the buffer's undo list when it
1312 changes the buffer. Undo commands avoid confusion by saving the undo
1313 list value at the beginning of a sequence of undo operations. Then the
1314 undo operations use and update the saved value. The new elements added
1315 by undoing are not part of this saved value, so they don't interfere with
1316 continuing to undo.
1317
1318 This function does not bind @code{undo-in-progress}.
1319 @end defun
1320
1321 @node Maintaining Undo
1322 @section Maintaining Undo Lists
1323
1324 This section describes how to enable and disable undo information for
1325 a given buffer. It also explains how the undo list is truncated
1326 automatically so it doesn't get too big.
1327
1328 Recording of undo information in a newly created buffer is normally
1329 enabled to start with; but if the buffer name starts with a space, the
1330 undo recording is initially disabled. You can explicitly enable or
1331 disable undo recording with the following two functions, or by setting
1332 @code{buffer-undo-list} yourself.
1333
1334 @deffn Command buffer-enable-undo &optional buffer-or-name
1335 This command enables recording undo information for buffer
1336 @var{buffer-or-name}, so that subsequent changes can be undone. If no
1337 argument is supplied, then the current buffer is used. This function
1338 does nothing if undo recording is already enabled in the buffer. It
1339 returns @code{nil}.
1340
1341 In an interactive call, @var{buffer-or-name} is the current buffer.
1342 You cannot specify any other buffer.
1343 @end deffn
1344
1345 @deffn Command buffer-disable-undo &optional buffer-or-name
1346 @cindex disabling undo
1347 This function discards the undo list of @var{buffer-or-name}, and disables
1348 further recording of undo information. As a result, it is no longer
1349 possible to undo either previous changes or any subsequent changes. If
1350 the undo list of @var{buffer-or-name} is already disabled, this function
1351 has no effect.
1352
1353 This function returns @code{nil}.
1354 @end deffn
1355
1356 As editing continues, undo lists get longer and longer. To prevent
1357 them from using up all available memory space, garbage collection trims
1358 them back to size limits you can set. (For this purpose, the ``size''
1359 of an undo list measures the cons cells that make up the list, plus the
1360 strings of deleted text.) Three variables control the range of acceptable
1361 sizes: @code{undo-limit}, @code{undo-strong-limit} and
1362 @code{undo-outer-limit}. In these variables, size is counted as the
1363 number of bytes occupied, which includes both saved text and other
1364 data.
1365
1366 @defopt undo-limit
1367 This is the soft limit for the acceptable size of an undo list. The
1368 change group at which this size is exceeded is the last one kept.
1369 @end defopt
1370
1371 @defopt undo-strong-limit
1372 This is the upper limit for the acceptable size of an undo list. The
1373 change group at which this size is exceeded is discarded itself (along
1374 with all older change groups). There is one exception: the very latest
1375 change group is only discarded if it exceeds @code{undo-outer-limit}.
1376 @end defopt
1377
1378 @defopt undo-outer-limit
1379 If at garbage collection time the undo info for the current command
1380 exceeds this limit, Emacs discards the info and displays a warning.
1381 This is a last ditch limit to prevent memory overflow.
1382 @end defopt
1383
1384 @defopt undo-ask-before-discard
1385 If this variable is non-@code{nil}, when the undo info exceeds
1386 @code{undo-outer-limit}, Emacs asks in the echo area whether to
1387 discard the info. The default value is @code{nil}, which means to
1388 discard it automatically.
1389
1390 This option is mainly intended for debugging. Garbage collection is
1391 inhibited while the question is asked, which means that Emacs might
1392 leak memory if the user waits too long before answering the question.
1393 @end defopt
1394
1395 @node Filling
1396 @section Filling
1397 @cindex filling text
1398
1399 @dfn{Filling} means adjusting the lengths of lines (by moving the line
1400 breaks) so that they are nearly (but no greater than) a specified
1401 maximum width. Additionally, lines can be @dfn{justified}, which means
1402 inserting spaces to make the left and/or right margins line up
1403 precisely. The width is controlled by the variable @code{fill-column}.
1404 For ease of reading, lines should be no longer than 70 or so columns.
1405
1406 You can use Auto Fill mode (@pxref{Auto Filling}) to fill text
1407 automatically as you insert it, but changes to existing text may leave
1408 it improperly filled. Then you must fill the text explicitly.
1409
1410 Most of the commands in this section return values that are not
1411 meaningful. All the functions that do filling take note of the current
1412 left margin, current right margin, and current justification style
1413 (@pxref{Margins}). If the current justification style is
1414 @code{none}, the filling functions don't actually do anything.
1415
1416 Several of the filling functions have an argument @var{justify}.
1417 If it is non-@code{nil}, that requests some kind of justification. It
1418 can be @code{left}, @code{right}, @code{full}, or @code{center}, to
1419 request a specific style of justification. If it is @code{t}, that
1420 means to use the current justification style for this part of the text
1421 (see @code{current-justification}, below). Any other value is treated
1422 as @code{full}.
1423
1424 When you call the filling functions interactively, using a prefix
1425 argument implies the value @code{full} for @var{justify}.
1426
1427 @deffn Command fill-paragraph &optional justify region
1428 This command fills the paragraph at or after point. If
1429 @var{justify} is non-@code{nil}, each line is justified as well.
1430 It uses the ordinary paragraph motion commands to find paragraph
1431 boundaries. @xref{Paragraphs,,, emacs, The GNU Emacs Manual}.
1432
1433 When @var{region} is non-@code{nil}, then if Transient Mark mode is
1434 enabled and the mark is active, this command calls @code{fill-region}
1435 to fill all the paragraphs in the region, instead of filling only the
1436 current paragraph. When this command is called interactively,
1437 @var{region} is @code{t}.
1438 @end deffn
1439
1440 @deffn Command fill-region start end &optional justify nosqueeze to-eop
1441 This command fills each of the paragraphs in the region from @var{start}
1442 to @var{end}. It justifies as well if @var{justify} is
1443 non-@code{nil}.
1444
1445 If @var{nosqueeze} is non-@code{nil}, that means to leave whitespace
1446 other than line breaks untouched. If @var{to-eop} is non-@code{nil},
1447 that means to keep filling to the end of the paragraph---or the next hard
1448 newline, if @code{use-hard-newlines} is enabled (see below).
1449
1450 The variable @code{paragraph-separate} controls how to distinguish
1451 paragraphs. @xref{Standard Regexps}.
1452 @end deffn
1453
1454 @deffn Command fill-individual-paragraphs start end &optional justify citation-regexp
1455 This command fills each paragraph in the region according to its
1456 individual fill prefix. Thus, if the lines of a paragraph were indented
1457 with spaces, the filled paragraph will remain indented in the same
1458 fashion.
1459
1460 The first two arguments, @var{start} and @var{end}, are the beginning
1461 and end of the region to be filled. The third and fourth arguments,
1462 @var{justify} and @var{citation-regexp}, are optional. If
1463 @var{justify} is non-@code{nil}, the paragraphs are justified as
1464 well as filled. If @var{citation-regexp} is non-@code{nil}, it means the
1465 function is operating on a mail message and therefore should not fill
1466 the header lines. If @var{citation-regexp} is a string, it is used as
1467 a regular expression; if it matches the beginning of a line, that line
1468 is treated as a citation marker.
1469
1470 Ordinarily, @code{fill-individual-paragraphs} regards each change in
1471 indentation as starting a new paragraph. If
1472 @code{fill-individual-varying-indent} is non-@code{nil}, then only
1473 separator lines separate paragraphs. That mode can handle indented
1474 paragraphs with additional indentation on the first line.
1475 @end deffn
1476
1477 @defopt fill-individual-varying-indent
1478 This variable alters the action of @code{fill-individual-paragraphs} as
1479 described above.
1480 @end defopt
1481
1482 @deffn Command fill-region-as-paragraph start end &optional justify nosqueeze squeeze-after
1483 This command considers a region of text as a single paragraph and fills
1484 it. If the region was made up of many paragraphs, the blank lines
1485 between paragraphs are removed. This function justifies as well as
1486 filling when @var{justify} is non-@code{nil}.
1487
1488 If @var{nosqueeze} is non-@code{nil}, that means to leave whitespace
1489 other than line breaks untouched. If @var{squeeze-after} is
1490 non-@code{nil}, it specifies a position in the region, and means don't
1491 canonicalize spaces before that position.
1492
1493 In Adaptive Fill mode, this command calls @code{fill-context-prefix} to
1494 choose a fill prefix by default. @xref{Adaptive Fill}.
1495 @end deffn
1496
1497 @deffn Command justify-current-line &optional how eop nosqueeze
1498 This command inserts spaces between the words of the current line so
1499 that the line ends exactly at @code{fill-column}. It returns
1500 @code{nil}.
1501
1502 The argument @var{how}, if non-@code{nil} specifies explicitly the style
1503 of justification. It can be @code{left}, @code{right}, @code{full},
1504 @code{center}, or @code{none}. If it is @code{t}, that means to do
1505 follow specified justification style (see @code{current-justification},
1506 below). @code{nil} means to do full justification.
1507
1508 If @var{eop} is non-@code{nil}, that means do only left-justification
1509 if @code{current-justification} specifies full justification. This is
1510 used for the last line of a paragraph; even if the paragraph as a
1511 whole is fully justified, the last line should not be.
1512
1513 If @var{nosqueeze} is non-@code{nil}, that means do not change interior
1514 whitespace.
1515 @end deffn
1516
1517 @defopt default-justification
1518 This variable's value specifies the style of justification to use for
1519 text that doesn't specify a style with a text property. The possible
1520 values are @code{left}, @code{right}, @code{full}, @code{center}, or
1521 @code{none}. The default value is @code{left}.
1522 @end defopt
1523
1524 @defun current-justification
1525 This function returns the proper justification style to use for filling
1526 the text around point.
1527
1528 This returns the value of the @code{justification} text property at
1529 point, or the variable @var{default-justification} if there is no such
1530 text property. However, it returns @code{nil} rather than @code{none}
1531 to mean ``don't justify''.
1532 @end defun
1533
1534 @defopt sentence-end-double-space
1535 @anchor{Definition of sentence-end-double-space}
1536 If this variable is non-@code{nil}, a period followed by just one space
1537 does not count as the end of a sentence, and the filling functions
1538 avoid breaking the line at such a place.
1539 @end defopt
1540
1541 @defopt sentence-end-without-period
1542 If this variable is non-@code{nil}, a sentence can end without a
1543 period. This is used for languages like Thai, where sentences end
1544 with a double space but without a period.
1545 @end defopt
1546
1547 @defopt sentence-end-without-space
1548 If this variable is non-@code{nil}, it should be a string of
1549 characters that can end a sentence without following spaces.
1550 @end defopt
1551
1552 @defvar fill-paragraph-function
1553 This variable provides a way to override the filling of paragraphs.
1554 If its value is non-@code{nil}, @code{fill-paragraph} calls this
1555 function to do the work. If the function returns a non-@code{nil}
1556 value, @code{fill-paragraph} assumes the job is done, and immediately
1557 returns that value.
1558
1559 The usual use of this feature is to fill comments in programming
1560 language modes. If the function needs to fill a paragraph in the usual
1561 way, it can do so as follows:
1562
1563 @example
1564 (let ((fill-paragraph-function nil))
1565 (fill-paragraph arg))
1566 @end example
1567 @end defvar
1568
1569 @defvar fill-forward-paragraph-function
1570 This variable provides a way to override how the filling functions,
1571 such as @code{fill-region} and @code{fill-paragraph}, move forward to
1572 the next paragraph. Its value should be a function, which is called
1573 with a single argument @var{n}, the number of paragraphs to move, and
1574 should return the difference between @var{n} and the number of
1575 paragraphs actually moved. The default value of this variable is
1576 @code{forward-paragraph}. @xref{Paragraphs,,, emacs, The GNU Emacs
1577 Manual}.
1578 @end defvar
1579
1580 @defvar use-hard-newlines
1581 If this variable is non-@code{nil}, the filling functions do not delete
1582 newlines that have the @code{hard} text property. These ``hard
1583 newlines'' act as paragraph separators.
1584 @end defvar
1585
1586 @node Margins
1587 @section Margins for Filling
1588
1589 @defopt fill-prefix
1590 This buffer-local variable, if non-@code{nil}, specifies a string of
1591 text that appears at the beginning of normal text lines and should be
1592 disregarded when filling them. Any line that fails to start with the
1593 fill prefix is considered the start of a paragraph; so is any line
1594 that starts with the fill prefix followed by additional whitespace.
1595 Lines that start with the fill prefix but no additional whitespace are
1596 ordinary text lines that can be filled together. The resulting filled
1597 lines also start with the fill prefix.
1598
1599 The fill prefix follows the left margin whitespace, if any.
1600 @end defopt
1601
1602 @defopt fill-column
1603 This buffer-local variable specifies the maximum width of filled lines.
1604 Its value should be an integer, which is a number of columns. All the
1605 filling, justification, and centering commands are affected by this
1606 variable, including Auto Fill mode (@pxref{Auto Filling}).
1607
1608 As a practical matter, if you are writing text for other people to
1609 read, you should set @code{fill-column} to no more than 70. Otherwise
1610 the line will be too long for people to read comfortably, and this can
1611 make the text seem clumsy.
1612
1613 The default value for @code{fill-column} is 70.
1614 @end defopt
1615
1616 @deffn Command set-left-margin from to margin
1617 This sets the @code{left-margin} property on the text from @var{from} to
1618 @var{to} to the value @var{margin}. If Auto Fill mode is enabled, this
1619 command also refills the region to fit the new margin.
1620 @end deffn
1621
1622 @deffn Command set-right-margin from to margin
1623 This sets the @code{right-margin} property on the text from @var{from}
1624 to @var{to} to the value @var{margin}. If Auto Fill mode is enabled,
1625 this command also refills the region to fit the new margin.
1626 @end deffn
1627
1628 @defun current-left-margin
1629 This function returns the proper left margin value to use for filling
1630 the text around point. The value is the sum of the @code{left-margin}
1631 property of the character at the start of the current line (or zero if
1632 none), and the value of the variable @code{left-margin}.
1633 @end defun
1634
1635 @defun current-fill-column
1636 This function returns the proper fill column value to use for filling
1637 the text around point. The value is the value of the @code{fill-column}
1638 variable, minus the value of the @code{right-margin} property of the
1639 character after point.
1640 @end defun
1641
1642 @deffn Command move-to-left-margin &optional n force
1643 This function moves point to the left margin of the current line. The
1644 column moved to is determined by calling the function
1645 @code{current-left-margin}. If the argument @var{n} is non-@code{nil},
1646 @code{move-to-left-margin} moves forward @var{n}@minus{}1 lines first.
1647
1648 If @var{force} is non-@code{nil}, that says to fix the line's
1649 indentation if that doesn't match the left margin value.
1650 @end deffn
1651
1652 @defun delete-to-left-margin &optional from to
1653 This function removes left margin indentation from the text between
1654 @var{from} and @var{to}. The amount of indentation to delete is
1655 determined by calling @code{current-left-margin}. In no case does this
1656 function delete non-whitespace. If @var{from} and @var{to} are omitted,
1657 they default to the whole buffer.
1658 @end defun
1659
1660 @defun indent-to-left-margin
1661 This function adjusts the indentation at the beginning of the current
1662 line to the value specified by the variable @code{left-margin}. (That
1663 may involve either inserting or deleting whitespace.) This function
1664 is value of @code{indent-line-function} in Paragraph-Indent Text mode.
1665 @end defun
1666
1667 @defopt left-margin
1668 This variable specifies the base left margin column. In Fundamental
1669 mode, @kbd{C-j} indents to this column. This variable automatically
1670 becomes buffer-local when set in any fashion.
1671 @end defopt
1672
1673 @defopt fill-nobreak-predicate
1674 This variable gives major modes a way to specify not to break a line
1675 at certain places. Its value should be a list of functions. Whenever
1676 filling considers breaking the line at a certain place in the buffer,
1677 it calls each of these functions with no arguments and with point
1678 located at that place. If any of the functions returns
1679 non-@code{nil}, then the line won't be broken there.
1680 @end defopt
1681
1682 @node Adaptive Fill
1683 @section Adaptive Fill Mode
1684 @c @cindex Adaptive Fill mode "adaptive-fill-mode" is adjacent.
1685
1686 When @dfn{Adaptive Fill Mode} is enabled, Emacs determines the fill
1687 prefix automatically from the text in each paragraph being filled
1688 rather than using a predetermined value. During filling, this fill
1689 prefix gets inserted at the start of the second and subsequent lines
1690 of the paragraph as described in @ref{Filling}, and in @ref{Auto
1691 Filling}.
1692
1693 @defopt adaptive-fill-mode
1694 Adaptive Fill mode is enabled when this variable is non-@code{nil}.
1695 It is @code{t} by default.
1696 @end defopt
1697
1698 @defun fill-context-prefix from to
1699 This function implements the heart of Adaptive Fill mode; it chooses a
1700 fill prefix based on the text between @var{from} and @var{to},
1701 typically the start and end of a paragraph. It does this by looking
1702 at the first two lines of the paragraph, based on the variables
1703 described below.
1704 @c The optional argument first-line-regexp is not documented
1705 @c because it exists for internal purposes and might be eliminated
1706 @c in the future.
1707
1708 Usually, this function returns the fill prefix, a string. However,
1709 before doing this, the function makes a final check (not specially
1710 mentioned in the following) that a line starting with this prefix
1711 wouldn't look like the start of a paragraph. Should this happen, the
1712 function signals the anomaly by returning @code{nil} instead.
1713
1714 In detail, @code{fill-context-prefix} does this:
1715
1716 @enumerate
1717 @item
1718 It takes a candidate for the fill prefix from the first line---it
1719 tries first the function in @code{adaptive-fill-function} (if any),
1720 then the regular expression @code{adaptive-fill-regexp} (see below).
1721 The first non-@code{nil} result of these, or the empty string if
1722 they're both @code{nil}, becomes the first line's candidate.
1723 @item
1724 If the paragraph has as yet only one line, the function tests the
1725 validity of the prefix candidate just found. The function then
1726 returns the candidate if it's valid, or a string of spaces otherwise.
1727 (see the description of @code{adaptive-fill-first-line-regexp} below).
1728 @item
1729 When the paragraph already has two lines, the function next looks for
1730 a prefix candidate on the second line, in just the same way it did for
1731 the first line. If it doesn't find one, it returns @code{nil}.
1732 @item
1733 The function now compares the two candidate prefixes heuristically: if
1734 the non-whitespace characters in the line 2 candidate occur in the
1735 same order in the line 1 candidate, the function returns the line 2
1736 candidate. Otherwise, it returns the largest initial substring which
1737 is common to both candidates (which might be the empty string).
1738 @end enumerate
1739 @end defun
1740
1741 @defopt adaptive-fill-regexp
1742 Adaptive Fill mode matches this regular expression against the text
1743 starting after the left margin whitespace (if any) on a line; the
1744 characters it matches are that line's candidate for the fill prefix.
1745
1746 The default value matches whitespace with certain punctuation
1747 characters intermingled.
1748 @end defopt
1749
1750 @defopt adaptive-fill-first-line-regexp
1751 Used only in one-line paragraphs, this regular expression acts as an
1752 additional check of the validity of the one available candidate fill
1753 prefix: the candidate must match this regular expression, or match
1754 @code{comment-start-skip}. If it doesn't, @code{fill-context-prefix}
1755 replaces the candidate with a string of spaces ``of the same width''
1756 as it.
1757
1758 The default value of this variable is @w{@code{"\\`[ \t]*\\'"}}, which
1759 matches only a string of whitespace. The effect of this default is to
1760 force the fill prefixes found in one-line paragraphs always to be pure
1761 whitespace.
1762 @end defopt
1763
1764 @defopt adaptive-fill-function
1765 You can specify more complex ways of choosing a fill prefix
1766 automatically by setting this variable to a function. The function is
1767 called with point after the left margin (if any) of a line, and it
1768 must preserve point. It should return either ``that line's'' fill
1769 prefix or @code{nil}, meaning it has failed to determine a prefix.
1770 @end defopt
1771
1772 @node Auto Filling
1773 @section Auto Filling
1774 @cindex filling, automatic
1775 @cindex Auto Fill mode
1776
1777 Auto Fill mode is a minor mode that fills lines automatically as text
1778 is inserted. This section describes the hook used by Auto Fill mode.
1779 For a description of functions that you can call explicitly to fill and
1780 justify existing text, see @ref{Filling}.
1781
1782 Auto Fill mode also enables the functions that change the margins and
1783 justification style to refill portions of the text. @xref{Margins}.
1784
1785 @defvar auto-fill-function
1786 The value of this buffer-local variable should be a function (of no
1787 arguments) to be called after self-inserting a character from the table
1788 @code{auto-fill-chars}. It may be @code{nil}, in which case nothing
1789 special is done in that case.
1790
1791 The value of @code{auto-fill-function} is @code{do-auto-fill} when
1792 Auto-Fill mode is enabled. That is a function whose sole purpose is to
1793 implement the usual strategy for breaking a line.
1794 @end defvar
1795
1796 @defvar normal-auto-fill-function
1797 This variable specifies the function to use for
1798 @code{auto-fill-function}, if and when Auto Fill is turned on. Major
1799 modes can set buffer-local values for this variable to alter how Auto
1800 Fill works.
1801 @end defvar
1802
1803 @defvar auto-fill-chars
1804 A char table of characters which invoke @code{auto-fill-function} when
1805 self-inserted---space and newline in most language environments. They
1806 have an entry @code{t} in the table.
1807 @end defvar
1808
1809 @node Sorting
1810 @section Sorting Text
1811 @cindex sorting text
1812
1813 The sorting functions described in this section all rearrange text in
1814 a buffer. This is in contrast to the function @code{sort}, which
1815 rearranges the order of the elements of a list (@pxref{Rearrangement}).
1816 The values returned by these functions are not meaningful.
1817
1818 @defun sort-subr reverse nextrecfun endrecfun &optional startkeyfun endkeyfun predicate
1819 This function is the general text-sorting routine that subdivides a
1820 buffer into records and then sorts them. Most of the commands in this
1821 section use this function.
1822
1823 To understand how @code{sort-subr} works, consider the whole accessible
1824 portion of the buffer as being divided into disjoint pieces called
1825 @dfn{sort records}. The records may or may not be contiguous, but they
1826 must not overlap. A portion of each sort record (perhaps all of it) is
1827 designated as the sort key. Sorting rearranges the records in order by
1828 their sort keys.
1829
1830 Usually, the records are rearranged in order of ascending sort key.
1831 If the first argument to the @code{sort-subr} function, @var{reverse},
1832 is non-@code{nil}, the sort records are rearranged in order of
1833 descending sort key.
1834
1835 The next four arguments to @code{sort-subr} are functions that are
1836 called to move point across a sort record. They are called many times
1837 from within @code{sort-subr}.
1838
1839 @enumerate
1840 @item
1841 @var{nextrecfun} is called with point at the end of a record. This
1842 function moves point to the start of the next record. The first record
1843 is assumed to start at the position of point when @code{sort-subr} is
1844 called. Therefore, you should usually move point to the beginning of
1845 the buffer before calling @code{sort-subr}.
1846
1847 This function can indicate there are no more sort records by leaving
1848 point at the end of the buffer.
1849
1850 @item
1851 @var{endrecfun} is called with point within a record. It moves point to
1852 the end of the record.
1853
1854 @item
1855 @var{startkeyfun} is called to move point from the start of a record to
1856 the start of the sort key. This argument is optional; if it is omitted,
1857 the whole record is the sort key. If supplied, the function should
1858 either return a non-@code{nil} value to be used as the sort key, or
1859 return @code{nil} to indicate that the sort key is in the buffer
1860 starting at point. In the latter case, @var{endkeyfun} is called to
1861 find the end of the sort key.
1862
1863 @item
1864 @var{endkeyfun} is called to move point from the start of the sort key
1865 to the end of the sort key. This argument is optional. If
1866 @var{startkeyfun} returns @code{nil} and this argument is omitted (or
1867 @code{nil}), then the sort key extends to the end of the record. There
1868 is no need for @var{endkeyfun} if @var{startkeyfun} returns a
1869 non-@code{nil} value.
1870 @end enumerate
1871
1872 The argument @var{predicate} is the function to use to compare keys.
1873 If keys are numbers, it defaults to @code{<}; otherwise it defaults to
1874 @code{string<}.
1875
1876 As an example of @code{sort-subr}, here is the complete function
1877 definition for @code{sort-lines}:
1878
1879 @example
1880 @group
1881 ;; @r{Note that the first two lines of doc string}
1882 ;; @r{are effectively one line when viewed by a user.}
1883 (defun sort-lines (reverse beg end)
1884 "Sort lines in region alphabetically;\
1885 argument means descending order.
1886 Called from a program, there are three arguments:
1887 @end group
1888 @group
1889 REVERSE (non-nil means reverse order),\
1890 BEG and END (region to sort).
1891 The variable `sort-fold-case' determines\
1892 whether alphabetic case affects
1893 the sort order."
1894 @end group
1895 @group
1896 (interactive "P\nr")
1897 (save-excursion
1898 (save-restriction
1899 (narrow-to-region beg end)
1900 (goto-char (point-min))
1901 (let ((inhibit-field-text-motion t))
1902 (sort-subr reverse 'forward-line 'end-of-line)))))
1903 @end group
1904 @end example
1905
1906 Here @code{forward-line} moves point to the start of the next record,
1907 and @code{end-of-line} moves point to the end of record. We do not pass
1908 the arguments @var{startkeyfun} and @var{endkeyfun}, because the entire
1909 record is used as the sort key.
1910
1911 The @code{sort-paragraphs} function is very much the same, except that
1912 its @code{sort-subr} call looks like this:
1913
1914 @example
1915 @group
1916 (sort-subr reverse
1917 (function
1918 (lambda ()
1919 (while (and (not (eobp))
1920 (looking-at paragraph-separate))
1921 (forward-line 1))))
1922 'forward-paragraph)
1923 @end group
1924 @end example
1925
1926 Markers pointing into any sort records are left with no useful
1927 position after @code{sort-subr} returns.
1928 @end defun
1929
1930 @defopt sort-fold-case
1931 If this variable is non-@code{nil}, @code{sort-subr} and the other
1932 buffer sorting functions ignore case when comparing strings.
1933 @end defopt
1934
1935 @deffn Command sort-regexp-fields reverse record-regexp key-regexp start end
1936 This command sorts the region between @var{start} and @var{end}
1937 alphabetically as specified by @var{record-regexp} and @var{key-regexp}.
1938 If @var{reverse} is a negative integer, then sorting is in reverse
1939 order.
1940
1941 Alphabetical sorting means that two sort keys are compared by
1942 comparing the first characters of each, the second characters of each,
1943 and so on. If a mismatch is found, it means that the sort keys are
1944 unequal; the sort key whose character is less at the point of first
1945 mismatch is the lesser sort key. The individual characters are compared
1946 according to their numerical character codes in the Emacs character set.
1947
1948 The value of the @var{record-regexp} argument specifies how to divide
1949 the buffer into sort records. At the end of each record, a search is
1950 done for this regular expression, and the text that matches it is taken
1951 as the next record. For example, the regular expression @samp{^.+$},
1952 which matches lines with at least one character besides a newline, would
1953 make each such line into a sort record. @xref{Regular Expressions}, for
1954 a description of the syntax and meaning of regular expressions.
1955
1956 The value of the @var{key-regexp} argument specifies what part of each
1957 record is the sort key. The @var{key-regexp} could match the whole
1958 record, or only a part. In the latter case, the rest of the record has
1959 no effect on the sorted order of records, but it is carried along when
1960 the record moves to its new position.
1961
1962 The @var{key-regexp} argument can refer to the text matched by a
1963 subexpression of @var{record-regexp}, or it can be a regular expression
1964 on its own.
1965
1966 If @var{key-regexp} is:
1967
1968 @table @asis
1969 @item @samp{\@var{digit}}
1970 then the text matched by the @var{digit}th @samp{\(...\)} parenthesis
1971 grouping in @var{record-regexp} is the sort key.
1972
1973 @item @samp{\&}
1974 then the whole record is the sort key.
1975
1976 @item a regular expression
1977 then @code{sort-regexp-fields} searches for a match for the regular
1978 expression within the record. If such a match is found, it is the sort
1979 key. If there is no match for @var{key-regexp} within a record then
1980 that record is ignored, which means its position in the buffer is not
1981 changed. (The other records may move around it.)
1982 @end table
1983
1984 For example, if you plan to sort all the lines in the region by the
1985 first word on each line starting with the letter @samp{f}, you should
1986 set @var{record-regexp} to @samp{^.*$} and set @var{key-regexp} to
1987 @samp{\<f\w*\>}. The resulting expression looks like this:
1988
1989 @example
1990 @group
1991 (sort-regexp-fields nil "^.*$" "\\<f\\w*\\>"
1992 (region-beginning)
1993 (region-end))
1994 @end group
1995 @end example
1996
1997 If you call @code{sort-regexp-fields} interactively, it prompts for
1998 @var{record-regexp} and @var{key-regexp} in the minibuffer.
1999 @end deffn
2000
2001 @deffn Command sort-lines reverse start end
2002 This command alphabetically sorts lines in the region between
2003 @var{start} and @var{end}. If @var{reverse} is non-@code{nil}, the sort
2004 is in reverse order.
2005 @end deffn
2006
2007 @deffn Command sort-paragraphs reverse start end
2008 This command alphabetically sorts paragraphs in the region between
2009 @var{start} and @var{end}. If @var{reverse} is non-@code{nil}, the sort
2010 is in reverse order.
2011 @end deffn
2012
2013 @deffn Command sort-pages reverse start end
2014 This command alphabetically sorts pages in the region between
2015 @var{start} and @var{end}. If @var{reverse} is non-@code{nil}, the sort
2016 is in reverse order.
2017 @end deffn
2018
2019 @deffn Command sort-fields field start end
2020 This command sorts lines in the region between @var{start} and
2021 @var{end}, comparing them alphabetically by the @var{field}th field
2022 of each line. Fields are separated by whitespace and numbered starting
2023 from 1. If @var{field} is negative, sorting is by the
2024 @w{@minus{}@var{field}th} field from the end of the line. This command
2025 is useful for sorting tables.
2026 @end deffn
2027
2028 @deffn Command sort-numeric-fields field start end
2029 This command sorts lines in the region between @var{start} and
2030 @var{end}, comparing them numerically by the @var{field}th field of
2031 each line. Fields are separated by whitespace and numbered starting
2032 from 1. The specified field must contain a number in each line of the
2033 region. Numbers starting with 0 are treated as octal, and numbers
2034 starting with @samp{0x} are treated as hexadecimal.
2035
2036 If @var{field} is negative, sorting is by the
2037 @w{@minus{}@var{field}th} field from the end of the line. This
2038 command is useful for sorting tables.
2039 @end deffn
2040
2041 @defopt sort-numeric-base
2042 This variable specifies the default radix for
2043 @code{sort-numeric-fields} to parse numbers.
2044 @end defopt
2045
2046 @deffn Command sort-columns reverse &optional beg end
2047 This command sorts the lines in the region between @var{beg} and
2048 @var{end}, comparing them alphabetically by a certain range of
2049 columns. The column positions of @var{beg} and @var{end} bound the
2050 range of columns to sort on.
2051
2052 If @var{reverse} is non-@code{nil}, the sort is in reverse order.
2053
2054 One unusual thing about this command is that the entire line
2055 containing position @var{beg}, and the entire line containing position
2056 @var{end}, are included in the region sorted.
2057
2058 Note that @code{sort-columns} rejects text that contains tabs, because
2059 tabs could be split across the specified columns. Use @kbd{M-x
2060 untabify} to convert tabs to spaces before sorting.
2061
2062 When possible, this command actually works by calling the @code{sort}
2063 utility program.
2064 @end deffn
2065
2066 @node Columns
2067 @section Counting Columns
2068 @cindex columns
2069 @cindex counting columns
2070 @cindex horizontal position
2071
2072 The column functions convert between a character position (counting
2073 characters from the beginning of the buffer) and a column position
2074 (counting screen characters from the beginning of a line).
2075
2076 These functions count each character according to the number of
2077 columns it occupies on the screen. This means control characters count
2078 as occupying 2 or 4 columns, depending upon the value of
2079 @code{ctl-arrow}, and tabs count as occupying a number of columns that
2080 depends on the value of @code{tab-width} and on the column where the tab
2081 begins. @xref{Usual Display}.
2082
2083 Column number computations ignore the width of the window and the
2084 amount of horizontal scrolling. Consequently, a column value can be
2085 arbitrarily high. The first (or leftmost) column is numbered 0. They
2086 also ignore overlays and text properties, aside from invisibility.
2087
2088 @defun current-column
2089 This function returns the horizontal position of point, measured in
2090 columns, counting from 0 at the left margin. The column position is the
2091 sum of the widths of all the displayed representations of the characters
2092 between the start of the current line and point.
2093
2094 For an example of using @code{current-column}, see the description of
2095 @code{count-lines} in @ref{Text Lines}.
2096 @end defun
2097
2098 @deffn Command move-to-column column &optional force
2099 This function moves point to @var{column} in the current line. The
2100 calculation of @var{column} takes into account the widths of the
2101 displayed representations of the characters between the start of the
2102 line and point.
2103
2104 When called interactively, @var{column} is the value of prefix numeric
2105 argument. If @var{column} is not an integer, an error is signaled.
2106
2107 If column @var{column} is beyond the end of the line, point moves to
2108 the end of the line. If @var{column} is negative, point moves to the
2109 beginning of the line.
2110
2111 If it is impossible to move to column @var{column} because that is in
2112 the middle of a multicolumn character such as a tab, point moves to the
2113 end of that character. However, if @var{force} is non-@code{nil}, and
2114 @var{column} is in the middle of a tab, then @code{move-to-column}
2115 converts the tab into spaces so that it can move precisely to column
2116 @var{column}. Other multicolumn characters can cause anomalies despite
2117 @var{force}, since there is no way to split them.
2118
2119 The argument @var{force} also has an effect if the line isn't long
2120 enough to reach column @var{column}; if it is @code{t}, that means to
2121 add whitespace at the end of the line to reach that column.
2122
2123 The return value is the column number actually moved to.
2124 @end deffn
2125
2126 @node Indentation
2127 @section Indentation
2128 @cindex indentation
2129
2130 The indentation functions are used to examine, move to, and change
2131 whitespace that is at the beginning of a line. Some of the functions
2132 can also change whitespace elsewhere on a line. Columns and indentation
2133 count from zero at the left margin.
2134
2135 @menu
2136 * Primitive Indent:: Functions used to count and insert indentation.
2137 * Mode-Specific Indent:: Customize indentation for different modes.
2138 * Region Indent:: Indent all the lines in a region.
2139 * Relative Indent:: Indent the current line based on previous lines.
2140 * Indent Tabs:: Adjustable, typewriter-like tab stops.
2141 * Motion by Indent:: Move to first non-blank character.
2142 @end menu
2143
2144 @node Primitive Indent
2145 @subsection Indentation Primitives
2146
2147 This section describes the primitive functions used to count and
2148 insert indentation. The functions in the following sections use these
2149 primitives. @xref{Width}, for related functions.
2150
2151 @defun current-indentation
2152 @comment !!Type Primitive Function
2153 @comment !!SourceFile indent.c
2154 This function returns the indentation of the current line, which is
2155 the horizontal position of the first nonblank character. If the
2156 contents are entirely blank, then this is the horizontal position of the
2157 end of the line.
2158 @end defun
2159
2160 @deffn Command indent-to column &optional minimum
2161 @comment !!Type Primitive Function
2162 @comment !!SourceFile indent.c
2163 This function indents from point with tabs and spaces until @var{column}
2164 is reached. If @var{minimum} is specified and non-@code{nil}, then at
2165 least that many spaces are inserted even if this requires going beyond
2166 @var{column}. Otherwise the function does nothing if point is already
2167 beyond @var{column}. The value is the column at which the inserted
2168 indentation ends.
2169
2170 The inserted whitespace characters inherit text properties from the
2171 surrounding text (usually, from the preceding text only). @xref{Sticky
2172 Properties}.
2173 @end deffn
2174
2175 @defopt indent-tabs-mode
2176 @comment !!SourceFile indent.c
2177 If this variable is non-@code{nil}, indentation functions can insert
2178 tabs as well as spaces. Otherwise, they insert only spaces. Setting
2179 this variable automatically makes it buffer-local in the current buffer.
2180 @end defopt
2181
2182 @node Mode-Specific Indent
2183 @subsection Indentation Controlled by Major Mode
2184
2185 An important function of each major mode is to customize the @key{TAB}
2186 key to indent properly for the language being edited. This section
2187 describes the mechanism of the @key{TAB} key and how to control it.
2188 The functions in this section return unpredictable values.
2189
2190 @deffn Command indent-for-tab-command &optional rigid
2191 This is the command bound to @key{TAB} in most editing modes. Its
2192 usual action is to indent the current line, but it can alternatively
2193 insert a tab character or indent a region.
2194
2195 Here is what it does:
2196
2197 @itemize
2198 @item
2199 First, it checks whether Transient Mark mode is enabled and the region
2200 is active. If so, it called @code{indent-region} to indent all the
2201 text in the region (@pxref{Region Indent}).
2202
2203 @item
2204 Otherwise, if the indentation function in @code{indent-line-function}
2205 is @code{indent-to-left-margin} (a trivial command that inserts a tab
2206 character), or if the variable @code{tab-always-indent} specifies that
2207 a tab character ought to be inserted (see below), then it inserts a
2208 tab character.
2209
2210 @item
2211 Otherwise, it indents the current line; this is done by calling the
2212 function in @code{indent-line-function}. If the line is already
2213 indented, and the value of @code{tab-always-indent} is @code{complete}
2214 (see below), it tries completing the text at point.
2215 @end itemize
2216
2217 If @var{rigid} is non-@code{nil} (interactively, with a prefix
2218 argument), then after this command indents a line or inserts a tab, it
2219 also rigidly indents the entire balanced expression which starts at
2220 the beginning of the current line, in order to reflect the new
2221 indentation. This argument is ignored if the command indents the
2222 region.
2223 @end deffn
2224
2225 @defvar indent-line-function
2226 This variable's value is the function to be used by
2227 @code{indent-for-tab-command}, and various other indentation commands,
2228 to indent the current line. It is usually assigned by the major mode;
2229 for instance, Lisp mode sets it to @code{lisp-indent-line}, C mode
2230 sets it to @code{c-indent-line}, and so on. The default value is
2231 @code{indent-relative}. @xref{Auto-Indentation}.
2232 @end defvar
2233
2234 @deffn Command indent-according-to-mode
2235 This command calls the function in @code{indent-line-function} to
2236 indent the current line in a way appropriate for the current major mode.
2237 @end deffn
2238
2239 @deffn Command newline-and-indent
2240 This function inserts a newline, then indents the new line (the one
2241 following the newline just inserted) according to the major mode. It
2242 does indentation by calling @code{indent-according-to-mode}.
2243 @end deffn
2244
2245 @deffn Command reindent-then-newline-and-indent
2246 This command reindents the current line, inserts a newline at point,
2247 and then indents the new line (the one following the newline just
2248 inserted). It does indentation on both lines by calling
2249 @code{indent-according-to-mode}.
2250 @end deffn
2251
2252 @defopt tab-always-indent
2253 This variable can be used to customize the behavior of the @key{TAB}
2254 (@code{indent-for-tab-command}) command. If the value is @code{t}
2255 (the default), the command normally just indents the current line. If
2256 the value is @code{nil}, the command indents the current line only if
2257 point is at the left margin or in the line's indentation; otherwise,
2258 it inserts a tab character. If the value is @code{complete}, the
2259 command first tries to indent the current line, and if the line was
2260 already indented, it calls @code{completion-at-point} to complete the
2261 text at point (@pxref{Completion in Buffers}).
2262 @end defopt
2263
2264 @node Region Indent
2265 @subsection Indenting an Entire Region
2266
2267 This section describes commands that indent all the lines in the
2268 region. They return unpredictable values.
2269
2270 @deffn Command indent-region start end &optional to-column
2271 This command indents each nonblank line starting between @var{start}
2272 (inclusive) and @var{end} (exclusive). If @var{to-column} is
2273 @code{nil}, @code{indent-region} indents each nonblank line by calling
2274 the current mode's indentation function, the value of
2275 @code{indent-line-function}.
2276
2277 If @var{to-column} is non-@code{nil}, it should be an integer
2278 specifying the number of columns of indentation; then this function
2279 gives each line exactly that much indentation, by either adding or
2280 deleting whitespace.
2281
2282 If there is a fill prefix, @code{indent-region} indents each line
2283 by making it start with the fill prefix.
2284 @end deffn
2285
2286 @defvar indent-region-function
2287 The value of this variable is a function that can be used by
2288 @code{indent-region} as a short cut. It should take two arguments, the
2289 start and end of the region. You should design the function so
2290 that it will produce the same results as indenting the lines of the
2291 region one by one, but presumably faster.
2292
2293 If the value is @code{nil}, there is no short cut, and
2294 @code{indent-region} actually works line by line.
2295
2296 A short-cut function is useful in modes such as C mode and Lisp mode,
2297 where the @code{indent-line-function} must scan from the beginning of
2298 the function definition: applying it to each line would be quadratic in
2299 time. The short cut can update the scan information as it moves through
2300 the lines indenting them; this takes linear time. In a mode where
2301 indenting a line individually is fast, there is no need for a short cut.
2302
2303 @code{indent-region} with a non-@code{nil} argument @var{to-column} has
2304 a different meaning and does not use this variable.
2305 @end defvar
2306
2307 @deffn Command indent-rigidly start end count
2308 This command indents all lines starting between @var{start}
2309 (inclusive) and @var{end} (exclusive) sideways by @var{count} columns.
2310 This ``preserves the shape'' of the affected region, moving it as a
2311 rigid unit. Consequently, this command is useful not only for indenting
2312 regions of unindented text, but also for indenting regions of formatted
2313 code.
2314
2315 For example, if @var{count} is 3, this command adds 3 columns of
2316 indentation to each of the lines beginning in the region specified.
2317
2318 In Mail mode, @kbd{C-c C-y} (@code{mail-yank-original}) uses
2319 @code{indent-rigidly} to indent the text copied from the message being
2320 replied to.
2321 @end deffn
2322
2323 @deffn Command indent-code-rigidly start end columns &optional nochange-regexp
2324 This is like @code{indent-rigidly}, except that it doesn't alter lines
2325 that start within strings or comments.
2326
2327 In addition, it doesn't alter a line if @var{nochange-regexp} matches at
2328 the beginning of the line (if @var{nochange-regexp} is non-@code{nil}).
2329 @end deffn
2330
2331 @node Relative Indent
2332 @subsection Indentation Relative to Previous Lines
2333
2334 This section describes two commands that indent the current line
2335 based on the contents of previous lines.
2336
2337 @deffn Command indent-relative &optional unindented-ok
2338 This command inserts whitespace at point, extending to the same
2339 column as the next @dfn{indent point} of the previous nonblank line. An
2340 indent point is a non-whitespace character following whitespace. The
2341 next indent point is the first one at a column greater than the current
2342 column of point. For example, if point is underneath and to the left of
2343 the first non-blank character of a line of text, it moves to that column
2344 by inserting whitespace.
2345
2346 If the previous nonblank line has no next indent point (i.e., none at a
2347 great enough column position), @code{indent-relative} either does
2348 nothing (if @var{unindented-ok} is non-@code{nil}) or calls
2349 @code{tab-to-tab-stop}. Thus, if point is underneath and to the right
2350 of the last column of a short line of text, this command ordinarily
2351 moves point to the next tab stop by inserting whitespace.
2352
2353 The return value of @code{indent-relative} is unpredictable.
2354
2355 In the following example, point is at the beginning of the second
2356 line:
2357
2358 @example
2359 @group
2360 This line is indented twelve spaces.
2361 @point{}The quick brown fox jumped.
2362 @end group
2363 @end example
2364
2365 @noindent
2366 Evaluation of the expression @code{(indent-relative nil)} produces the
2367 following:
2368
2369 @example
2370 @group
2371 This line is indented twelve spaces.
2372 @point{}The quick brown fox jumped.
2373 @end group
2374 @end example
2375
2376 In this next example, point is between the @samp{m} and @samp{p} of
2377 @samp{jumped}:
2378
2379 @example
2380 @group
2381 This line is indented twelve spaces.
2382 The quick brown fox jum@point{}ped.
2383 @end group
2384 @end example
2385
2386 @noindent
2387 Evaluation of the expression @code{(indent-relative nil)} produces the
2388 following:
2389
2390 @example
2391 @group
2392 This line is indented twelve spaces.
2393 The quick brown fox jum @point{}ped.
2394 @end group
2395 @end example
2396 @end deffn
2397
2398 @deffn Command indent-relative-maybe
2399 @comment !!SourceFile indent.el
2400 This command indents the current line like the previous nonblank line,
2401 by calling @code{indent-relative} with @code{t} as the
2402 @var{unindented-ok} argument. The return value is unpredictable.
2403
2404 If the previous nonblank line has no indent points beyond the current
2405 column, this command does nothing.
2406 @end deffn
2407
2408 @node Indent Tabs
2409 @subsection Adjustable ``Tab Stops''
2410 @cindex tabs stops for indentation
2411
2412 This section explains the mechanism for user-specified ``tab stops''
2413 and the mechanisms that use and set them. The name ``tab stops'' is
2414 used because the feature is similar to that of the tab stops on a
2415 typewriter. The feature works by inserting an appropriate number of
2416 spaces and tab characters to reach the next tab stop column; it does not
2417 affect the display of tab characters in the buffer (@pxref{Usual
2418 Display}). Note that the @key{TAB} character as input uses this tab
2419 stop feature only in a few major modes, such as Text mode.
2420 @xref{Tab Stops,,, emacs, The GNU Emacs Manual}.
2421
2422 @deffn Command tab-to-tab-stop
2423 This command inserts spaces or tabs before point, up to the next tab
2424 stop column defined by @code{tab-stop-list}. It searches the list for
2425 an element greater than the current column number, and uses that element
2426 as the column to indent to. It does nothing if no such element is
2427 found.
2428 @end deffn
2429
2430 @defopt tab-stop-list
2431 This variable is the list of tab stop columns used by
2432 @code{tab-to-tab-stops}. The elements should be integers in increasing
2433 order. The tab stop columns need not be evenly spaced.
2434
2435 Use @kbd{M-x edit-tab-stops} to edit the location of tab stops
2436 interactively.
2437 @end defopt
2438
2439 @node Motion by Indent
2440 @subsection Indentation-Based Motion Commands
2441
2442 These commands, primarily for interactive use, act based on the
2443 indentation in the text.
2444
2445 @deffn Command back-to-indentation
2446 @comment !!SourceFile simple.el
2447 This command moves point to the first non-whitespace character in the
2448 current line (which is the line in which point is located). It returns
2449 @code{nil}.
2450 @end deffn
2451
2452 @deffn Command backward-to-indentation &optional arg
2453 @comment !!SourceFile simple.el
2454 This command moves point backward @var{arg} lines and then to the
2455 first nonblank character on that line. It returns @code{nil}.
2456 If @var{arg} is omitted or @code{nil}, it defaults to 1.
2457 @end deffn
2458
2459 @deffn Command forward-to-indentation &optional arg
2460 @comment !!SourceFile simple.el
2461 This command moves point forward @var{arg} lines and then to the first
2462 nonblank character on that line. It returns @code{nil}.
2463 If @var{arg} is omitted or @code{nil}, it defaults to 1.
2464 @end deffn
2465
2466 @node Case Changes
2467 @section Case Changes
2468 @cindex case conversion in buffers
2469
2470 The case change commands described here work on text in the current
2471 buffer. @xref{Case Conversion}, for case conversion functions that work
2472 on strings and characters. @xref{Case Tables}, for how to customize
2473 which characters are upper or lower case and how to convert them.
2474
2475 @deffn Command capitalize-region start end
2476 This function capitalizes all words in the region defined by
2477 @var{start} and @var{end}. To capitalize means to convert each word's
2478 first character to upper case and convert the rest of each word to lower
2479 case. The function returns @code{nil}.
2480
2481 If one end of the region is in the middle of a word, the part of the
2482 word within the region is treated as an entire word.
2483
2484 When @code{capitalize-region} is called interactively, @var{start} and
2485 @var{end} are point and the mark, with the smallest first.
2486
2487 @example
2488 @group
2489 ---------- Buffer: foo ----------
2490 This is the contents of the 5th foo.
2491 ---------- Buffer: foo ----------
2492 @end group
2493
2494 @group
2495 (capitalize-region 1 44)
2496 @result{} nil
2497
2498 ---------- Buffer: foo ----------
2499 This Is The Contents Of The 5th Foo.
2500 ---------- Buffer: foo ----------
2501 @end group
2502 @end example
2503 @end deffn
2504
2505 @deffn Command downcase-region start end
2506 This function converts all of the letters in the region defined by
2507 @var{start} and @var{end} to lower case. The function returns
2508 @code{nil}.
2509
2510 When @code{downcase-region} is called interactively, @var{start} and
2511 @var{end} are point and the mark, with the smallest first.
2512 @end deffn
2513
2514 @deffn Command upcase-region start end
2515 This function converts all of the letters in the region defined by
2516 @var{start} and @var{end} to upper case. The function returns
2517 @code{nil}.
2518
2519 When @code{upcase-region} is called interactively, @var{start} and
2520 @var{end} are point and the mark, with the smallest first.
2521 @end deffn
2522
2523 @deffn Command capitalize-word count
2524 This function capitalizes @var{count} words after point, moving point
2525 over as it does. To capitalize means to convert each word's first
2526 character to upper case and convert the rest of each word to lower case.
2527 If @var{count} is negative, the function capitalizes the
2528 @minus{}@var{count} previous words but does not move point. The value
2529 is @code{nil}.
2530
2531 If point is in the middle of a word, the part of the word before point
2532 is ignored when moving forward. The rest is treated as an entire word.
2533
2534 When @code{capitalize-word} is called interactively, @var{count} is
2535 set to the numeric prefix argument.
2536 @end deffn
2537
2538 @deffn Command downcase-word count
2539 This function converts the @var{count} words after point to all lower
2540 case, moving point over as it does. If @var{count} is negative, it
2541 converts the @minus{}@var{count} previous words but does not move point.
2542 The value is @code{nil}.
2543
2544 When @code{downcase-word} is called interactively, @var{count} is set
2545 to the numeric prefix argument.
2546 @end deffn
2547
2548 @deffn Command upcase-word count
2549 This function converts the @var{count} words after point to all upper
2550 case, moving point over as it does. If @var{count} is negative, it
2551 converts the @minus{}@var{count} previous words but does not move point.
2552 The value is @code{nil}.
2553
2554 When @code{upcase-word} is called interactively, @var{count} is set to
2555 the numeric prefix argument.
2556 @end deffn
2557
2558 @node Text Properties
2559 @section Text Properties
2560 @cindex text properties
2561 @cindex attributes of text
2562 @cindex properties of text
2563
2564 Each character position in a buffer or a string can have a @dfn{text
2565 property list}, much like the property list of a symbol (@pxref{Property
2566 Lists}). The properties belong to a particular character at a
2567 particular place, such as, the letter @samp{T} at the beginning of this
2568 sentence or the first @samp{o} in @samp{foo}---if the same character
2569 occurs in two different places, the two occurrences in general have
2570 different properties.
2571
2572 Each property has a name and a value. Both of these can be any Lisp
2573 object, but the name is normally a symbol. Typically each property
2574 name symbol is used for a particular purpose; for instance, the text
2575 property @code{face} specifies the faces for displaying the character
2576 (@pxref{Special Properties}). The usual way to access the property
2577 list is to specify a name and ask what value corresponds to it.
2578
2579 If a character has a @code{category} property, we call it the
2580 @dfn{property category} of the character. It should be a symbol. The
2581 properties of the symbol serve as defaults for the properties of the
2582 character.
2583
2584 Copying text between strings and buffers preserves the properties
2585 along with the characters; this includes such diverse functions as
2586 @code{substring}, @code{insert}, and @code{buffer-substring}.
2587
2588 @menu
2589 * Examining Properties:: Looking at the properties of one character.
2590 * Changing Properties:: Setting the properties of a range of text.
2591 * Property Search:: Searching for where a property changes value.
2592 * Special Properties:: Particular properties with special meanings.
2593 * Format Properties:: Properties for representing formatting of text.
2594 * Sticky Properties:: How inserted text gets properties from
2595 neighboring text.
2596 * Lazy Properties:: Computing text properties in a lazy fashion
2597 only when text is examined.
2598 * Clickable Text:: Using text properties to make regions of text
2599 do something when you click on them.
2600 * Fields:: The @code{field} property defines
2601 fields within the buffer.
2602 * Not Intervals:: Why text properties do not use
2603 Lisp-visible text intervals.
2604 @end menu
2605
2606 @node Examining Properties
2607 @subsection Examining Text Properties
2608
2609 The simplest way to examine text properties is to ask for the value of
2610 a particular property of a particular character. For that, use
2611 @code{get-text-property}. Use @code{text-properties-at} to get the
2612 entire property list of a character. @xref{Property Search}, for
2613 functions to examine the properties of a number of characters at once.
2614
2615 These functions handle both strings and buffers. Keep in mind that
2616 positions in a string start from 0, whereas positions in a buffer start
2617 from 1.
2618
2619 @defun get-text-property pos prop &optional object
2620 This function returns the value of the @var{prop} property of the
2621 character after position @var{pos} in @var{object} (a buffer or
2622 string). The argument @var{object} is optional and defaults to the
2623 current buffer.
2624
2625 If there is no @var{prop} property strictly speaking, but the character
2626 has a property category that is a symbol, then @code{get-text-property} returns
2627 the @var{prop} property of that symbol.
2628 @end defun
2629
2630 @defun get-char-property position prop &optional object
2631 This function is like @code{get-text-property}, except that it checks
2632 overlays first and then text properties. @xref{Overlays}.
2633
2634 The argument @var{object} may be a string, a buffer, or a window. If
2635 it is a window, then the buffer displayed in that window is used for
2636 text properties and overlays, but only the overlays active for that
2637 window are considered. If @var{object} is a buffer, then overlays in
2638 that buffer are considered first, in order of decreasing priority,
2639 followed by the text properties. If @var{object} is a string, only
2640 text properties are considered, since strings never have overlays.
2641 @end defun
2642
2643 @defun get-char-property-and-overlay position prop &optional object
2644 This is like @code{get-char-property}, but gives extra information
2645 about the overlay that the property value comes from.
2646
2647 Its value is a cons cell whose @sc{car} is the property value, the
2648 same value @code{get-char-property} would return with the same
2649 arguments. Its @sc{cdr} is the overlay in which the property was
2650 found, or @code{nil}, if it was found as a text property or not found
2651 at all.
2652
2653 If @var{position} is at the end of @var{object}, both the @sc{car} and
2654 the @sc{cdr} of the value are @code{nil}.
2655 @end defun
2656
2657 @defvar char-property-alias-alist
2658 This variable holds an alist which maps property names to a list of
2659 alternative property names. If a character does not specify a direct
2660 value for a property, the alternative property names are consulted in
2661 order; the first non-@code{nil} value is used. This variable takes
2662 precedence over @code{default-text-properties}, and @code{category}
2663 properties take precedence over this variable.
2664 @end defvar
2665
2666 @defun text-properties-at position &optional object
2667 This function returns the entire property list of the character at
2668 @var{position} in the string or buffer @var{object}. If @var{object} is
2669 @code{nil}, it defaults to the current buffer.
2670 @end defun
2671
2672 @defvar default-text-properties
2673 This variable holds a property list giving default values for text
2674 properties. Whenever a character does not specify a value for a
2675 property, neither directly, through a category symbol, or through
2676 @code{char-property-alias-alist}, the value stored in this list is
2677 used instead. Here is an example:
2678
2679 @example
2680 (setq default-text-properties '(foo 69)
2681 char-property-alias-alist nil)
2682 ;; @r{Make sure character 1 has no properties of its own.}
2683 (set-text-properties 1 2 nil)
2684 ;; @r{What we get, when we ask, is the default value.}
2685 (get-text-property 1 'foo)
2686 @result{} 69
2687 @end example
2688 @end defvar
2689
2690 @node Changing Properties
2691 @subsection Changing Text Properties
2692
2693 The primitives for changing properties apply to a specified range of
2694 text in a buffer or string. The function @code{set-text-properties}
2695 (see end of section) sets the entire property list of the text in that
2696 range; more often, it is useful to add, change, or delete just certain
2697 properties specified by name.
2698
2699 Since text properties are considered part of the contents of the
2700 buffer (or string), and can affect how a buffer looks on the screen,
2701 any change in buffer text properties marks the buffer as modified.
2702 Buffer text property changes are undoable also (@pxref{Undo}).
2703 Positions in a string start from 0, whereas positions in a buffer
2704 start from 1.
2705
2706 @defun put-text-property start end prop value &optional object
2707 This function sets the @var{prop} property to @var{value} for the text
2708 between @var{start} and @var{end} in the string or buffer @var{object}.
2709 If @var{object} is @code{nil}, it defaults to the current buffer.
2710 @end defun
2711
2712 @defun add-text-properties start end props &optional object
2713 This function adds or overrides text properties for the text between
2714 @var{start} and @var{end} in the string or buffer @var{object}. If
2715 @var{object} is @code{nil}, it defaults to the current buffer.
2716
2717 The argument @var{props} specifies which properties to add. It should
2718 have the form of a property list (@pxref{Property Lists}): a list whose
2719 elements include the property names followed alternately by the
2720 corresponding values.
2721
2722 The return value is @code{t} if the function actually changed some
2723 property's value; @code{nil} otherwise (if @var{props} is @code{nil} or
2724 its values agree with those in the text).
2725
2726 For example, here is how to set the @code{comment} and @code{face}
2727 properties of a range of text:
2728
2729 @example
2730 (add-text-properties @var{start} @var{end}
2731 '(comment t face highlight))
2732 @end example
2733 @end defun
2734
2735 @defun remove-text-properties start end props &optional object
2736 This function deletes specified text properties from the text between
2737 @var{start} and @var{end} in the string or buffer @var{object}. If
2738 @var{object} is @code{nil}, it defaults to the current buffer.
2739
2740 The argument @var{props} specifies which properties to delete. It
2741 should have the form of a property list (@pxref{Property Lists}): a list
2742 whose elements are property names alternating with corresponding values.
2743 But only the names matter---the values that accompany them are ignored.
2744 For example, here's how to remove the @code{face} property.
2745
2746 @example
2747 (remove-text-properties @var{start} @var{end} '(face nil))
2748 @end example
2749
2750 The return value is @code{t} if the function actually changed some
2751 property's value; @code{nil} otherwise (if @var{props} is @code{nil} or
2752 if no character in the specified text had any of those properties).
2753
2754 To remove all text properties from certain text, use
2755 @code{set-text-properties} and specify @code{nil} for the new property
2756 list.
2757 @end defun
2758
2759 @defun remove-list-of-text-properties start end list-of-properties &optional object
2760 Like @code{remove-text-properties} except that
2761 @var{list-of-properties} is a list of property names only, not an
2762 alternating list of property names and values.
2763 @end defun
2764
2765 @defun set-text-properties start end props &optional object
2766 This function completely replaces the text property list for the text
2767 between @var{start} and @var{end} in the string or buffer @var{object}.
2768 If @var{object} is @code{nil}, it defaults to the current buffer.
2769
2770 The argument @var{props} is the new property list. It should be a list
2771 whose elements are property names alternating with corresponding values.
2772
2773 After @code{set-text-properties} returns, all the characters in the
2774 specified range have identical properties.
2775
2776 If @var{props} is @code{nil}, the effect is to get rid of all properties
2777 from the specified range of text. Here's an example:
2778
2779 @example
2780 (set-text-properties @var{start} @var{end} nil)
2781 @end example
2782
2783 Do not rely on the return value of this function.
2784 @end defun
2785
2786 The easiest way to make a string with text properties
2787 is with @code{propertize}:
2788
2789 @defun propertize string &rest properties
2790 This function returns a copy of @var{string} which has the text
2791 properties @var{properties}. These properties apply to all the
2792 characters in the string that is returned. Here is an example that
2793 constructs a string with a @code{face} property and a @code{mouse-face}
2794 property:
2795
2796 @smallexample
2797 (propertize "foo" 'face 'italic
2798 'mouse-face 'bold-italic)
2799 @result{} #("foo" 0 3 (mouse-face bold-italic face italic))
2800 @end smallexample
2801
2802 To put different properties on various parts of a string, you can
2803 construct each part with @code{propertize} and then combine them with
2804 @code{concat}:
2805
2806 @smallexample
2807 (concat
2808 (propertize "foo" 'face 'italic
2809 'mouse-face 'bold-italic)
2810 " and "
2811 (propertize "bar" 'face 'italic
2812 'mouse-face 'bold-italic))
2813 @result{} #("foo and bar"
2814 0 3 (face italic mouse-face bold-italic)
2815 3 8 nil
2816 8 11 (face italic mouse-face bold-italic))
2817 @end smallexample
2818 @end defun
2819
2820 @xref{Buffer Contents}, for the function
2821 @code{buffer-substring-no-properties}, which copies text from the
2822 buffer but does not copy its properties.
2823
2824 @node Property Search
2825 @subsection Text Property Search Functions
2826
2827 In typical use of text properties, most of the time several or many
2828 consecutive characters have the same value for a property. Rather than
2829 writing your programs to examine characters one by one, it is much
2830 faster to process chunks of text that have the same property value.
2831
2832 Here are functions you can use to do this. They use @code{eq} for
2833 comparing property values. In all cases, @var{object} defaults to the
2834 current buffer.
2835
2836 For good performance, it's very important to use the @var{limit}
2837 argument to these functions, especially the ones that search for a
2838 single property---otherwise, they may spend a long time scanning to the
2839 end of the buffer, if the property you are interested in does not change.
2840
2841 These functions do not move point; instead, they return a position (or
2842 @code{nil}). Remember that a position is always between two characters;
2843 the position returned by these functions is between two characters with
2844 different properties.
2845
2846 @defun next-property-change pos &optional object limit
2847 The function scans the text forward from position @var{pos} in the
2848 string or buffer @var{object} until it finds a change in some text
2849 property, then returns the position of the change. In other words, it
2850 returns the position of the first character beyond @var{pos} whose
2851 properties are not identical to those of the character just after
2852 @var{pos}.
2853
2854 If @var{limit} is non-@code{nil}, then the scan ends at position
2855 @var{limit}. If there is no property change before that point, this
2856 function returns @var{limit}.
2857
2858 The value is @code{nil} if the properties remain unchanged all the way
2859 to the end of @var{object} and @var{limit} is @code{nil}. If the value
2860 is non-@code{nil}, it is a position greater than or equal to @var{pos}.
2861 The value equals @var{pos} only when @var{limit} equals @var{pos}.
2862
2863 Here is an example of how to scan the buffer by chunks of text within
2864 which all properties are constant:
2865
2866 @smallexample
2867 (while (not (eobp))
2868 (let ((plist (text-properties-at (point)))
2869 (next-change
2870 (or (next-property-change (point) (current-buffer))
2871 (point-max))))
2872 @r{Process text from point to @var{next-change}@dots{}}
2873 (goto-char next-change)))
2874 @end smallexample
2875 @end defun
2876
2877 @defun previous-property-change pos &optional object limit
2878 This is like @code{next-property-change}, but scans back from @var{pos}
2879 instead of forward. If the value is non-@code{nil}, it is a position
2880 less than or equal to @var{pos}; it equals @var{pos} only if @var{limit}
2881 equals @var{pos}.
2882 @end defun
2883
2884 @defun next-single-property-change pos prop &optional object limit
2885 The function scans text for a change in the @var{prop} property, then
2886 returns the position of the change. The scan goes forward from
2887 position @var{pos} in the string or buffer @var{object}. In other
2888 words, this function returns the position of the first character
2889 beyond @var{pos} whose @var{prop} property differs from that of the
2890 character just after @var{pos}.
2891
2892 If @var{limit} is non-@code{nil}, then the scan ends at position
2893 @var{limit}. If there is no property change before that point,
2894 @code{next-single-property-change} returns @var{limit}.
2895
2896 The value is @code{nil} if the property remains unchanged all the way to
2897 the end of @var{object} and @var{limit} is @code{nil}. If the value is
2898 non-@code{nil}, it is a position greater than or equal to @var{pos}; it
2899 equals @var{pos} only if @var{limit} equals @var{pos}.
2900 @end defun
2901
2902 @defun previous-single-property-change pos prop &optional object limit
2903 This is like @code{next-single-property-change}, but scans back from
2904 @var{pos} instead of forward. If the value is non-@code{nil}, it is a
2905 position less than or equal to @var{pos}; it equals @var{pos} only if
2906 @var{limit} equals @var{pos}.
2907 @end defun
2908
2909 @defun next-char-property-change pos &optional limit
2910 This is like @code{next-property-change} except that it considers
2911 overlay properties as well as text properties, and if no change is
2912 found before the end of the buffer, it returns the maximum buffer
2913 position rather than @code{nil} (in this sense, it resembles the
2914 corresponding overlay function @code{next-overlay-change}, rather than
2915 @code{next-property-change}). There is no @var{object} operand
2916 because this function operates only on the current buffer. It returns
2917 the next address at which either kind of property changes.
2918 @end defun
2919
2920 @defun previous-char-property-change pos &optional limit
2921 This is like @code{next-char-property-change}, but scans back from
2922 @var{pos} instead of forward, and returns the minimum buffer
2923 position if no change is found.
2924 @end defun
2925
2926 @defun next-single-char-property-change pos prop &optional object limit
2927 This is like @code{next-single-property-change} except that it
2928 considers overlay properties as well as text properties, and if no
2929 change is found before the end of the @var{object}, it returns the
2930 maximum valid position in @var{object} rather than @code{nil}. Unlike
2931 @code{next-char-property-change}, this function @emph{does} have an
2932 @var{object} operand; if @var{object} is not a buffer, only
2933 text-properties are considered.
2934 @end defun
2935
2936 @defun previous-single-char-property-change pos prop &optional object limit
2937 This is like @code{next-single-char-property-change}, but scans back
2938 from @var{pos} instead of forward, and returns the minimum valid
2939 position in @var{object} if no change is found.
2940 @end defun
2941
2942 @defun text-property-any start end prop value &optional object
2943 This function returns non-@code{nil} if at least one character between
2944 @var{start} and @var{end} has a property @var{prop} whose value is
2945 @var{value}. More precisely, it returns the position of the first such
2946 character. Otherwise, it returns @code{nil}.
2947
2948 The optional fifth argument, @var{object}, specifies the string or
2949 buffer to scan. Positions are relative to @var{object}. The default
2950 for @var{object} is the current buffer.
2951 @end defun
2952
2953 @defun text-property-not-all start end prop value &optional object
2954 This function returns non-@code{nil} if at least one character between
2955 @var{start} and @var{end} does not have a property @var{prop} with value
2956 @var{value}. More precisely, it returns the position of the first such
2957 character. Otherwise, it returns @code{nil}.
2958
2959 The optional fifth argument, @var{object}, specifies the string or
2960 buffer to scan. Positions are relative to @var{object}. The default
2961 for @var{object} is the current buffer.
2962 @end defun
2963
2964 @node Special Properties
2965 @subsection Properties with Special Meanings
2966
2967 Here is a table of text property names that have special built-in
2968 meanings. The following sections list a few additional special property
2969 names that control filling and property inheritance. All other names
2970 have no standard meaning, and you can use them as you like.
2971
2972 Note: the properties @code{composition}, @code{display},
2973 @code{invisible} and @code{intangible} can also cause point to move to
2974 an acceptable place, after each Emacs command. @xref{Adjusting
2975 Point}.
2976
2977 @table @code
2978 @cindex property category of text character
2979 @kindex category @r{(text property)}
2980 @item category
2981 If a character has a @code{category} property, we call it the
2982 @dfn{property category} of the character. It should be a symbol. The
2983 properties of this symbol serve as defaults for the properties of the
2984 character.
2985
2986 @item face
2987 @cindex face codes of text
2988 @kindex face @r{(text property)}
2989 The @code{face} property controls the appearance of the character,
2990 such as its font and color. @xref{Faces}. The value of the property
2991 can be the following:
2992
2993 @itemize @bullet
2994 @item
2995 A face name (a symbol or string).
2996
2997 @item
2998 A property list of face attributes. This has the
2999 form (@var{keyword} @var{value} @dots{}), where each @var{keyword} is a
3000 face attribute name and @var{value} is a meaningful value for that
3001 attribute. With this feature, you do not need to create a face each
3002 time you want to specify a particular attribute for certain text.
3003 @xref{Face Attributes}.
3004
3005 @item
3006 A list of faces. This specifies a face which is an aggregate of the
3007 attributes of each of the listed faces. Faces occurring earlier in
3008 the list have higher priority. Each list element must have one of the
3009 two above forms (i.e.@: either a face name or a property list of face
3010 attributes).
3011 @end itemize
3012
3013 Font Lock mode (@pxref{Font Lock Mode}) works in most buffers by
3014 dynamically updating the @code{face} property of characters based on
3015 the context.
3016
3017 @item font-lock-face
3018 @kindex font-lock-face @r{(text property)}
3019 This property specifies a value for the @code{face} property that Font
3020 Lock mode should apply to the underlying text. It is one of the
3021 fontification methods used by Font Lock mode, and is useful for
3022 special modes that implement their own highlighting.
3023 @xref{Precalculated Fontification}. When Font Lock mode is disabled,
3024 @code{font-lock-face} has no effect.
3025
3026 @item mouse-face
3027 @kindex mouse-face @r{(text property)}
3028 This property is used instead of @code{face} when the mouse is on or
3029 near the character. For this purpose, ``near'' means that all text
3030 between the character and where the mouse is have the same
3031 @code{mouse-face} property value.
3032
3033 Emacs ignores all face attributes from the @code{mouse-face} property
3034 that alter the text size (e.g. @code{:height}, @code{:weight}, and
3035 @code{:slant}). Those attributes are always the same as for the
3036 unhighlighted text.
3037
3038 @item fontified
3039 @kindex fontified @r{(text property)}
3040 This property says whether the text is ready for display. If
3041 @code{nil}, Emacs's redisplay routine calls the functions in
3042 @code{fontification-functions} (@pxref{Auto Faces}) to prepare this
3043 part of the buffer before it is displayed. It is used internally by
3044 the ``just in time'' font locking code.
3045
3046 @item display
3047 This property activates various features that change the
3048 way text is displayed. For example, it can make text appear taller
3049 or shorter, higher or lower, wider or narrow, or replaced with an image.
3050 @xref{Display Property}.
3051
3052 @item help-echo
3053 @kindex help-echo @r{(text property)}
3054 @cindex tooltip
3055 @anchor{Text help-echo}
3056 If text has a string as its @code{help-echo} property, then when you
3057 move the mouse onto that text, Emacs displays that string in the echo
3058 area, or in the tooltip window (@pxref{Tooltips,,, emacs, The GNU Emacs
3059 Manual}).
3060
3061 If the value of the @code{help-echo} property is a function, that
3062 function is called with three arguments, @var{window}, @var{object} and
3063 @var{pos} and should return a help string or @code{nil} for
3064 none. The first argument, @var{window} is the window in which
3065 the help was found. The second, @var{object}, is the buffer, overlay or
3066 string which had the @code{help-echo} property. The @var{pos}
3067 argument is as follows:
3068
3069 @itemize @bullet{}
3070 @item
3071 If @var{object} is a buffer, @var{pos} is the position in the buffer.
3072 @item
3073 If @var{object} is an overlay, that overlay has a @code{help-echo}
3074 property, and @var{pos} is the position in the overlay's buffer.
3075 @item
3076 If @var{object} is a string (an overlay string or a string displayed
3077 with the @code{display} property), @var{pos} is the position in that
3078 string.
3079 @end itemize
3080
3081 If the value of the @code{help-echo} property is neither a function nor
3082 a string, it is evaluated to obtain a help string.
3083
3084 You can alter the way help text is displayed by setting the variable
3085 @code{show-help-function} (@pxref{Help display}).
3086
3087 This feature is used in the mode line and for other active text.
3088
3089 @item keymap
3090 @cindex keymap of character
3091 @kindex keymap @r{(text property)}
3092 The @code{keymap} property specifies an additional keymap for
3093 commands. When this keymap applies, it is used for key lookup before
3094 the minor mode keymaps and before the buffer's local map.
3095 @xref{Active Keymaps}. If the property value is a symbol, the
3096 symbol's function definition is used as the keymap.
3097
3098 The property's value for the character before point applies if it is
3099 non-@code{nil} and rear-sticky, and the property's value for the
3100 character after point applies if it is non-@code{nil} and
3101 front-sticky. (For mouse clicks, the position of the click is used
3102 instead of the position of point.)
3103
3104 @item local-map
3105 @kindex local-map @r{(text property)}
3106 This property works like @code{keymap} except that it specifies a
3107 keymap to use @emph{instead of} the buffer's local map. For most
3108 purposes (perhaps all purposes), it is better to use the @code{keymap}
3109 property.
3110
3111 @item syntax-table
3112 The @code{syntax-table} property overrides what the syntax table says
3113 about this particular character. @xref{Syntax Properties}.
3114
3115 @item read-only
3116 @cindex read-only character
3117 @kindex read-only @r{(text property)}
3118 If a character has the property @code{read-only}, then modifying that
3119 character is not allowed. Any command that would do so gets an error,
3120 @code{text-read-only}. If the property value is a string, that string
3121 is used as the error message.
3122
3123 Insertion next to a read-only character is an error if inserting
3124 ordinary text there would inherit the @code{read-only} property due to
3125 stickiness. Thus, you can control permission to insert next to
3126 read-only text by controlling the stickiness. @xref{Sticky Properties}.
3127
3128 Since changing properties counts as modifying the buffer, it is not
3129 possible to remove a @code{read-only} property unless you know the
3130 special trick: bind @code{inhibit-read-only} to a non-@code{nil} value
3131 and then remove the property. @xref{Read Only Buffers}.
3132
3133 @item invisible
3134 @kindex invisible @r{(text property)}
3135 A non-@code{nil} @code{invisible} property can make a character invisible
3136 on the screen. @xref{Invisible Text}, for details.
3137
3138 @item intangible
3139 @kindex intangible @r{(text property)}
3140 If a group of consecutive characters have equal and non-@code{nil}
3141 @code{intangible} properties, then you cannot place point between them.
3142 If you try to move point forward into the group, point actually moves to
3143 the end of the group. If you try to move point backward into the group,
3144 point actually moves to the start of the group.
3145
3146 If consecutive characters have unequal non-@code{nil}
3147 @code{intangible} properties, they belong to separate groups; each
3148 group is separately treated as described above.
3149
3150 When the variable @code{inhibit-point-motion-hooks} is non-@code{nil},
3151 the @code{intangible} property is ignored.
3152
3153 Beware: this property operates at a very low level, and affects a lot of code
3154 in unexpected ways. So use it with extreme caution. A common misuse is to put
3155 an intangible property on invisible text, which is actually unnecessary since
3156 the command loop will move point outside of the invisible text at the end of
3157 each command anyway. @xref{Adjusting Point}.
3158
3159 @item field
3160 @kindex field @r{(text property)}
3161 Consecutive characters with the same @code{field} property constitute a
3162 @dfn{field}. Some motion functions including @code{forward-word} and
3163 @code{beginning-of-line} stop moving at a field boundary.
3164 @xref{Fields}.
3165
3166 @item cursor
3167 @kindex cursor @r{(text property)}
3168 Normally, the cursor is displayed at the beginning or the end of any
3169 overlay and text property strings present at the current buffer
3170 position. You can place the cursor on any desired character of these
3171 strings by giving that character a non-@code{nil} @code{cursor} text
3172 property. In addition, if the value of the @code{cursor} property is
3173 an integer number, it specifies the number of buffer's character
3174 positions, starting with the position where the overlay or the
3175 @code{display} property begins, for which the cursor should be
3176 displayed on that character. Specifically, if the value of the
3177 @code{cursor} property of a character is the number @var{n}, the
3178 cursor will be displayed on this character for any buffer position in
3179 the range @code{[@var{ovpos}..@var{ovpos}+@var{n})}, where @var{ovpos}
3180 is the overlay's starting position given by @code{overlay-start}
3181 (@pxref{Managing Overlays}), or the position where the @code{display}
3182 text property begins in the buffer.
3183
3184 In other words, the string character with the @code{cursor} property
3185 of any non-@code{nil} value is the character where to display the
3186 cursor. The value of the property says for which buffer positions to
3187 display the cursor there. If the value is an integer number @var{n},
3188 the cursor is displayed there when point is anywhere between the
3189 beginning of the overlay or @code{display} property and @var{n}
3190 positions after that. If the value is anything else and
3191 non-@code{nil}, the cursor is displayed there only when point is at
3192 the beginning of the @code{display} property or at
3193 @code{overlay-start}.
3194
3195 @cindex cursor position for @code{display} properties and overlays
3196 When the buffer has many overlay strings (e.g., @pxref{Overlay
3197 Properties, before-string}) or @code{display} properties that are
3198 strings, it is a good idea to use the @code{cursor} property on these
3199 strings to cue the Emacs display about the places where to put the
3200 cursor while traversing these strings. This directly communicates to
3201 the display engine where the Lisp program wants to put the cursor, or
3202 where the user would expect the cursor.
3203
3204 @item pointer
3205 @kindex pointer @r{(text property)}
3206 This specifies a specific pointer shape when the mouse pointer is over
3207 this text or image. @xref{Pointer Shape}, for possible pointer
3208 shapes.
3209
3210 @item line-spacing
3211 @kindex line-spacing @r{(text property)}
3212 A newline can have a @code{line-spacing} text or overlay property that
3213 controls the height of the display line ending with that newline. The
3214 property value overrides the default frame line spacing and the buffer
3215 local @code{line-spacing} variable. @xref{Line Height}.
3216
3217 @item line-height
3218 @kindex line-height @r{(text property)}
3219 A newline can have a @code{line-height} text or overlay property that
3220 controls the total height of the display line ending in that newline.
3221 @xref{Line Height}.
3222
3223 @item wrap-prefix
3224 If text has a @code{wrap-prefix} property, the prefix it defines will
3225 be added at display time to the beginning of every continuation line
3226 due to text wrapping (so if lines are truncated, the wrap-prefix is
3227 never used). It may be a string or an image (@pxref{Other Display
3228 Specs}), or a stretch of whitespace such as specified by the
3229 @code{:width} or @code{:align-to} display properties (@pxref{Specified
3230 Space}).
3231
3232 A wrap-prefix may also be specified for an entire buffer using the
3233 @code{wrap-prefix} buffer-local variable (however, a
3234 @code{wrap-prefix} text-property takes precedence over the value of
3235 the @code{wrap-prefix} variable). @xref{Truncation}.
3236
3237 @item line-prefix
3238 If text has a @code{line-prefix} property, the prefix it defines will
3239 be added at display time to the beginning of every non-continuation
3240 line. It may be a string or an image (@pxref{Other Display
3241 Specs}), or a stretch of whitespace such as specified by the
3242 @code{:width} or @code{:align-to} display properties (@pxref{Specified
3243 Space}).
3244
3245 A line-prefix may also be specified for an entire buffer using the
3246 @code{line-prefix} buffer-local variable (however, a
3247 @code{line-prefix} text-property takes precedence over the value of
3248 the @code{line-prefix} variable). @xref{Truncation}.
3249
3250 @item modification-hooks
3251 @cindex change hooks for a character
3252 @cindex hooks for changing a character
3253 @kindex modification-hooks @r{(text property)}
3254 If a character has the property @code{modification-hooks}, then its
3255 value should be a list of functions; modifying that character calls
3256 all of those functions before the actual modification. Each function
3257 receives two arguments: the beginning and end of the part of the
3258 buffer being modified. Note that if a particular modification hook
3259 function appears on several characters being modified by a single
3260 primitive, you can't predict how many times the function will
3261 be called.
3262 Furthermore, insertion will not modify any existing character, so this
3263 hook will only be run when removing some characters, replacing them
3264 with others, or changing their text-properties.
3265
3266 If these functions modify the buffer, they should bind
3267 @code{inhibit-modification-hooks} to @code{t} around doing so, to
3268 avoid confusing the internal mechanism that calls these hooks.
3269
3270 Overlays also support the @code{modification-hooks} property, but the
3271 details are somewhat different (@pxref{Overlay Properties}).
3272
3273 @item insert-in-front-hooks
3274 @itemx insert-behind-hooks
3275 @kindex insert-in-front-hooks @r{(text property)}
3276 @kindex insert-behind-hooks @r{(text property)}
3277 The operation of inserting text in a buffer also calls the functions
3278 listed in the @code{insert-in-front-hooks} property of the following
3279 character and in the @code{insert-behind-hooks} property of the
3280 preceding character. These functions receive two arguments, the
3281 beginning and end of the inserted text. The functions are called
3282 @emph{after} the actual insertion takes place.
3283
3284 See also @ref{Change Hooks}, for other hooks that are called
3285 when you change text in a buffer.
3286
3287 @item point-entered
3288 @itemx point-left
3289 @cindex hooks for motion of point
3290 @kindex point-entered @r{(text property)}
3291 @kindex point-left @r{(text property)}
3292 The special properties @code{point-entered} and @code{point-left}
3293 record hook functions that report motion of point. Each time point
3294 moves, Emacs compares these two property values:
3295
3296 @itemize @bullet
3297 @item
3298 the @code{point-left} property of the character after the old location,
3299 and
3300 @item
3301 the @code{point-entered} property of the character after the new
3302 location.
3303 @end itemize
3304
3305 @noindent
3306 If these two values differ, each of them is called (if not @code{nil})
3307 with two arguments: the old value of point, and the new one.
3308
3309 The same comparison is made for the characters before the old and new
3310 locations. The result may be to execute two @code{point-left} functions
3311 (which may be the same function) and/or two @code{point-entered}
3312 functions (which may be the same function). In any case, all the
3313 @code{point-left} functions are called first, followed by all the
3314 @code{point-entered} functions.
3315
3316 It is possible to use @code{char-after} to examine characters at various
3317 buffer positions without moving point to those positions. Only an
3318 actual change in the value of point runs these hook functions.
3319
3320 The variable @code{inhibit-point-motion-hooks} can inhibit running the
3321 @code{point-left} and @code{point-entered} hooks, see @ref{Inhibit
3322 point motion hooks}.
3323
3324 @item composition
3325 @kindex composition @r{(text property)}
3326 This text property is used to display a sequence of characters as a
3327 single glyph composed from components. But the value of the property
3328 itself is completely internal to Emacs and should not be manipulated
3329 directly by, for instance, @code{put-text-property}.
3330
3331 @end table
3332
3333 @defvar inhibit-point-motion-hooks
3334 @anchor{Inhibit point motion hooks} When this variable is
3335 non-@code{nil}, @code{point-left} and @code{point-entered} hooks are
3336 not run, and the @code{intangible} property has no effect. Do not set
3337 this variable globally; bind it with @code{let}.
3338 @end defvar
3339
3340 @defvar show-help-function
3341 @anchor{Help display} If this variable is non-@code{nil}, it specifies a
3342 function called to display help strings. These may be @code{help-echo}
3343 properties, menu help strings (@pxref{Simple Menu Items},
3344 @pxref{Extended Menu Items}), or tool bar help strings (@pxref{Tool
3345 Bar}). The specified function is called with one argument, the help
3346 string to display. Tooltip mode (@pxref{Tooltips,,, emacs, The GNU Emacs
3347 Manual}) provides an example.
3348 @end defvar
3349
3350 @node Format Properties
3351 @subsection Formatted Text Properties
3352
3353 These text properties affect the behavior of the fill commands. They
3354 are used for representing formatted text. @xref{Filling}, and
3355 @ref{Margins}.
3356
3357 @table @code
3358 @item hard
3359 If a newline character has this property, it is a ``hard'' newline.
3360 The fill commands do not alter hard newlines and do not move words
3361 across them. However, this property takes effect only if the
3362 @code{use-hard-newlines} minor mode is enabled. @xref{Hard and Soft
3363 Newlines,, Hard and Soft Newlines, emacs, The GNU Emacs Manual}.
3364
3365 @item right-margin
3366 This property specifies an extra right margin for filling this part of the
3367 text.
3368
3369 @item left-margin
3370 This property specifies an extra left margin for filling this part of the
3371 text.
3372
3373 @item justification
3374 This property specifies the style of justification for filling this part
3375 of the text.
3376 @end table
3377
3378 @node Sticky Properties
3379 @subsection Stickiness of Text Properties
3380 @cindex sticky text properties
3381 @cindex inheritance of text properties
3382
3383 Self-inserting characters normally take on the same properties as the
3384 preceding character. This is called @dfn{inheritance} of properties.
3385
3386 A Lisp program can do insertion with inheritance or without,
3387 depending on the choice of insertion primitive. The ordinary text
3388 insertion functions, such as @code{insert}, do not inherit any
3389 properties. They insert text with precisely the properties of the
3390 string being inserted, and no others. This is correct for programs
3391 that copy text from one context to another---for example, into or out
3392 of the kill ring. To insert with inheritance, use the special
3393 primitives described in this section. Self-inserting characters
3394 inherit properties because they work using these primitives.
3395
3396 When you do insertion with inheritance, @emph{which} properties are
3397 inherited, and from where, depends on which properties are @dfn{sticky}.
3398 Insertion after a character inherits those of its properties that are
3399 @dfn{rear-sticky}. Insertion before a character inherits those of its
3400 properties that are @dfn{front-sticky}. When both sides offer different
3401 sticky values for the same property, the previous character's value
3402 takes precedence.
3403
3404 By default, a text property is rear-sticky but not front-sticky; thus,
3405 the default is to inherit all the properties of the preceding character,
3406 and nothing from the following character.
3407
3408 You can control the stickiness of various text properties with two
3409 specific text properties, @code{front-sticky} and @code{rear-nonsticky},
3410 and with the variable @code{text-property-default-nonsticky}. You can
3411 use the variable to specify a different default for a given property.
3412 You can use those two text properties to make any specific properties
3413 sticky or nonsticky in any particular part of the text.
3414
3415 If a character's @code{front-sticky} property is @code{t}, then all
3416 its properties are front-sticky. If the @code{front-sticky} property is
3417 a list, then the sticky properties of the character are those whose
3418 names are in the list. For example, if a character has a
3419 @code{front-sticky} property whose value is @code{(face read-only)},
3420 then insertion before the character can inherit its @code{face} property
3421 and its @code{read-only} property, but no others.
3422
3423 The @code{rear-nonsticky} property works the opposite way. Most
3424 properties are rear-sticky by default, so the @code{rear-nonsticky}
3425 property says which properties are @emph{not} rear-sticky. If a
3426 character's @code{rear-nonsticky} property is @code{t}, then none of its
3427 properties are rear-sticky. If the @code{rear-nonsticky} property is a
3428 list, properties are rear-sticky @emph{unless} their names are in the
3429 list.
3430
3431 @defvar text-property-default-nonsticky
3432 This variable holds an alist which defines the default rear-stickiness
3433 of various text properties. Each element has the form
3434 @code{(@var{property} . @var{nonstickiness})}, and it defines the
3435 stickiness of a particular text property, @var{property}.
3436
3437 If @var{nonstickiness} is non-@code{nil}, this means that the property
3438 @var{property} is rear-nonsticky by default. Since all properties are
3439 front-nonsticky by default, this makes @var{property} nonsticky in both
3440 directions by default.
3441
3442 The text properties @code{front-sticky} and @code{rear-nonsticky}, when
3443 used, take precedence over the default @var{nonstickiness} specified in
3444 @code{text-property-default-nonsticky}.
3445 @end defvar
3446
3447 Here are the functions that insert text with inheritance of properties:
3448
3449 @defun insert-and-inherit &rest strings
3450 Insert the strings @var{strings}, just like the function @code{insert},
3451 but inherit any sticky properties from the adjoining text.
3452 @end defun
3453
3454 @defun insert-before-markers-and-inherit &rest strings
3455 Insert the strings @var{strings}, just like the function
3456 @code{insert-before-markers}, but inherit any sticky properties from the
3457 adjoining text.
3458 @end defun
3459
3460 @xref{Insertion}, for the ordinary insertion functions which do not
3461 inherit.
3462
3463 @node Lazy Properties
3464 @subsection Lazy Computation of Text Properties
3465
3466 Instead of computing text properties for all the text in the buffer,
3467 you can arrange to compute the text properties for parts of the text
3468 when and if something depends on them.
3469
3470 The primitive that extracts text from the buffer along with its
3471 properties is @code{buffer-substring}. Before examining the properties,
3472 this function runs the abnormal hook @code{buffer-access-fontify-functions}.
3473
3474 @defvar buffer-access-fontify-functions
3475 This variable holds a list of functions for computing text properties.
3476 Before @code{buffer-substring} copies the text and text properties for a
3477 portion of the buffer, it calls all the functions in this list. Each of
3478 the functions receives two arguments that specify the range of the
3479 buffer being accessed. (The buffer itself is always the current
3480 buffer.)
3481 @end defvar
3482
3483 The function @code{buffer-substring-no-properties} does not call these
3484 functions, since it ignores text properties anyway.
3485
3486 In order to prevent the hook functions from being called more than
3487 once for the same part of the buffer, you can use the variable
3488 @code{buffer-access-fontified-property}.
3489
3490 @defvar buffer-access-fontified-property
3491 If this variable's value is non-@code{nil}, it is a symbol which is used
3492 as a text property name. A non-@code{nil} value for that text property
3493 means, ``the other text properties for this character have already been
3494 computed''.
3495
3496 If all the characters in the range specified for @code{buffer-substring}
3497 have a non-@code{nil} value for this property, @code{buffer-substring}
3498 does not call the @code{buffer-access-fontify-functions} functions. It
3499 assumes these characters already have the right text properties, and
3500 just copies the properties they already have.
3501
3502 The normal way to use this feature is that the
3503 @code{buffer-access-fontify-functions} functions add this property, as
3504 well as others, to the characters they operate on. That way, they avoid
3505 being called over and over for the same text.
3506 @end defvar
3507
3508 @node Clickable Text
3509 @subsection Defining Clickable Text
3510 @cindex clickable text
3511 @cindex follow links
3512 @cindex mouse-1
3513
3514 @dfn{Clickable text} is text that can be clicked, with either the
3515 mouse or via a keyboard command, to produce some result. Many major
3516 modes use clickable text to implement textual hyper-links, or
3517 @dfn{links} for short.
3518
3519 The easiest way to insert and manipulate links is to use the
3520 @code{button} package. @xref{Buttons}. In this section, we will
3521 explain how to manually set up clickable text in a buffer, using text
3522 properties. For simplicity, we will refer to the clickable text as a
3523 @dfn{link}.
3524
3525 Implementing a link involves three separate steps: (1) indicating
3526 clickability when the mouse moves over the link; (2) making @key{RET}
3527 or @kbd{Mouse-2} on that link do something; and (3) setting up a
3528 @code{follow-link} condition so that the link obeys
3529 @code{mouse-1-click-follows-link}.
3530
3531 To indicate clickability, add the @code{mouse-face} text property to
3532 the text of the link; then Emacs will highlight the link when the
3533 mouse moves over it. In addition, you should define a tooltip or echo
3534 area message, using the @code{help-echo} text property. @xref{Special
3535 Properties}. For instance, here is how Dired indicates that file
3536 names are clickable:
3537
3538 @smallexample
3539 (if (dired-move-to-filename)
3540 (add-text-properties
3541 (point)
3542 (save-excursion
3543 (dired-move-to-end-of-filename)
3544 (point))
3545 '(mouse-face highlight
3546 help-echo "mouse-2: visit this file in other window")))
3547 @end smallexample
3548
3549 To make the link clickable, bind @key{RET} and @kbd{Mouse-2} to
3550 commands that perform the desired action. Each command should check
3551 to see whether it was called on a link, and act accordingly. For
3552 instance, Dired's major mode keymap binds @kbd{Mouse-2} to the
3553 following command:
3554
3555 @smallexample
3556 (defun dired-mouse-find-file-other-window (event)
3557 "In Dired, visit the file or directory name you click on."
3558 (interactive "e")
3559 (let ((window (posn-window (event-end event)))
3560 (pos (posn-point (event-end event)))
3561 file)
3562 (if (not (windowp window))
3563 (error "No file chosen"))
3564 (with-current-buffer (window-buffer window)
3565 (goto-char pos)
3566 (setq file (dired-get-file-for-visit)))
3567 (if (file-directory-p file)
3568 (or (and (cdr dired-subdir-alist)
3569 (dired-goto-subdir file))
3570 (progn
3571 (select-window window)
3572 (dired-other-window file)))
3573 (select-window window)
3574 (find-file-other-window (file-name-sans-versions file t)))))
3575 @end smallexample
3576
3577 @noindent
3578 This command uses the functions @code{posn-window} and
3579 @code{posn-point} to determine where the click occurred, and
3580 @code{dired-get-file-for-visit} to determine which file to visit.
3581
3582 Instead of binding the mouse command in a major mode keymap, you can
3583 bind it within the link text, using the @code{keymap} text property
3584 (@pxref{Special Properties}). For instance:
3585
3586 @example
3587 (let ((map (make-sparse-keymap)))
3588 (define-key map [mouse-2] 'operate-this-button)
3589 (put-text-property link-start link-end 'keymap map))
3590 @end example
3591
3592 @noindent
3593 With this method, you can easily define different commands for
3594 different links. Furthermore, the global definition of @key{RET} and
3595 @kbd{Mouse-2} remain available for the rest of the text in the buffer.
3596
3597 @vindex mouse-1-click-follows-link
3598 The basic Emacs command for clicking on links is @kbd{Mouse-2}.
3599 However, for compatibility with other graphical applications, Emacs
3600 also recognizes @kbd{Mouse-1} clicks on links, provided the user
3601 clicks on the link quickly without moving the mouse. This behavior is
3602 controlled by the user option @code{mouse-1-click-follows-link}.
3603 @xref{Mouse References,,, emacs, The GNU Emacs Manual}.
3604
3605 To set up the link so that it obeys
3606 @code{mouse-1-click-follows-link}, you must either (1) apply a
3607 @code{follow-link} text or overlay property to the link text, or (2)
3608 bind the @code{follow-link} event to a keymap (which can be a major
3609 mode keymap or a local keymap specified via the @code{keymap} text
3610 property). The value of the @code{follow-link} property, or the
3611 binding for the @code{follow-link} event, acts as a ``condition'' for
3612 the link action. This condition tells Emacs two things: the
3613 circumstances under which a @kbd{Mouse-1} click should be regarded as
3614 occurring ``inside'' the link, and how to compute an ``action code''
3615 that says what to translate the @kbd{Mouse-1} click into. The link
3616 action condition can be one of the following:
3617
3618 @table @asis
3619 @item @code{mouse-face}
3620 If the condition is the symbol @code{mouse-face}, a position is inside
3621 a link if there is a non-@code{nil} @code{mouse-face} property at that
3622 position. The action code is always @code{t}.
3623
3624 For example, here is how Info mode handles @key{Mouse-1}:
3625
3626 @smallexample
3627 (define-key Info-mode-map [follow-link] 'mouse-face)
3628 @end smallexample
3629
3630 @item a function
3631 If the condition is a function, @var{func}, then a position @var{pos}
3632 is inside a link if @code{(@var{func} @var{pos})} evaluates to
3633 non-@code{nil}. The value returned by @var{func} serves as the action
3634 code.
3635
3636 For example, here is how pcvs enables @kbd{Mouse-1} to follow links on
3637 file names only:
3638
3639 @smallexample
3640 (define-key map [follow-link]
3641 (lambda (pos)
3642 (eq (get-char-property pos 'face) 'cvs-filename-face)))
3643 @end smallexample
3644
3645 @item anything else
3646 If the condition value is anything else, then the position is inside a
3647 link and the condition itself is the action code. Clearly, you should
3648 specify this kind of condition only when applying the condition via a
3649 text or property overlay on the link text (so that it does not apply
3650 to the entire buffer).
3651 @end table
3652
3653 @noindent
3654 The action code tells @kbd{Mouse-1} how to follow the link:
3655
3656 @table @asis
3657 @item a string or vector
3658 If the action code is a string or vector, the @kbd{Mouse-1} event is
3659 translated into the first element of the string or vector; i.e., the
3660 action of the @kbd{Mouse-1} click is the local or global binding of
3661 that character or symbol. Thus, if the action code is @code{"foo"},
3662 @kbd{Mouse-1} translates into @kbd{f}. If it is @code{[foo]},
3663 @kbd{Mouse-1} translates into @key{foo}.
3664
3665 @item anything else
3666 For any other non-@code{nil} action code, the @kbd{Mouse-1} event is
3667 translated into a @kbd{Mouse-2} event at the same position.
3668 @end table
3669
3670 To define @kbd{Mouse-1} to activate a button defined with
3671 @code{define-button-type}, give the button a @code{follow-link}
3672 property. The property value should be a link action condition, as
3673 described above. @xref{Buttons}. For example, here is how Help mode
3674 handles @kbd{Mouse-1}:
3675
3676 @smallexample
3677 (define-button-type 'help-xref
3678 'follow-link t
3679 'action #'help-button-action)
3680 @end smallexample
3681
3682 To define @kbd{Mouse-1} on a widget defined with
3683 @code{define-widget}, give the widget a @code{:follow-link} property.
3684 The property value should be a link action condition, as described
3685 above. For example, here is how the @code{link} widget specifies that
3686 a @key{Mouse-1} click shall be translated to @key{RET}:
3687
3688 @smallexample
3689 (define-widget 'link 'item
3690 "An embedded link."
3691 :button-prefix 'widget-link-prefix
3692 :button-suffix 'widget-link-suffix
3693 :follow-link "\C-m"
3694 :help-echo "Follow the link."
3695 :format "%[%t%]")
3696 @end smallexample
3697
3698 @defun mouse-on-link-p pos
3699 This function returns non-@code{nil} if position @var{pos} in the
3700 current buffer is on a link. @var{pos} can also be a mouse event
3701 location, as returned by @code{event-start} (@pxref{Accessing Mouse}).
3702 @end defun
3703
3704 @node Fields
3705 @subsection Defining and Using Fields
3706 @cindex fields
3707
3708 A field is a range of consecutive characters in the buffer that are
3709 identified by having the same value (comparing with @code{eq}) of the
3710 @code{field} property (either a text-property or an overlay property).
3711 This section describes special functions that are available for
3712 operating on fields.
3713
3714 You specify a field with a buffer position, @var{pos}. We think of
3715 each field as containing a range of buffer positions, so the position
3716 you specify stands for the field containing that position.
3717
3718 When the characters before and after @var{pos} are part of the same
3719 field, there is no doubt which field contains @var{pos}: the one those
3720 characters both belong to. When @var{pos} is at a boundary between
3721 fields, which field it belongs to depends on the stickiness of the
3722 @code{field} properties of the two surrounding characters (@pxref{Sticky
3723 Properties}). The field whose property would be inherited by text
3724 inserted at @var{pos} is the field that contains @var{pos}.
3725
3726 There is an anomalous case where newly inserted text at @var{pos}
3727 would not inherit the @code{field} property from either side. This
3728 happens if the previous character's @code{field} property is not
3729 rear-sticky, and the following character's @code{field} property is not
3730 front-sticky. In this case, @var{pos} belongs to neither the preceding
3731 field nor the following field; the field functions treat it as belonging
3732 to an empty field whose beginning and end are both at @var{pos}.
3733
3734 In all of these functions, if @var{pos} is omitted or @code{nil}, the
3735 value of point is used by default. If narrowing is in effect, then
3736 @var{pos} should fall within the accessible portion. @xref{Narrowing}.
3737
3738 @defun field-beginning &optional pos escape-from-edge limit
3739 This function returns the beginning of the field specified by @var{pos}.
3740
3741 If @var{pos} is at the beginning of its field, and
3742 @var{escape-from-edge} is non-@code{nil}, then the return value is
3743 always the beginning of the preceding field that @emph{ends} at @var{pos},
3744 regardless of the stickiness of the @code{field} properties around
3745 @var{pos}.
3746
3747 If @var{limit} is non-@code{nil}, it is a buffer position; if the
3748 beginning of the field is before @var{limit}, then @var{limit} will be
3749 returned instead.
3750 @end defun
3751
3752 @defun field-end &optional pos escape-from-edge limit
3753 This function returns the end of the field specified by @var{pos}.
3754
3755 If @var{pos} is at the end of its field, and @var{escape-from-edge} is
3756 non-@code{nil}, then the return value is always the end of the following
3757 field that @emph{begins} at @var{pos}, regardless of the stickiness of
3758 the @code{field} properties around @var{pos}.
3759
3760 If @var{limit} is non-@code{nil}, it is a buffer position; if the end
3761 of the field is after @var{limit}, then @var{limit} will be returned
3762 instead.
3763 @end defun
3764
3765 @defun field-string &optional pos
3766 This function returns the contents of the field specified by @var{pos},
3767 as a string.
3768 @end defun
3769
3770 @defun field-string-no-properties &optional pos
3771 This function returns the contents of the field specified by @var{pos},
3772 as a string, discarding text properties.
3773 @end defun
3774
3775 @defun delete-field &optional pos
3776 This function deletes the text of the field specified by @var{pos}.
3777 @end defun
3778
3779 @defun constrain-to-field new-pos old-pos &optional escape-from-edge only-in-line inhibit-capture-property
3780 This function ``constrains'' @var{new-pos} to the field that
3781 @var{old-pos} belongs to---in other words, it returns the position
3782 closest to @var{new-pos} that is in the same field as @var{old-pos}.
3783
3784 If @var{new-pos} is @code{nil}, then @code{constrain-to-field} uses
3785 the value of point instead, and moves point to the resulting position
3786 in addition to returning that position.
3787
3788 If @var{old-pos} is at the boundary of two fields, then the acceptable
3789 final positions depend on the argument @var{escape-from-edge}. If
3790 @var{escape-from-edge} is @code{nil}, then @var{new-pos} must be in
3791 the field whose @code{field} property equals what new characters
3792 inserted at @var{old-pos} would inherit. (This depends on the
3793 stickiness of the @code{field} property for the characters before and
3794 after @var{old-pos}.) If @var{escape-from-edge} is non-@code{nil},
3795 @var{new-pos} can be anywhere in the two adjacent fields.
3796 Additionally, if two fields are separated by another field with the
3797 special value @code{boundary}, then any point within this special
3798 field is also considered to be ``on the boundary''.
3799
3800 Commands like @kbd{C-a} with no argument, that normally move backward
3801 to a specific kind of location and stay there once there, probably
3802 should specify @code{nil} for @var{escape-from-edge}. Other motion
3803 commands that check fields should probably pass @code{t}.
3804
3805 If the optional argument @var{only-in-line} is non-@code{nil}, and
3806 constraining @var{new-pos} in the usual way would move it to a different
3807 line, @var{new-pos} is returned unconstrained. This used in commands
3808 that move by line, such as @code{next-line} and
3809 @code{beginning-of-line}, so that they respect field boundaries only in
3810 the case where they can still move to the right line.
3811
3812 If the optional argument @var{inhibit-capture-property} is
3813 non-@code{nil}, and @var{old-pos} has a non-@code{nil} property of that
3814 name, then any field boundaries are ignored.
3815
3816 You can cause @code{constrain-to-field} to ignore all field boundaries
3817 (and so never constrain anything) by binding the variable
3818 @code{inhibit-field-text-motion} to a non-@code{nil} value.
3819 @end defun
3820
3821 @node Not Intervals
3822 @subsection Why Text Properties are not Intervals
3823 @cindex intervals
3824
3825 Some editors that support adding attributes to text in the buffer do
3826 so by letting the user specify ``intervals'' within the text, and adding
3827 the properties to the intervals. Those editors permit the user or the
3828 programmer to determine where individual intervals start and end. We
3829 deliberately provided a different sort of interface in Emacs Lisp to
3830 avoid certain paradoxical behavior associated with text modification.
3831
3832 If the actual subdivision into intervals is meaningful, that means you
3833 can distinguish between a buffer that is just one interval with a
3834 certain property, and a buffer containing the same text subdivided into
3835 two intervals, both of which have that property.
3836
3837 Suppose you take the buffer with just one interval and kill part of
3838 the text. The text remaining in the buffer is one interval, and the
3839 copy in the kill ring (and the undo list) becomes a separate interval.
3840 Then if you yank back the killed text, you get two intervals with the
3841 same properties. Thus, editing does not preserve the distinction
3842 between one interval and two.
3843
3844 Suppose we ``fix'' this problem by coalescing the two intervals when
3845 the text is inserted. That works fine if the buffer originally was a
3846 single interval. But suppose instead that we have two adjacent
3847 intervals with the same properties, and we kill the text of one interval
3848 and yank it back. The same interval-coalescence feature that rescues
3849 the other case causes trouble in this one: after yanking, we have just
3850 one interval. One again, editing does not preserve the distinction
3851 between one interval and two.
3852
3853 Insertion of text at the border between intervals also raises
3854 questions that have no satisfactory answer.
3855
3856 However, it is easy to arrange for editing to behave consistently for
3857 questions of the form, ``What are the properties of this character?''
3858 So we have decided these are the only questions that make sense; we have
3859 not implemented asking questions about where intervals start or end.
3860
3861 In practice, you can usually use the text property search functions in
3862 place of explicit interval boundaries. You can think of them as finding
3863 the boundaries of intervals, assuming that intervals are always
3864 coalesced whenever possible. @xref{Property Search}.
3865
3866 Emacs also provides explicit intervals as a presentation feature; see
3867 @ref{Overlays}.
3868
3869 @node Substitution
3870 @section Substituting for a Character Code
3871
3872 The following functions replace characters within a specified region
3873 based on their character codes.
3874
3875 @defun subst-char-in-region start end old-char new-char &optional noundo
3876 @cindex replace characters
3877 This function replaces all occurrences of the character @var{old-char}
3878 with the character @var{new-char} in the region of the current buffer
3879 defined by @var{start} and @var{end}.
3880
3881 @cindex undo avoidance
3882 If @var{noundo} is non-@code{nil}, then @code{subst-char-in-region} does
3883 not record the change for undo and does not mark the buffer as modified.
3884 This was useful for controlling the old selective display feature
3885 (@pxref{Selective Display}).
3886
3887 @code{subst-char-in-region} does not move point and returns
3888 @code{nil}.
3889
3890 @example
3891 @group
3892 ---------- Buffer: foo ----------
3893 This is the contents of the buffer before.
3894 ---------- Buffer: foo ----------
3895 @end group
3896
3897 @group
3898 (subst-char-in-region 1 20 ?i ?X)
3899 @result{} nil
3900
3901 ---------- Buffer: foo ----------
3902 ThXs Xs the contents of the buffer before.
3903 ---------- Buffer: foo ----------
3904 @end group
3905 @end example
3906 @end defun
3907
3908 @deffn Command translate-region start end table
3909 This function applies a translation table to the characters in the
3910 buffer between positions @var{start} and @var{end}.
3911
3912 The translation table @var{table} is a string or a char-table;
3913 @code{(aref @var{table} @var{ochar})} gives the translated character
3914 corresponding to @var{ochar}. If @var{table} is a string, any
3915 characters with codes larger than the length of @var{table} are not
3916 altered by the translation.
3917
3918 The return value of @code{translate-region} is the number of
3919 characters that were actually changed by the translation. This does
3920 not count characters that were mapped into themselves in the
3921 translation table.
3922 @end deffn
3923
3924 @node Registers
3925 @section Registers
3926 @cindex registers
3927
3928 A register is a sort of variable used in Emacs editing that can hold a
3929 variety of different kinds of values. Each register is named by a
3930 single character. All @acronym{ASCII} characters and their meta variants
3931 (but with the exception of @kbd{C-g}) can be used to name registers.
3932 Thus, there are 255 possible registers. A register is designated in
3933 Emacs Lisp by the character that is its name.
3934
3935 @defvar register-alist
3936 This variable is an alist of elements of the form @code{(@var{name} .
3937 @var{contents})}. Normally, there is one element for each Emacs
3938 register that has been used.
3939
3940 The object @var{name} is a character (an integer) identifying the
3941 register.
3942 @end defvar
3943
3944 The @var{contents} of a register can have several possible types:
3945
3946 @table @asis
3947 @item a number
3948 A number stands for itself. If @code{insert-register} finds a number
3949 in the register, it converts the number to decimal.
3950
3951 @item a marker
3952 A marker represents a buffer position to jump to.
3953
3954 @item a string
3955 A string is text saved in the register.
3956
3957 @item a rectangle
3958 A rectangle is represented by a list of strings.
3959
3960 @item @code{(@var{window-configuration} @var{position})}
3961 This represents a window configuration to restore in one frame, and a
3962 position to jump to in the current buffer.
3963
3964 @item @code{(@var{frame-configuration} @var{position})}
3965 This represents a frame configuration to restore, and a position
3966 to jump to in the current buffer.
3967
3968 @item (file @var{filename})
3969 This represents a file to visit; jumping to this value visits file
3970 @var{filename}.
3971
3972 @item (file-query @var{filename} @var{position})
3973 This represents a file to visit and a position in it; jumping to this
3974 value visits file @var{filename} and goes to buffer position
3975 @var{position}. Restoring this type of position asks the user for
3976 confirmation first.
3977 @end table
3978
3979 The functions in this section return unpredictable values unless
3980 otherwise stated.
3981
3982 @defun get-register reg
3983 This function returns the contents of the register
3984 @var{reg}, or @code{nil} if it has no contents.
3985 @end defun
3986
3987 @defun set-register reg value
3988 This function sets the contents of register @var{reg} to @var{value}.
3989 A register can be set to any value, but the other register functions
3990 expect only certain data types. The return value is @var{value}.
3991 @end defun
3992
3993 @deffn Command view-register reg
3994 This command displays what is contained in register @var{reg}.
3995 @end deffn
3996
3997 @deffn Command insert-register reg &optional beforep
3998 This command inserts contents of register @var{reg} into the current
3999 buffer.
4000
4001 Normally, this command puts point before the inserted text, and the
4002 mark after it. However, if the optional second argument @var{beforep}
4003 is non-@code{nil}, it puts the mark before and point after.
4004 You can pass a non-@code{nil} second argument @var{beforep} to this
4005 function interactively by supplying any prefix argument.
4006
4007 If the register contains a rectangle, then the rectangle is inserted
4008 with its upper left corner at point. This means that text is inserted
4009 in the current line and underneath it on successive lines.
4010
4011 If the register contains something other than saved text (a string) or
4012 a rectangle (a list), currently useless things happen. This may be
4013 changed in the future.
4014 @end deffn
4015
4016 @node Transposition
4017 @section Transposition of Text
4018
4019 This function can be used to transpose stretches of text:
4020
4021 @defun transpose-regions start1 end1 start2 end2 &optional leave-markers
4022 This function exchanges two nonoverlapping portions of the buffer.
4023 Arguments @var{start1} and @var{end1} specify the bounds of one portion
4024 and arguments @var{start2} and @var{end2} specify the bounds of the
4025 other portion.
4026
4027 Normally, @code{transpose-regions} relocates markers with the transposed
4028 text; a marker previously positioned within one of the two transposed
4029 portions moves along with that portion, thus remaining between the same
4030 two characters in their new position. However, if @var{leave-markers}
4031 is non-@code{nil}, @code{transpose-regions} does not do this---it leaves
4032 all markers unrelocated.
4033 @end defun
4034
4035 @node Base 64
4036 @section Base 64 Encoding
4037 @cindex base 64 encoding
4038
4039 Base 64 code is used in email to encode a sequence of 8-bit bytes as
4040 a longer sequence of @acronym{ASCII} graphic characters. It is defined in
4041 Internet RFC@footnote{
4042 An RFC, an acronym for @dfn{Request for Comments}, is a numbered
4043 Internet informational document describing a standard. RFCs are
4044 usually written by technical experts acting on their own initiative,
4045 and are traditionally written in a pragmatic, experience-driven
4046 manner.
4047 }2045. This section describes the functions for
4048 converting to and from this code.
4049
4050 @deffn Command base64-encode-region beg end &optional no-line-break
4051 This function converts the region from @var{beg} to @var{end} into base
4052 64 code. It returns the length of the encoded text. An error is
4053 signaled if a character in the region is multibyte, i.e.@: in a
4054 multibyte buffer the region must contain only characters from the
4055 charsets @code{ascii}, @code{eight-bit-control} and
4056 @code{eight-bit-graphic}.
4057
4058 Normally, this function inserts newline characters into the encoded
4059 text, to avoid overlong lines. However, if the optional argument
4060 @var{no-line-break} is non-@code{nil}, these newlines are not added, so
4061 the output is just one long line.
4062 @end deffn
4063
4064 @defun base64-encode-string string &optional no-line-break
4065 This function converts the string @var{string} into base 64 code. It
4066 returns a string containing the encoded text. As for
4067 @code{base64-encode-region}, an error is signaled if a character in the
4068 string is multibyte.
4069
4070 Normally, this function inserts newline characters into the encoded
4071 text, to avoid overlong lines. However, if the optional argument
4072 @var{no-line-break} is non-@code{nil}, these newlines are not added, so
4073 the result string is just one long line.
4074 @end defun
4075
4076 @deffn Command base64-decode-region beg end
4077 This function converts the region from @var{beg} to @var{end} from base
4078 64 code into the corresponding decoded text. It returns the length of
4079 the decoded text.
4080
4081 The decoding functions ignore newline characters in the encoded text.
4082 @end deffn
4083
4084 @defun base64-decode-string string
4085 This function converts the string @var{string} from base 64 code into
4086 the corresponding decoded text. It returns a unibyte string containing the
4087 decoded text.
4088
4089 The decoding functions ignore newline characters in the encoded text.
4090 @end defun
4091
4092 @node Checksum/Hash
4093 @section Checksum/Hash
4094 @cindex MD5 checksum
4095 @cindex SHA hash
4096 @cindex hash, cryptographic
4097 @cindex cryptographic hash
4098
4099 Emacs has built-in support for computing @dfn{cryptographic hashes}.
4100 A cryptographic hash, or @dfn{checksum}, is a digital ``fingerprint''
4101 of a piece of data (e.g.@: a block of text) which can be used to check
4102 that you have an unaltered copy of that data.
4103
4104 @cindex message digest
4105 Emacs supports several common cryptographic hash algorithms: MD5,
4106 SHA-1, SHA-2, SHA-224, SHA-256, SHA-384 and SHA-512. MD5 is the
4107 oldest of these algorithms, and is commonly used in @dfn{message
4108 digests} to check the integrity of messages transmitted over a
4109 network. MD5 is not ``collision resistant'' (i.e.@: it is possible to
4110 deliberately design different pieces of data which have the same MD5
4111 hash), so you should not used it for anything security-related. A
4112 similar theoretical weakness also exists in SHA-1. Therefore, for
4113 security-related applications you should use the other hash types,
4114 such as SHA-2.
4115
4116 @defun secure-hash algorithm object &optional start end binary
4117 This function returns a hash for @var{object}. The argument
4118 @var{algorithm} is a symbol stating which hash to compute: one of
4119 @code{md5}, @code{sha1}, @code{sha224}, @code{sha256}, @code{sha384}
4120 or @code{sha512}. The argument @var{object} should be a buffer or a
4121 string.
4122
4123 The optional arguments @var{start} and @var{end} are character
4124 positions specifying the portion of @var{object} to compute the
4125 message digest for. If they are @code{nil} or omitted, the hash is
4126 computed for the whole of @var{object}.
4127
4128 If the argument @var{binary} is omitted or @code{nil}, the function
4129 returns the @dfn{text form} of the hash, as an ordinary Lisp string.
4130 If @var{binary} is non-@code{nil}, it returns the hash in @dfn{binary
4131 form}, as a sequence of bytes stored in a unibyte string.
4132
4133 This function does not compute the hash directly from the internal
4134 representation of @var{object}'s text (@pxref{Text Representations}).
4135 Instead, it encodes the text using a coding system (@pxref{Coding
4136 Systems}), and computes the hash from that encoded text. If
4137 @var{object} is a buffer, the coding system used is the one which
4138 would be chosen by default for writing the text into a file. If
4139 @var{object} is a string, the user's preferred coding system is used
4140 (@pxref{Recognize Coding,,, emacs, GNU Emacs Manual}).
4141 @end defun
4142
4143 @defun md5 object &optional start end coding-system noerror
4144 This function returns an MD5 hash. It is semi-obsolete, since for
4145 most purposes it is equivalent to calling @code{secure-hash} with
4146 @code{md5} as the @var{algorithm} argument. The @var{object},
4147 @var{start} and @var{end} arguments have the same meanings as in
4148 @code{secure-hash}.
4149
4150 If @var{coding-system} is non-@code{nil}, it specifies a coding system
4151 to use to encode the text; if omitted or @code{nil}, the default
4152 coding system is used, like in @code{secure-hash}.
4153
4154 Normally, @code{md5} signals an error if the text can't be encoded
4155 using the specified or chosen coding system. However, if
4156 @var{noerror} is non-@code{nil}, it silently uses @code{raw-text}
4157 coding instead.
4158 @end defun
4159
4160 @node Parsing HTML/XML
4161 @section Parsing HTML and XML
4162 @cindex parsing html
4163
4164 When Emacs is compiled with libxml2 support, the following functions
4165 are available to parse HTML or XML text into Lisp object trees.
4166
4167 @defun libxml-parse-html-region start end &optional base-url
4168 This function parses the text between @var{start} and @var{end} as
4169 HTML, and returns a list representing the HTML @dfn{parse tree}. It
4170 attempts to handle ``real world'' HTML by robustly coping with syntax
4171 mistakes.
4172
4173 The optional argument @var{base-url}, if non-@code{nil}, should be a
4174 string specifying the base URL for relative URLs occurring in links.
4175
4176 In the parse tree, each HTML node is represented by a list in which
4177 the first element is a symbol representing the node name, the second
4178 element is an alist of node attributes, and the remaining elements are
4179 the subnodes.
4180
4181 The following example demonstrates this. Given this (malformed) HTML
4182 document:
4183
4184 @example
4185 <html><head></head><body width=101><div class=thing>Foo<div>Yes
4186 @end example
4187
4188 @noindent
4189 A call to @code{libxml-parse-html-region} returns this:
4190
4191 @example
4192 (html ()
4193 (head ())
4194 (body ((width . "101"))
4195 (div ((class . "thing"))
4196 "Foo"
4197 (div ()
4198 "Yes"))))
4199 @end example
4200 @end defun
4201
4202 @cindex parsing xml
4203 @defun libxml-parse-xml-region start end &optional base-url
4204 This function is the same as @code{libxml-parse-html-region}, except
4205 that it parses the text as XML rather than HTML (so it is stricter
4206 about syntax).
4207 @end defun
4208
4209 @node Atomic Changes
4210 @section Atomic Change Groups
4211 @cindex atomic changes
4212
4213 In database terminology, an @dfn{atomic} change is an indivisible
4214 change---it can succeed entirely or it can fail entirely, but it
4215 cannot partly succeed. A Lisp program can make a series of changes to
4216 one or several buffers as an @dfn{atomic change group}, meaning that
4217 either the entire series of changes will be installed in their buffers
4218 or, in case of an error, none of them will be.
4219
4220 To do this for one buffer, the one already current, simply write a
4221 call to @code{atomic-change-group} around the code that makes the
4222 changes, like this:
4223
4224 @example
4225 (atomic-change-group
4226 (insert foo)
4227 (delete-region x y))
4228 @end example
4229
4230 @noindent
4231 If an error (or other nonlocal exit) occurs inside the body of
4232 @code{atomic-change-group}, it unmakes all the changes in that buffer
4233 that were during the execution of the body. This kind of change group
4234 has no effect on any other buffers---any such changes remain.
4235
4236 If you need something more sophisticated, such as to make changes in
4237 various buffers constitute one atomic group, you must directly call
4238 lower-level functions that @code{atomic-change-group} uses.
4239
4240 @defun prepare-change-group &optional buffer
4241 This function sets up a change group for buffer @var{buffer}, which
4242 defaults to the current buffer. It returns a ``handle'' that
4243 represents the change group. You must use this handle to activate the
4244 change group and subsequently to finish it.
4245 @end defun
4246
4247 To use the change group, you must @dfn{activate} it. You must do
4248 this before making any changes in the text of @var{buffer}.
4249
4250 @defun activate-change-group handle
4251 This function activates the change group that @var{handle} designates.
4252 @end defun
4253
4254 After you activate the change group, any changes you make in that
4255 buffer become part of it. Once you have made all the desired changes
4256 in the buffer, you must @dfn{finish} the change group. There are two
4257 ways to do this: you can either accept (and finalize) all the changes,
4258 or cancel them all.
4259
4260 @defun accept-change-group handle
4261 This function accepts all the changes in the change group specified by
4262 @var{handle}, making them final.
4263 @end defun
4264
4265 @defun cancel-change-group handle
4266 This function cancels and undoes all the changes in the change group
4267 specified by @var{handle}.
4268 @end defun
4269
4270 Your code should use @code{unwind-protect} to make sure the group is
4271 always finished. The call to @code{activate-change-group} should be
4272 inside the @code{unwind-protect}, in case the user types @kbd{C-g}
4273 just after it runs. (This is one reason why
4274 @code{prepare-change-group} and @code{activate-change-group} are
4275 separate functions, because normally you would call
4276 @code{prepare-change-group} before the start of that
4277 @code{unwind-protect}.) Once you finish the group, don't use the
4278 handle again---in particular, don't try to finish the same group
4279 twice.
4280
4281 To make a multibuffer change group, call @code{prepare-change-group}
4282 once for each buffer you want to cover, then use @code{nconc} to
4283 combine the returned values, like this:
4284
4285 @example
4286 (nconc (prepare-change-group buffer-1)
4287 (prepare-change-group buffer-2))
4288 @end example
4289
4290 You can then activate the multibuffer change group with a single call
4291 to @code{activate-change-group}, and finish it with a single call to
4292 @code{accept-change-group} or @code{cancel-change-group}.
4293
4294 Nested use of several change groups for the same buffer works as you
4295 would expect. Non-nested use of change groups for the same buffer
4296 will get Emacs confused, so don't let it happen; the first change
4297 group you start for any given buffer should be the last one finished.
4298
4299 @node Change Hooks
4300 @section Change Hooks
4301 @cindex change hooks
4302 @cindex hooks for text changes
4303
4304 These hook variables let you arrange to take notice of all changes in
4305 all buffers (or in a particular buffer, if you make them buffer-local).
4306 See also @ref{Special Properties}, for how to detect changes to specific
4307 parts of the text.
4308
4309 The functions you use in these hooks should save and restore the match
4310 data if they do anything that uses regular expressions; otherwise, they
4311 will interfere in bizarre ways with the editing operations that call
4312 them.
4313
4314 @defvar before-change-functions
4315 This variable holds a list of functions to call before any buffer
4316 modification. Each function gets two arguments, the beginning and end
4317 of the region that is about to change, represented as integers. The
4318 buffer that is about to change is always the current buffer.
4319 @end defvar
4320
4321 @defvar after-change-functions
4322 This variable holds a list of functions to call after any buffer
4323 modification. Each function receives three arguments: the beginning
4324 and end of the region just changed, and the length of the text that
4325 existed before the change. All three arguments are integers. The
4326 buffer has been changed is always the current buffer.
4327
4328 The length of the old text is the difference between the buffer
4329 positions before and after that text as it was before the change. As
4330 for the changed text, its length is simply the difference between the
4331 first two arguments.
4332 @end defvar
4333
4334 Output of messages into the @file{*Messages*} buffer does not
4335 call these functions.
4336
4337 @defmac combine-after-change-calls body@dots{}
4338 The macro executes @var{body} normally, but arranges to call the
4339 after-change functions just once for a series of several changes---if
4340 that seems safe.
4341
4342 If a program makes several text changes in the same area of the buffer,
4343 using the macro @code{combine-after-change-calls} around that part of
4344 the program can make it run considerably faster when after-change hooks
4345 are in use. When the after-change hooks are ultimately called, the
4346 arguments specify a portion of the buffer including all of the changes
4347 made within the @code{combine-after-change-calls} body.
4348
4349 @strong{Warning:} You must not alter the values of
4350 @code{after-change-functions} within
4351 the body of a @code{combine-after-change-calls} form.
4352
4353 @strong{Warning:} if the changes you combine occur in widely scattered
4354 parts of the buffer, this will still work, but it is not advisable,
4355 because it may lead to inefficient behavior for some change hook
4356 functions.
4357 @end defmac
4358
4359 @defvar first-change-hook
4360 This variable is a normal hook that is run whenever a buffer is changed
4361 that was previously in the unmodified state.
4362 @end defvar
4363
4364 @defvar inhibit-modification-hooks
4365 If this variable is non-@code{nil}, all of the change hooks are
4366 disabled; none of them run. This affects all the hook variables
4367 described above in this section, as well as the hooks attached to
4368 certain special text properties (@pxref{Special Properties}) and overlay
4369 properties (@pxref{Overlay Properties}).
4370
4371 Also, this variable is bound to non-@code{nil} while running those
4372 same hook variables, so that by default modifying the buffer from
4373 a modification hook does not cause other modification hooks to be run.
4374 If you do want modification hooks to be run in a particular piece of
4375 code that is itself run from a modification hook, then rebind locally
4376 @code{inhibit-modification-hooks} to @code{nil}.
4377 @end defvar