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