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