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