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