(do-auto-fill): Do break after one word as last resort
[emacs.git] / lispref / text.texi
blob29e6c4fb3bd613720cc5430ab13b6bf3a30dfb33
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc. 
4 @c See the file elisp.texi for copying conditions.
5 @setfilename ../info/text
6 @node Text, Searching and Matching, Markers, Top
7 @chapter Text
8 @cindex text
10   This chapter describes the functions that deal with the text in a
11 buffer.  Most examine, insert, or delete text in the current buffer,
12 often in the vicinity of point.  Many are interactive.  All the
13 functions that change the text provide for undoing the changes
14 (@pxref{Undo}).
16   Many text-related functions operate on a region of text defined by two
17 buffer positions passed in arguments named @var{start} and @var{end}.
18 These arguments should be either markers (@pxref{Markers}) or numeric
19 character positions (@pxref{Positions}).  The order of these arguments
20 does not matter; it is all right for @var{start} to be the end of the
21 region and @var{end} the beginning.  For example, @code{(delete-region 1
22 10)} and @code{(delete-region 10 1)} are equivalent.  An
23 @code{args-out-of-range} error is signaled if either @var{start} or
24 @var{end} is outside the accessible portion of the buffer.  In an
25 interactive call, point and the mark are used for these arguments.
27 @cindex buffer contents
28   Throughout this chapter, ``text'' refers to the characters in the
29 buffer, together with their properties (when relevant).
31 @menu
32 * Near Point::       Examining text in the vicinity of point.
33 * Buffer Contents::  Examining text in a general fashion.
34 * Comparing Text::   Comparing substrings of buffers.
35 * Insertion::        Adding new text to a buffer.
36 * Commands for Insertion::  User-level commands to insert text.
37 * Deletion::         Removing text from a buffer.
38 * User-Level Deletion::     User-level commands to delete text.
39 * The Kill Ring::    Where removed text sometimes is saved for later use.
40 * Undo::             Undoing changes to the text of a buffer.
41 * Maintaining Undo:: How to enable and disable undo information.
42                         How to control how much information is kept.
43 * Filling::          Functions for explicit filling.
44 * Margins::          How to specify margins for filling commands.
45 * Auto Filling::     How auto-fill mode is implemented to break lines.
46 * Sorting::          Functions for sorting parts of the buffer.
47 * Columns::          Computing horizontal positions, and using them.
48 * Indentation::      Functions to insert or adjust indentation.
49 * Case Changes::     Case conversion of parts of the buffer.
50 * Text Properties::  Assigning Lisp property lists to text characters.
51 * Substitution::     Replacing a given character wherever it appears.
52 * Transposition::    Swapping two portions of a buffer.
53 * Registers::        How registers are implemented.  Accessing the text or
54                        position stored in a register.
55 * Change Hooks::     Supplying functions to be run when text is changed.
56 @end menu
58 @node Near Point
59 @section Examining Text Near Point
61   Many functions are provided to look at the characters around point.
62 Several simple functions are described here.  See also @code{looking-at}
63 in @ref{Regexp Search}.
65 @defun char-after position
66 This function returns the character in the current buffer at (i.e.,
67 immediately after) position @var{position}.  If @var{position} is out of
68 range for this purpose, either before the beginning of the buffer, or at
69 or beyond the end, then the value is @code{nil}.
71 In the following example, assume that the first character in the
72 buffer is @samp{@@}:
74 @example
75 @group
76 (char-to-string (char-after 1))
77      @result{} "@@"
78 @end group
79 @end example
80 @end defun
82 @defun following-char
83 This function returns the character following point in the current
84 buffer.  This is similar to @code{(char-after (point))}.  However, if
85 point is at the end of the buffer, then @code{following-char} returns 0.
87 Remember that point is always between characters, and the terminal
88 cursor normally appears over the character following point.  Therefore,
89 the character returned by @code{following-char} is the character the
90 cursor is over.
92 In this example, point is between the @samp{a} and the @samp{c}.
94 @example
95 @group
96 ---------- Buffer: foo ----------
97 Gentlemen may cry ``Pea@point{}ce! Peace!,''
98 but there is no peace.
99 ---------- Buffer: foo ----------
100 @end group
102 @group
103 (char-to-string (preceding-char))
104      @result{} "a"
105 (char-to-string (following-char))
106      @result{} "c"
107 @end group
108 @end example
109 @end defun
111 @defun preceding-char
112 This function returns the character preceding point in the current
113 buffer.  See above, under @code{following-char}, for an example.  If
114 point is at the beginning of the buffer, @code{preceding-char} returns
116 @end defun
118 @defun bobp
119 This function returns @code{t} if point is at the beginning of the
120 buffer.  If narrowing is in effect, this means the beginning of the
121 accessible portion of the text.  See also @code{point-min} in
122 @ref{Point}.
123 @end defun
125 @defun eobp
126 This function returns @code{t} if point is at the end of the buffer.
127 If narrowing is in effect, this means the end of accessible portion of
128 the text.  See also @code{point-max} in @xref{Point}.
129 @end defun
131 @defun bolp
132 This function returns @code{t} if point is at the beginning of a line.
133 @xref{Text Lines}.  The beginning of the buffer (or its accessible
134 portion) always counts as the beginning of a line.
135 @end defun
137 @defun eolp
138 This function returns @code{t} if point is at the end of a line.  The
139 end of the buffer (or of its accessible portion) is always considered
140 the end of a line.
141 @end defun
143 @node Buffer Contents
144 @section Examining Buffer Contents
146   This section describes two functions that allow a Lisp program to
147 convert any portion of the text in the buffer into a string.
149 @defun buffer-substring start end
150 This function returns a string containing a copy of the text of the
151 region defined by positions @var{start} and @var{end} in the current
152 buffer.  If the arguments are not positions in the accessible portion of
153 the buffer, @code{buffer-substring} signals an @code{args-out-of-range}
154 error.
156 It is not necessary for @var{start} to be less than @var{end}; the
157 arguments can be given in either order.  But most often the smaller
158 argument is written first.
160 If the text being copied has any text properties, these are copied into
161 the string along with the characters they belong to.  @xref{Text
162 Properties}.  However, overlays (@pxref{Overlays}) in the buffer and
163 their properties are ignored, not copied.
165 @example
166 @group
167 ---------- Buffer: foo ----------
168 This is the contents of buffer foo
170 ---------- Buffer: foo ----------
171 @end group
173 @group
174 (buffer-substring 1 10)
175 @result{} "This is t"
176 @end group
177 @group
178 (buffer-substring (point-max) 10)
179 @result{} "he contents of buffer foo
181 @end group
182 @end example
183 @end defun
185 @defun buffer-substring-no-properties start end
186 This is like @code{buffer-substring}, except that it does not copy text
187 properties, just the characters themselves.  @xref{Text Properties}.
188 Here's an example of using this function to get a word to look up in an
189 alist:
191 @example
192 (setq flammable
193       (assoc (buffer-substring start end)
194              '(("wood" . t) ("paper" . t)
195                ("steel" . nil) ("asbestos" . nil))))
196 @end example
198 If this were written using @code{buffer-substring} instead, it would not
199 work reliably; any text properties that happened to be in the word
200 copied from the buffer would make the comparisons fail.
201 @end defun
203 @defun buffer-string
204 This function returns the contents of the accessible portion of the
205 current buffer as a string.  This is the portion between
206 @code{(point-min)} and @code{(point-max)} (@pxref{Narrowing}).
208 @example
209 @group
210 ---------- Buffer: foo ----------
211 This is the contents of buffer foo
213 ---------- Buffer: foo ----------
215 (buffer-string)
216      @result{} "This is the contents of buffer foo
218 @end group
219 @end example
220 @end defun
222 @node Comparing Text
223 @section Comparing Text
224 @cindex comparing buffer text
226   This function lets you compare portions of the text in a buffer, without
227 copying them into strings first.
229 @defun compare-buffer-substrings buffer1 start1 end1 buffer2 start2 end2
230 This function lets you compare two substrings of the same buffer or two
231 different buffers.  The first three arguments specify one substring,
232 giving a buffer and two positions within the buffer.  The last three
233 arguments specify the other substring in the same way.  You can use
234 @code{nil} for @var{buffer1}, @var{buffer2}, or both to stand for the
235 current buffer.
237 The value is negative if the first substring is less, positive if the
238 first is greater, and zero if they are equal.  The absolute value of
239 the result is one plus the index of the first differing characters
240 within the substrings.
242 This function ignores case when comparing characters
243 if @code{case-fold-search} is non-@code{nil}.  It always ignores
244 text properties.
246 Suppose the current buffer contains the text @samp{foobarbar
247 haha!rara!}; then in this example the two substrings are @samp{rbar }
248 and @samp{rara!}.  The value is 2 because the first substring is greater
249 at the second character.
251 @example
252 (compare-buffer-substring nil 6 11 nil 16 21)
253      @result{} 2
254 @end example
255 @end defun
257 @node Insertion
258 @section Inserting Text
259 @cindex insertion of text
260 @cindex text insertion
262   @dfn{Insertion} means adding new text to a buffer.  The inserted text
263 goes at point---between the character before point and the character
264 after point.
266   Insertion relocates markers that point at positions after the
267 insertion point, so that they stay with the surrounding text
268 (@pxref{Markers}).  When a marker points at the place of insertion,
269 insertion normally doesn't relocate the marker, so that it points to the
270 beginning of the inserted text; however, certain special functions such
271 as @code{insert-before-markers} relocate such markers to point after the
272 inserted text.
274 @cindex insertion before point
275 @cindex before point, insertion
276   Some insertion functions leave point before the inserted text, while
277 other functions leave it after.  We call the former insertion @dfn{after
278 point} and the latter insertion @dfn{before point}.
280   Insertion functions signal an error if the current buffer is
281 read-only.
283   These functions copy text characters from strings and buffers along
284 with their properties.  The inserted characters have exactly the same
285 properties as the characters they were copied from.  By contrast,
286 characters specified as separate arguments, not part of a string or
287 buffer, inherit their text properties from the neighboring text.
289 @defun insert &rest args
290 This function inserts the strings and/or characters @var{args} into the
291 current buffer, at point, moving point forward.  In other words, it
292 inserts the text before point.  An error is signaled unless all
293 @var{args} are either strings or characters.  The value is @code{nil}.
294 @end defun
296 @defun insert-before-markers &rest args
297 This function inserts the strings and/or characters @var{args} into the
298 current buffer, at point, moving point forward.  An error is signaled
299 unless all @var{args} are either strings or characters.  The value is
300 @code{nil}.
302 This function is unlike the other insertion functions in that it
303 relocates markers initially pointing at the insertion point, to point
304 after the inserted text.
305 @end defun
307 @defun insert-char character count &optional inherit
308 This function inserts @var{count} instances of @var{character} into the
309 current buffer before point.  The argument @var{count} must be a number,
310 and @var{character} must be a character.  The value is @code{nil}.
311 @c It's unfortunate that count comes second.  Not like make-string, etc.
313 If @var{inherit} is non-@code{nil}, then the inserted characters inherit
314 sticky text properties from the two characters before and after the
315 insertion point.  @xref{Sticky Properties}.
316 @end defun
318 @defun insert-buffer-substring from-buffer-or-name &optional start end
319 This function inserts a portion of buffer @var{from-buffer-or-name}
320 (which must already exist) into the current buffer before point.  The
321 text inserted is the region from @var{start} and @var{end}.  (These
322 arguments default to the beginning and end of the accessible portion of
323 that buffer.)  This function returns @code{nil}.
325 In this example, the form is executed with buffer @samp{bar} as the
326 current buffer.  We assume that buffer @samp{bar} is initially empty.
328 @example
329 @group
330 ---------- Buffer: foo ----------
331 We hold these truths to be self-evident, that all
332 ---------- Buffer: foo ----------
333 @end group
335 @group
336 (insert-buffer-substring "foo" 1 20)
337      @result{} nil
339 ---------- Buffer: bar ----------
340 We hold these truth@point{}
341 ---------- Buffer: bar ----------
342 @end group
343 @end example
344 @end defun
346   @xref{Sticky Properties}, for other insertion functions that inherit
347 text properties from the nearby text in addition to inserting it.
348 Whitespace inserted by indentation functions also inherits text
349 properties.
351 @node Commands for Insertion
352 @section User-Level Insertion Commands
354   This section describes higher-level commands for inserting text,
355 commands intended primarily for the user but useful also in Lisp
356 programs.
358 @deffn Command insert-buffer from-buffer-or-name
359 This command inserts the entire contents of @var{from-buffer-or-name}
360 (which must exist) into the current buffer after point.  It leaves
361 the mark after the inserted text.  The value is @code{nil}.
362 @end deffn
364 @deffn Command self-insert-command count
365 @cindex character insertion
366 @cindex self-insertion
367 This command inserts the last character typed; it does so @var{count}
368 times, before point, and returns @code{nil}.  Most printing characters
369 are bound to this command.  In routine use, @code{self-insert-command}
370 is the most frequently called function in Emacs, but programs rarely use
371 it except to install it on a keymap.
373 In an interactive call, @var{count} is the numeric prefix argument.
375 This command calls @code{auto-fill-function} whenever that is
376 non-@code{nil} and the character inserted is a space or a newline
377 (@pxref{Auto Filling}).
379 @c Cross refs reworded to prevent overfull hbox.  --rjc 15mar92
380 This command performs abbrev expansion if Abbrev mode is enabled and
381 the inserted character does not have word-constituent
382 syntax. (@xref{Abbrevs}, and @ref{Syntax Class Table}.)
384 This is also responsible for calling @code{blink-paren-function} when
385 the inserted character has close parenthesis syntax (@pxref{Blinking}).
386 @end deffn
388 @deffn Command newline &optional number-of-newlines 
389 This command inserts newlines into the current buffer before point.
390 If @var{number-of-newlines} is supplied, that many newline characters
391 are inserted.
393 @cindex newline and Auto Fill mode
394 This function calls @code{auto-fill-function} if the current column
395 number is greater than the value of @code{fill-column} and
396 @var{number-of-newlines} is @code{nil}.  Typically what
397 @code{auto-fill-function} does is insert a newline; thus, the overall
398 result in this case is to insert two newlines at different places: one
399 at point, and another earlier in the line.  @code{newline} does not
400 auto-fill if @var{number-of-newlines} is non-@code{nil}.
402 This command indents to the left margin if that is not zero.
403 @xref{Margins}.
405 The value returned is @code{nil}.  In an interactive call, @var{count}
406 is the numeric prefix argument.
407 @end deffn
409 @deffn Command split-line
410 This command splits the current line, moving the portion of the line
411 after point down vertically so that it is on the next line directly
412 below where it was before.  Whitespace is inserted as needed at the
413 beginning of the lower line, using the @code{indent-to} function.
414 @code{split-line} returns the position of point.
416 Programs hardly ever use this function.
417 @end deffn
419 @defvar overwrite-mode
420 This variable controls whether overwrite mode is in effect: a
421 non-@code{nil} value enables the mode.  It is automatically made
422 buffer-local when set in any fashion.
423 @end defvar
425 @node Deletion
426 @section Deleting Text
428 @cindex deletion vs killing
429   Deletion means removing part of the text in a buffer, without saving
430 it in the kill ring (@pxref{The Kill Ring}).  Deleted text can't be
431 yanked, but can be reinserted using the undo mechanism (@pxref{Undo}).
432 Some deletion functions do save text in the kill ring in some special
433 cases.
435   All of the deletion functions operate on the current buffer, and all
436 return a value of @code{nil}.
438 @defun erase-buffer
439 This function deletes the entire text of the current buffer, leaving it
440 empty.  If the buffer is read-only, it signals a @code{buffer-read-only}
441 error.  Otherwise, it deletes the text without asking for any
442 confirmation.  It returns @code{nil}.
444 Normally, deleting a large amount of text from a buffer inhibits further
445 auto-saving of that buffer ``because it has shrunk''.  However,
446 @code{erase-buffer} does not do this, the idea being that the future
447 text is not really related to the former text, and its size should not
448 be compared with that of the former text.
449 @end defun
451 @deffn Command delete-region start end
452 This command deletes the text in the current buffer in the region
453 defined by @var{start} and @var{end}.  The value is @code{nil}.  If
454 point was inside the deleted region, its value afterward is @var{start}.
455 Otherwise, point relocates with the surrounding text, as markers do.
456 @end deffn
458 @deffn Command delete-char count &optional killp
459 This command deletes @var{count} characters directly after point, or
460 before point if @var{count} is negative.  If @var{killp} is
461 non-@code{nil}, then it saves the deleted characters in the kill ring.
463 In an interactive call, @var{count} is the numeric prefix argument, and
464 @var{killp} is the unprocessed prefix argument.  Therefore, if a prefix
465 argument is supplied, the text is saved in the kill ring.  If no prefix
466 argument is supplied, then one character is deleted, but not saved in
467 the kill ring.
469 The value returned is always @code{nil}.
470 @end deffn
472 @deffn Command delete-backward-char count &optional killp
473 @cindex delete previous char
474 This command deletes @var{count} characters directly before point, or
475 after point if @var{count} is negative.  If @var{killp} is
476 non-@code{nil}, then it saves the deleted characters in the kill ring.
478 In an interactive call, @var{count} is the numeric prefix argument, and
479 @var{killp} is the unprocessed prefix argument.  Therefore, if a prefix
480 argument is supplied, the text is saved in the kill ring.  If no prefix
481 argument is supplied, then one character is deleted, but not saved in
482 the kill ring.
484 The value returned is always @code{nil}.
485 @end deffn
487 @deffn Command backward-delete-char-untabify count &optional killp
488 @cindex tab deletion
489 This command deletes @var{count} characters backward, changing tabs
490 into spaces.  When the next character to be deleted is a tab, it is
491 first replaced with the proper number of spaces to preserve alignment
492 and then one of those spaces is deleted instead of the tab.  If
493 @var{killp} is non-@code{nil}, then the command saves the deleted
494 characters in the kill ring.
496 Conversion of tabs to spaces happens only if @var{count} is positive.
497 If it is negative, exactly @minus{}@var{count} characters after point
498 are deleted.
500 In an interactive call, @var{count} is the numeric prefix argument, and
501 @var{killp} is the unprocessed prefix argument.  Therefore, if a prefix
502 argument is supplied, the text is saved in the kill ring.  If no prefix
503 argument is supplied, then one character is deleted, but not saved in
504 the kill ring.
506 The value returned is always @code{nil}.
507 @end deffn
509 @node User-Level Deletion
510 @section User-Level Deletion Commands
512   This section describes higher-level commands for deleting text,
513 commands intended primarily for the user but useful also in Lisp
514 programs.
516 @deffn Command delete-horizontal-space
517 @cindex deleting whitespace
518 This function deletes all spaces and tabs around point.  It returns
519 @code{nil}.
521 In the following examples, we call @code{delete-horizontal-space} four
522 times, once on each line, with point between the second and third
523 characters on the line each time.
525 @example
526 @group
527 ---------- Buffer: foo ----------
528 I @point{}thought
529 I @point{}     thought
530 We@point{} thought
531 Yo@point{}u thought
532 ---------- Buffer: foo ----------
533 @end group
535 @group
536 (delete-horizontal-space)   ; @r{Four times.}
537      @result{} nil
539 ---------- Buffer: foo ----------
540 Ithought
541 Ithought
542 Wethought
543 You thought
544 ---------- Buffer: foo ----------
545 @end group
546 @end example
547 @end deffn
549 @deffn Command delete-indentation &optional join-following-p 
550 This function joins the line point is on to the previous line, deleting
551 any whitespace at the join and in some cases replacing it with one
552 space.  If @var{join-following-p} is non-@code{nil},
553 @code{delete-indentation} joins this line to the following line
554 instead.  The value is @code{nil}.
556 If there is a fill prefix, and the second of the lines being joined
557 starts with the prefix, then @code{delete-indentation} deletes the
558 fill prefix before joining the lines.  @xref{Margins}.
560 In the example below, point is located on the line starting
561 @samp{events}, and it makes no difference if there are trailing spaces
562 in the preceding line.
564 @smallexample
565 @group
566 ---------- Buffer: foo ----------
567 When in the course of human
568 @point{}    events, it becomes necessary
569 ---------- Buffer: foo ----------
570 @end group
572 (delete-indentation)
573      @result{} nil
575 @group
576 ---------- Buffer: foo ----------
577 When in the course of human@point{} events, it becomes necessary
578 ---------- Buffer: foo ----------
579 @end group
580 @end smallexample
582 After the lines are joined, the function @code{fixup-whitespace} is
583 responsible for deciding whether to leave a space at the junction.
584 @end deffn
586 @defun fixup-whitespace
587 This function replaces all the white space surrounding point with either
588 one space or no space, according to the context.  It returns @code{nil}.
590 At the beginning or end of a line, the appropriate amount of space is
591 none.  Before a character with close parenthesis syntax, or after a
592 character with open parenthesis or expression-prefix syntax, no space is
593 also appropriate.  Otherwise, one space is appropriate.  @xref{Syntax
594 Class Table}.
596 In the example below, @code{fixup-whitespace} is called the first time
597 with point before the word @samp{spaces} in the first line.  For the
598 second invocation, point is directly after the @samp{(}.
600 @smallexample
601 @group
602 ---------- Buffer: foo ----------
603 This has too many     @point{}spaces
604 This has too many spaces at the start of (@point{}   this list)
605 ---------- Buffer: foo ----------
606 @end group
608 @group
609 (fixup-whitespace)
610      @result{} nil
611 (fixup-whitespace)
612      @result{} nil
613 @end group
615 @group
616 ---------- Buffer: foo ----------
617 This has too many spaces
618 This has too many spaces at the start of (this list)
619 ---------- Buffer: foo ----------
620 @end group
621 @end smallexample
622 @end defun
624 @deffn Command just-one-space
625 @comment !!SourceFile simple.el
626 This command replaces any spaces and tabs around point with a single
627 space.  It returns @code{nil}.
628 @end deffn
630 @deffn Command delete-blank-lines
631 This function deletes blank lines surrounding point.  If point is on a
632 blank line with one or more blank lines before or after it, then all but
633 one of them are deleted.  If point is on an isolated blank line, then it
634 is deleted.  If point is on a nonblank line, the command deletes all
635 blank lines following it.
637 A blank line is defined as a line containing only tabs and spaces.
639 @code{delete-blank-lines} returns @code{nil}.
640 @end deffn
642 @node The Kill Ring
643 @section The Kill Ring
644 @cindex kill ring
646   @dfn{Kill} functions delete text like the deletion functions, but save
647 it so that the user can reinsert it by @dfn{yanking}.  Most of these
648 functions have @samp{kill-} in their name.  By contrast, the functions
649 whose names start with @samp{delete-} normally do not save text for
650 yanking (though they can still be undone); these are ``deletion''
651 functions.
653   Most of the kill commands are primarily for interactive use, and are
654 not described here.  What we do describe are the functions provided for
655 use in writing such commands.  You can use these functions to write
656 commands for killing text.  When you need to delete text for internal
657 purposes within a Lisp function, you should normally use deletion
658 functions, so as not to disturb the kill ring contents.
659 @xref{Deletion}.
661   Killed text is saved for later yanking in the @dfn{kill ring}.  This
662 is a list that holds a number of recent kills, not just the last text
663 kill.  We call this a ``ring'' because yanking treats it as having
664 elements in a cyclic order.  The list is kept in the variable
665 @code{kill-ring}, and can be operated on with the usual functions for
666 lists; there are also specialized functions, described in this section,
667 that treat it as a ring.
669   Some people think this use of the word ``kill'' is unfortunate, since
670 it refers to operations that specifically @emph{do not} destroy the
671 entities ``killed''.  This is in sharp contrast to ordinary life, in
672 which death is permanent and ``killed'' entities do not come back to
673 life.  Therefore, other metaphors have been proposed.  For example, the
674 term ``cut ring'' makes sense to people who, in pre-computer days, used
675 scissors and paste to cut up and rearrange manuscripts.  However, it
676 would be difficult to change the terminology now.
678 @menu
679 * Kill Ring Concepts::     What text looks like in the kill ring.
680 * Kill Functions::         Functions that kill text.
681 * Yank Commands::          Commands that access the kill ring.
682 * Low-Level Kill Ring::    Functions and variables for kill ring access.
683 * Internals of Kill Ring:: Variables that hold kill-ring data.
684 @end menu
686 @node Kill Ring Concepts
687 @comment  node-name,  next,  previous,  up
688 @subsection Kill Ring Concepts
690   The kill ring records killed text as strings in a list, most recent
691 first.  A short kill ring, for example, might look like this:
693 @example
694 ("some text" "a different piece of text" "even older text")
695 @end example
697 @noindent
698 When the list reaches @code{kill-ring-max} entries in length, adding a
699 new entry automatically deletes the last entry.
701   When kill commands are interwoven with other commands, each kill
702 command makes a new entry in the kill ring.  Multiple kill commands in
703 succession build up a single entry in the kill ring, which would be
704 yanked as a unit; the second and subsequent consecutive kill commands
705 add text to the entry made by the first one.
707   For yanking, one entry in the kill ring is designated the ``front'' of
708 the ring.  Some yank commands ``rotate'' the ring by designating a
709 different element as the ``front.''  But this virtual rotation doesn't
710 change the list itself---the most recent entry always comes first in the
711 list.
713 @node Kill Functions
714 @comment  node-name,  next,  previous,  up
715 @subsection Functions for Killing
717   @code{kill-region} is the usual subroutine for killing text.  Any
718 command that calls this function is a ``kill command'' (and should
719 probably have @samp{kill} in its name).  @code{kill-region} puts the
720 newly killed text in a new element at the beginning of the kill ring or
721 adds it to the most recent element.  It uses the @code{last-command}
722 variable to determine whether the previous command was a kill command,
723 and if so appends the killed text to the most recent entry.
725 @deffn Command kill-region start end
726 This function kills the text in the region defined by @var{start} and
727 @var{end}.  The text is deleted but saved in the kill ring, along with
728 its text properties.  The value is always @code{nil}.
730 In an interactive call, @var{start} and @var{end} are point and
731 the mark.
733 @c Emacs 19 feature
734 If the buffer is read-only, @code{kill-region} modifies the kill ring
735 just the same, then signals an error without modifying the buffer.  This
736 is convenient because it lets the user use all the kill commands to copy
737 text into the kill ring from a read-only buffer.
738 @end deffn
740 @deffn Command copy-region-as-kill start end
741 This command saves the region defined by @var{start} and @var{end} on
742 the kill ring (including text properties), but does not delete the text
743 from the buffer.  It returns @code{nil}.  It also indicates the extent
744 of the text copied by moving the cursor momentarily, or by displaying a
745 message in the echo area.
747 The command does not set @code{this-command} to @code{kill-region}, so a
748 subsequent kill command does not append to the same kill ring entry.
750 Don't call @code{copy-region-as-kill} in Lisp programs unless you aim to
751 support Emacs 18.  For Emacs 19, it is better to use @code{kill-new} or
752 @code{kill-append} instead.  @xref{Low-Level Kill Ring}.
753 @end deffn
755 @node Yank Commands
756 @comment  node-name,  next,  previous,  up
757 @subsection Functions for Yanking
759   @dfn{Yanking} means reinserting an entry of previously killed text
760 from the kill ring.  The text properties are copied too.
762 @deffn Command yank &optional arg
763 @cindex inserting killed text
764 This command inserts before point the text in the first entry in the
765 kill ring.  It positions the mark at the beginning of that text, and
766 point at the end.
768 If @var{arg} is a list (which occurs interactively when the user
769 types @kbd{C-u} with no digits), then @code{yank} inserts the text as
770 described above, but puts point before the yanked text and puts the mark
771 after it.
773 If @var{arg} is a number, then @code{yank} inserts the @var{arg}th most
774 recently killed text---the @var{arg}th element of the kill ring list.
776 @code{yank} does not alter the contents of the kill ring or rotate it.
777 It returns @code{nil}.
778 @end deffn
780 @deffn Command yank-pop arg
781 This command replaces the just-yanked entry from the kill ring with a
782 different entry from the kill ring.
784 This is allowed only immediately after a @code{yank} or another
785 @code{yank-pop}.  At such a time, the region contains text that was just
786 inserted by yanking.  @code{yank-pop} deletes that text and inserts in
787 its place a different piece of killed text.  It does not add the deleted
788 text to the kill ring, since it is already in the kill ring somewhere.
790 If @var{arg} is @code{nil}, then the replacement text is the previous
791 element of the kill ring.  If @var{arg} is numeric, the replacement is
792 the @var{arg}th previous kill.  If @var{arg} is negative, a more recent
793 kill is the replacement.
795 The sequence of kills in the kill ring wraps around, so that after the
796 oldest one comes the newest one, and before the newest one goes the
797 oldest.
799 The value is always @code{nil}.
800 @end deffn
802 @node Low-Level Kill Ring
803 @subsection Low-Level Kill Ring
805   These functions and variables provide access to the kill ring at a lower
806 level, but still convenient for use in Lisp programs.  They take care of
807 interaction with X Window selections.  They do not exist in Emacs
808 version 18.
810 @defun current-kill n &optional do-not-move
811 The function @code{current-kill} rotates the yanking pointer which
812 designates the ``front'' of the kill ring by @var{n} places (from newer
813 kills to older ones), and returns the text at that place in the ring.
815 If the optional second argument @var{do-not-move} is non-@code{nil},
816 then @code{current-kill} doesn't alter the yanking pointer; it just
817 returns the @var{n}th kill, counting from the current yanking pointer.
819 If @var{n} is zero, indicating a request for the latest kill,
820 @code{current-kill} calls the value of
821 @code{interprogram-paste-function} (documented below) before consulting
822 the kill ring.
823 @end defun
825 @defun kill-new string
826 This function puts the text @var{string} into the kill ring as a new
827 entry at the front of the ring.  It discards the oldest entry if
828 appropriate.  It also invokes the value of
829 @code{interprogram-cut-function} (see below).
830 @end defun
832 @defun kill-append string before-p
833 This function appends the text @var{string} to the first entry in the
834 kill ring.  Normally @var{string} goes at the end of the entry, but if
835 @var{before-p} is non-@code{nil}, it goes at the beginning.  This
836 function also invokes the value of @code{interprogram-cut-function} (see
837 below).
838 @end defun
840 @defvar interprogram-paste-function
841 This variable provides a way of transferring killed text from other
842 programs, when you are using a window system.  Its value should be
843 @code{nil} or a function of no arguments.
845 If the value is a function, @code{current-kill} calls it to get the
846 ``most recent kill''.  If the function returns a non-@code{nil} value,
847 then that value is used as the ``most recent kill''.  If it returns
848 @code{nil}, then the first element of @code{kill-ring} is used.
850 The normal use of this hook is to get the X server's primary selection
851 as the most recent kill, even if the selection belongs to another X
852 client.  @xref{X Selections}.
853 @end defvar
855 @defvar interprogram-cut-function
856 This variable provides a way of communicating killed text to other
857 programs, when you are using a window system.  Its value should be
858 @code{nil} or a function of one argument.
860 If the value is a function, @code{kill-new} and @code{kill-append} call
861 it with the new first element of the kill ring as an argument.
863 The normal use of this hook is to set the X server's primary selection
864 to the newly killed text.
865 @end defvar
867 @node Internals of Kill Ring
868 @comment  node-name,  next,  previous,  up
869 @subsection Internals of the Kill Ring
871   The variable @code{kill-ring} holds the kill ring contents, in the
872 form of a list of strings.  The most recent kill is always at the front
873 of the list. 
875   The @code{kill-ring-yank-pointer} variable points to a link in the
876 kill ring list, whose @sc{car} is the text to yank next.  We say it
877 identifies the ``front'' of the ring.  Moving
878 @code{kill-ring-yank-pointer} to a different link is called
879 @dfn{rotating the kill ring}.  We call the kill ring a ``ring'' because
880 the functions that move the yank pointer wrap around from the end of the
881 list to the beginning, or vice-versa.  Rotation of the kill ring is
882 virtual; it does not change the value of @code{kill-ring}.
884   Both @code{kill-ring} and @code{kill-ring-yank-pointer} are Lisp
885 variables whose values are normally lists.  The word ``pointer'' in the
886 name of the @code{kill-ring-yank-pointer} indicates that the variable's
887 purpose is to identify one element of the list for use by the next yank
888 command.
890   The value of @code{kill-ring-yank-pointer} is always @code{eq} to one
891 of the links in the kill ring list.  The element it identifies is the
892 @sc{car} of that link.  Kill commands, which change the kill ring, also
893 set this variable to the value of @code{kill-ring}.  The effect is to
894 rotate the ring so that the newly killed text is at the front.
896   Here is a diagram that shows the variable @code{kill-ring-yank-pointer}
897 pointing to the second entry in the kill ring @code{("some text" "a
898 different piece of text" "yet older text")}.  
900 @example
901 @group
902 kill-ring       kill-ring-yank-pointer
903   |               |
904   |     ___ ___    --->  ___ ___      ___ ___
905    --> |___|___|------> |___|___|--> |___|___|--> nil
906          |                |            |            
907          |                |            |            
908          |                |             -->"yet older text" 
909          |                |
910          |                 --> "a different piece of text" 
911          |
912           --> "some text"
913 @end group
914 @end example
916 @noindent
917 This state of affairs might occur after @kbd{C-y} (@code{yank})
918 immediately followed by @kbd{M-y} (@code{yank-pop}).
920 @defvar kill-ring
921 This variable holds the list of killed text sequences, most recently
922 killed first.
923 @end defvar
925 @defvar kill-ring-yank-pointer
926 This variable's value indicates which element of the kill ring is at the
927 ``front'' of the ring for yanking.  More precisely, the value is a tail
928 of the value of @code{kill-ring}, and its @sc{car} is the kill string
929 that @kbd{C-y} should yank.
930 @end defvar
932 @defopt kill-ring-max
933 The value of this variable is the maximum length to which the kill
934 ring can grow, before elements are thrown away at the end.  The default
935 value for @code{kill-ring-max} is 30.
936 @end defopt
938 @node Undo
939 @comment  node-name,  next,  previous,  up
940 @section Undo
941 @cindex redo
943   Most buffers have an @dfn{undo list}, which records all changes made
944 to the buffer's text so that they can be undone.  (The buffers that
945 don't have one are usually special-purpose buffers for which Emacs
946 assumes that undoing is not useful.)  All the primitives that modify the
947 text in the buffer automatically add elements to the front of the undo
948 list, which is in the variable @code{buffer-undo-list}.
950 @defvar buffer-undo-list
951 This variable's value is the undo list of the current buffer.
952 A value of @code{t} disables the recording of undo information.
953 @end defvar
955 Here are the kinds of elements an undo list can have:
957 @table @code
958 @item @var{integer}
959 This kind of element records a previous value of point.  Ordinary cursor
960 motion does not get any sort of undo record, but deletion commands use
961 these entries to record where point was before the command.
963 @item (@var{beg} . @var{end})
964 This kind of element indicates how to delete text that was inserted.
965 Upon insertion, the text occupied the range @var{beg}--@var{end} in the 
966 buffer.
968 @item (@var{text} . @var{position})
969 This kind of element indicates how to reinsert text that was deleted.
970 The deleted text itself is the string @var{text}.  The place to
971 reinsert it is @code{(abs @var{position})}.
973 @item (t @var{high} . @var{low})
974 This kind of element indicates that an unmodified buffer became
975 modified.  The elements @var{high} and @var{low} are two integers, each
976 recording 16 bits of the visited file's modification time as of when it
977 was previously visited or saved.  @code{primitive-undo} uses those
978 values to determine whether to mark the buffer as unmodified once again;
979 it does so only if the file's modification time matches those numbers.
981 @item (nil @var{property} @var{value} @var{beg} . @var{end})
982 This kind of element records a change in a text property.
983 Here's how you might undo the change:
985 @example
986 (put-text-property @var{beg} @var{end} @var{property} @var{value})
987 @end example
989 @item (@var{marker} . @var{adjustment})
990 This kind of element records the fact that the marker @var{marker} was
991 relocated due to deletion of surrounding text, and that it moved
992 @var{adjustment} character positions.  Undoing this element moves
993 @var{marker} @minus{} @var{adjustment} characters.
995 @item @var{position}
996 This element indicates where point was at an earlier time.  Undoing this
997 element sets point to @var{position}.  Deletion normally creates an
998 element of this kind as well as a reinsertion element.
1000 @item nil
1001 This element is a boundary.  The elements between two boundaries are
1002 called a @dfn{change group}; normally, each change group corresponds to
1003 one keyboard command, and undo commands normally undo an entire group as
1004 a unit.
1005 @end table
1007 @defun undo-boundary
1008 This function places a boundary element in the undo list.  The undo
1009 command stops at such a boundary, and successive undo commands undo
1010 to earlier and earlier boundaries.  This function returns @code{nil}.
1012 The editor command loop automatically creates an undo boundary before
1013 each key sequence is executed.  Thus, each undo normally undoes the
1014 effects of one command.  Self-inserting input characters are an
1015 exception.  The command loop makes a boundary for the first such
1016 character; the next 19 consecutive self-inserting input characters do
1017 not make boundaries, and then the 20th does, and so on as long as
1018 self-inserting characters continue.
1020 All buffer modifications add a boundary whenever the previous undoable
1021 change was made in some other buffer.  This way, a command that modifies
1022 several buffers makes a boundary in each buffer it changes.
1024 Calling this function explicitly is useful for splitting the effects of
1025 a command into more than one unit.  For example, @code{query-replace}
1026 calls @code{undo-boundary} after each replacement, so that the user can
1027 undo individual replacements one by one.
1028 @end defun
1030 @defun primitive-undo count list
1031 This is the basic function for undoing elements of an undo list.
1032 It undoes the first @var{count} elements of @var{list}, returning
1033 the rest of @var{list}.  You could write this function in Lisp,
1034 but it is convenient to have it in C.
1036 @code{primitive-undo} adds elements to the buffer's undo list when it
1037 changes the buffer.  Undo commands avoid confusion by saving the undo
1038 list value at the beginning of a sequence of undo operations.  Then the
1039 undo operations use and update the saved value.  The new elements added
1040 by undoing are not part of this saved value, so they don't interfere with
1041 continuing to undo.
1042 @end defun
1044 @node Maintaining Undo
1045 @section Maintaining Undo Lists
1047   This section describes how to enable and disable undo information for
1048 a given buffer.  It also explains how the undo list is truncated
1049 automatically so it doesn't get too big.
1051   Recording of undo information in a newly created buffer is normally
1052 enabled to start with; but if the buffer name starts with a space, the
1053 undo recording is initially disabled.  You can explicitly enable or
1054 disable undo recording with the following two functions, or by setting
1055 @code{buffer-undo-list} yourself.
1057 @deffn Command buffer-enable-undo &optional buffer-or-name
1058 This command enables recording undo information for buffer
1059 @var{buffer-or-name}, so that subsequent changes can be undone.  If no
1060 argument is supplied, then the current buffer is used.  This function
1061 does nothing if undo recording is already enabled in the buffer.  It
1062 returns @code{nil}.
1064 In an interactive call, @var{buffer-or-name} is the current buffer.
1065 You cannot specify any other buffer.
1066 @end deffn
1068 @defun buffer-disable-undo &optional buffer
1069 @defunx buffer-flush-undo &optional buffer
1070 @cindex disable undo
1071 This function discards the undo list of @var{buffer}, and disables
1072 further recording of undo information.  As a result, it is no longer
1073 possible to undo either previous changes or any subsequent changes.  If
1074 the undo list of @var{buffer} is already disabled, this function
1075 has no effect.
1077 This function returns @code{nil}.  It cannot be called interactively.
1079 The name @code{buffer-flush-undo} is not considered obsolete, but the
1080 preferred name @code{buffer-disable-undo} is new as of Emacs versions
1082 @end defun
1084   As editing continues, undo lists get longer and longer.  To prevent
1085 them from using up all available memory space, garbage collection trims
1086 them back to size limits you can set.  (For this purpose, the ``size''
1087 of an undo list measures the cons cells that make up the list, plus the
1088 strings of deleted text.)  Two variables control the range of acceptable
1089 sizes: @code{undo-limit} and @code{undo-strong-limit}.
1091 @defvar undo-limit
1092 This is the soft limit for the acceptable size of an undo list.  The
1093 change group at which this size is exceeded is the last one kept.
1094 @end defvar
1096 @defvar undo-strong-limit
1097 This is the upper limit for the acceptable size of an undo list.  The
1098 change group at which this size is exceeded is discarded itself (along
1099 with all older change groups).  There is one exception: the very latest
1100 change group is never discarded no matter how big it is.
1101 @end defvar
1103 @node Filling
1104 @comment  node-name,  next,  previous,  up
1105 @section Filling
1106 @cindex filling, explicit
1108   @dfn{Filling} means adjusting the lengths of lines (by moving the line
1109 breaks) so that they are nearly (but no greater than) a specified
1110 maximum width.  Additionally, lines can be @dfn{justified}, which means
1111 inserting spaces to make the left and/or right margins line up
1112 precisely.  The width is controlled by the variable @code{fill-column}.
1113 For ease of reading, lines should be no longer than 70 or so columns.
1115   You can use Auto Fill mode (@pxref{Auto Filling}) to fill text
1116 automatically as you insert it, but changes to existing text may leave
1117 it improperly filled.  Then you must fill the text explicitly.
1119   Most of the commands in this section return values that are not
1120 meaningful.  All the functions that do filling take note of the current
1121 left margin, current right margin, and current justification style
1122 (@pxref{Margins}).  If the current justification style is
1123 @code{none}, the filling functions don't actually do anything.
1125   Several of the filling functions have an argument @var{justify}.
1126 If it is non-@code{nil}, that requests some kind of justification.  It
1127 can be @code{left}, @code{right}, @code{full}, or @code{center}, to
1128 request a specific style of justification.  If it is @code{t}, that
1129 means to use the current justification style for this part of the text
1130 (see @code{current-justification}, below).
1132   When you call the filling functions interactively, using a prefix
1133 argument implies the value @code{full} for @var{justify}.
1135 @deffn Command fill-paragraph justify
1136 @cindex filling a paragraph
1137 This command fills the paragraph at or after point.  If
1138 @var{justify} is non-@code{nil}, each line is justified as well.
1139 It uses the ordinary paragraph motion commands to find paragraph
1140 boundaries.  @xref{Paragraphs,,, emacs, The Emacs Manual}.
1141 @end deffn
1143 @deffn Command fill-region start end &optional justify
1144 This command fills each of the paragraphs in the region from @var{start}
1145 to @var{end}.  It justifies as well if @var{justify} is
1146 non-@code{nil}.
1148 The variable @code{paragraph-separate} controls how to distinguish
1149 paragraphs.  @xref{Standard Regexps}.
1150 @end deffn
1152 @deffn Command fill-individual-paragraphs start end &optional justify mail-flag
1153 This command fills each paragraph in the region according to its
1154 individual fill prefix.  Thus, if the lines of a paragraph were indented
1155 with spaces, the filled paragraph will remain indented in the same
1156 fashion.
1158 The first two arguments, @var{start} and @var{end}, are the beginning
1159 and end of the region to be filled.  The third and fourth arguments,
1160 @var{justify} and @var{mail-flag}, are optional.  If
1161 @var{justify} is non-@code{nil}, the paragraphs are justified as
1162 well as filled.  If @var{mail-flag} is non-@code{nil}, it means the
1163 function is operating on a mail message and therefore should not fill
1164 the header lines.
1166 Ordinarily, @code{fill-individual-paragraphs} regards each change in
1167 indentation as starting a new paragraph.  If
1168 @code{fill-individual-varying-indent} is non-@code{nil}, then only
1169 separator lines separate paragraphs.  That mode can handle indented
1170 paragraphs with additional indentation on the first line.
1171 @end deffn
1173 @defopt fill-individual-varying-indent
1174 This variable alters the action of @code{fill-individual-paragraphs} as
1175 described above.
1176 @end defopt
1178 @deffn Command fill-region-as-paragraph start end &optional justify
1179 This command considers a region of text as a paragraph and fills it.  If
1180 the region was made up of many paragraphs, the blank lines between
1181 paragraphs are removed.  This function justifies as well as filling when
1182 @var{justify} is non-@code{nil}.
1184 In an interactive call, any prefix argument requests justification.
1186 In Adaptive Fill mode, which is enabled by default,
1187 @code{fill-region-as-paragraph} on an indented paragraph when there is
1188 no fill prefix uses the indentation of the second line of the paragraph
1189 as the fill prefix.
1190 @end deffn
1192 @deffn Command justify-current-line how eop nosqueeze
1193 This command inserts spaces between the words of the current line so
1194 that the line ends exactly at @code{fill-column}.  It returns
1195 @code{nil}.
1197 The argument @var{how}, if non-@code{nil} specifies explicitly the style
1198 of justification.  It can be @code{left}, @code{right}, @code{full},
1199 @code{center}, or @code{none}.  If it is @code{t}, that means to do
1200 follow specified justification style (see @code{current-justification},
1201 below).  @code{nil} means to do full justification.
1203 If @var{eop} is non-@code{nil}, that means do left-justification when
1204 @code{current-justification} specifies full justification.  This is used
1205 for the last line of a paragraph; even if the paragraph as a whole is
1206 fully justified, the last line should not be.
1208 If @var{nosqueeze} is non-@code{nil}, that means do not change interior
1209 whitespace.
1210 @end deffn
1212 @defopt default-justification
1213 This variable's value specifies the style of justification to use for
1214 text that doesn't specify a style with a text property.  The possible
1215 values are @code{left}, @code{right}, @code{full}, @code{center}, or
1216 @code{none}.  The default value is @code{left}.
1217 @end defopt
1219 @defun current-justification
1220 This function returns the proper justification style to use for filling
1221 the text around point.
1222 @end defun
1224 @defvar fill-paragraph-function
1225 This variable provides a way for major modes to override the filling of
1226 paragraphs.  If the value is non-@code{nil}, @code{fill-paragraph} calls
1227 this function to do the work.  If the function returns a non-@code{nil}
1228 value, @code{fill-paragraph} assumes the job is done, and immediately
1229 returns that value.
1231 The usual use of this feature is to fill comments in programming
1232 language modes.  If the function needs to fill a paragraph in the usual
1233 way, it can do so as follows:
1235 @example
1236 (let ((fill-paragraph-function nil))
1237   (fill-paragraph arg))
1238 @end example
1239 @end defvar
1241 @defvar use-hard-newlines
1242 If this variable is non-@code{nil}, the filling functions do not delete
1243 newlines that have the @code{hard} text property.  These ``hard
1244 newlines'' act as paragraph separators.
1245 @end defvar
1247 @node Margins
1248 @section Margins for Filling
1250 @defopt fill-prefix
1251 This variable specifies a string of text that appears at the beginning
1252 of normal text lines and should be disregarded when filling them.  Any
1253 line that fails to start with the fill prefix is considered the start of
1254 a paragraph; so is any line that starts with the fill prefix followed by
1255 additional whitespace.  Lines that start with the fill prefix but no
1256 additional whitespace are ordinary text lines that can be filled
1257 together.  The resulting filled lines also start with the fill prefix.
1259 The fill prefix follows the left margin whitespace, if any.
1260 @end defopt
1262 @defopt fill-column
1263 This buffer-local variable specifies the maximum width of filled
1264 lines.  Its value should be an integer, which is a number of columns.
1265 All the filling, justification and centering commands are affected by
1266 this variable, including Auto Fill mode (@pxref{Auto Filling}).
1268 As a practical matter, if you are writing text for other people to
1269 read, you should set @code{fill-column} to no more than 70.  Otherwise
1270 the line will be too long for people to read comfortably, and this can
1271 make the text seem clumsy.
1272 @end defopt
1274 @defvar default-fill-column
1275 The value of this variable is the default value for @code{fill-column} in
1276 buffers that do not override it.  This is the same as
1277 @code{(default-value 'fill-column)}.
1279 The default value for @code{default-fill-column} is 70.
1280 @end defvar
1282 @deffn Command set-left-margin from to margin
1283 This sets the @code{left-margin} property on the text from @var{from} to
1284 @var{to} to the value @var{margin}.  If Auto Fill mode is enabled, this
1285 command also refills the region to fit the new margin.
1286 @end deffn
1288 @deffn Command set-right-margin from to margin
1289 This sets the @code{right-margin} property on the text from @var{from}
1290 to @var{to} to the value @var{margin}.  If Auto Fill mode is enabled,
1291 this command also refills the region to fit the new margin.
1292 @end deffn
1294 @defun current-left-margin
1295 This function returns the proper left margin value to use for filling
1296 the text around point.  The value is the sum of the @code{left-margin}
1297 property of the character at the start of the current line (or zero if
1298 none), and the value of the variable @code{left-margin}.
1299 @end defun
1301 @defun current-fill-column
1302 This function returns the proper fill column value to use for filling
1303 the text around point.  The value is the value of the @code{fill-column}
1304 variable, minus the value of the @code{right-margin} property of the
1305 character after point.
1306 @end defun
1308 @deffn Command move-to-left-margin &optional n force
1309 This function moves point to the left margin of the current line.  The
1310 column moved to is determined by calling the function
1311 @code{current-left-margin}.  If the argument @var{n} is non-@code{nil},
1312 @code{move-to-left-margin} moves forward @var{n}@minus{}1 lines first.
1314 If @var{force} is non-@code{nil}, that says to fix the line's
1315 indentation if that doesn't match the left margin value.
1316 @end deffn
1318 @defun delete-to-left-margin from to
1319 This function removes left margin indentation from the text
1320 between @var{from} and @var{to}.  The amount of indentation
1321 to delete is determined by calling @code{current-left-margin}.
1322 In no case does this function delete non-whitespace.
1323 @end defun
1325 @defun indent-to-left-margin
1326 This is the default @code{indent-line-function}, used in Fundamental
1327 mode, Text mode, etc.  Its effect is to adjust the indentation at the
1328 beginning of the current line to the value specified by the variable
1329 @code{left-margin}.  This may involve either inserting or deleting
1330 whitespace.
1331 @end defun
1333 @defvar left-margin
1334 This variable specifies the base left margin column.  In Fundamental
1335 mode, @key{LFD} indents to this column.  This variable automatically
1336 becomes buffer-local when set in any fashion.
1337 @end defvar
1339 @node Auto Filling
1340 @comment  node-name,  next,  previous,  up
1341 @section Auto Filling
1342 @cindex filling, automatic
1343 @cindex Auto Fill mode
1345   Auto Fill mode is a minor mode that fills lines automatically as text
1346 is inserted.  This section describes the hook used by Auto Fill mode.
1347 For a description of functions that you can call explicitly to fill and
1348 justify existing text, see @ref{Filling}.
1350   Auto Fill mode also enables the functions that change the margins and
1351 justification style to refill portions of the text.  @xref{Margins}.
1353 @defvar auto-fill-function
1354 The value of this variable should be a function (of no arguments) to be
1355 called after self-inserting a space or a newline.  It may be @code{nil},
1356 in which case nothing special is done in that case.
1358 The value of @code{auto-fill-function} is @code{do-auto-fill} when
1359 Auto-Fill mode is enabled.  That is a function whose sole purpose is to
1360 implement the usual strategy for breaking a line.
1362 @quotation
1363 In older Emacs versions, this variable was named @code{auto-fill-hook},
1364 but since it is not called with the standard convention for hooks, it
1365 was renamed to @code{auto-fill-function} in version 19.
1366 @end quotation
1367 @end defvar
1369 @node Sorting
1370 @section Sorting Text
1371 @cindex sorting text
1373   The sorting functions described in this section all rearrange text in
1374 a buffer.  This is in contrast to the function @code{sort}, which
1375 rearranges the order of the elements of a list (@pxref{Rearrangement}).
1376 The values returned by these functions are not meaningful.
1378 @defun sort-subr reverse nextrecfun endrecfun &optional startkeyfun endkeyfun
1379 This function is the general text-sorting routine that divides a buffer
1380 into records and sorts them.  Most of the commands in this section use
1381 this function.
1383 To understand how @code{sort-subr} works, consider the whole accessible
1384 portion of the buffer as being divided into disjoint pieces called
1385 @dfn{sort records}.  The records may or may not be contiguous; they may
1386 not overlap.  A portion of each sort record (perhaps all of it) is
1387 designated as the sort key.  Sorting rearranges the records in order by
1388 their sort keys.
1390 Usually, the records are rearranged in order of ascending sort key.
1391 If the first argument to the @code{sort-subr} function, @var{reverse},
1392 is non-@code{nil}, the sort records are rearranged in order of
1393 descending sort key.
1395 The next four arguments to @code{sort-subr} are functions that are
1396 called to move point across a sort record.  They are called many times
1397 from within @code{sort-subr}.
1399 @enumerate
1400 @item
1401 @var{nextrecfun} is called with point at the end of a record.  This
1402 function moves point to the start of the next record.  The first record
1403 is assumed to start at the position of point when @code{sort-subr} is
1404 called.  Therefore, you should usually move point to the beginning of
1405 the buffer before calling @code{sort-subr}.
1407 This function can indicate there are no more sort records by leaving
1408 point at the end of the buffer.
1410 @item
1411 @var{endrecfun} is called with point within a record.  It moves point to
1412 the end of the record.
1414 @item
1415 @var{startkeyfun} is called to move point from the start of a record to
1416 the start of the sort key.  This argument is optional; if it is omitted,
1417 the whole record is the sort key.  If supplied, the function should
1418 either return a non-@code{nil} value to be used as the sort key, or
1419 return @code{nil} to indicate that the sort key is in the buffer
1420 starting at point.  In the latter case, @var{endkeyfun} is called to
1421 find the end of the sort key.
1423 @item
1424 @var{endkeyfun} is called to move point from the start of the sort key
1425 to the end of the sort key.  This argument is optional.  If
1426 @var{startkeyfun} returns @code{nil} and this argument is omitted (or
1427 @code{nil}), then the sort key extends to the end of the record.  There
1428 is no need for @var{endkeyfun} if @var{startkeyfun} returns a
1429 non-@code{nil} value.
1430 @end enumerate
1432 As an example of @code{sort-subr}, here is the complete function
1433 definition for @code{sort-lines}:
1435 @example
1436 @group
1437 ;; @r{Note that the first two lines of doc string}
1438 ;; @r{are effectively one line when viewed by a user.}
1439 (defun sort-lines (reverse beg end)
1440   "Sort lines in region alphabetically.
1441 Called from a program, there are three arguments:
1442 @end group
1443 @group
1444 REVERSE (non-nil means reverse order),
1445 and BEG and END (the region to sort)."
1446   (interactive "P\nr")
1447   (save-restriction
1448     (narrow-to-region beg end)
1449     (goto-char (point-min))
1450     (sort-subr reverse
1451                'forward-line
1452                'end-of-line)))
1453 @end group
1454 @end example
1456 Here @code{forward-line} moves point to the start of the next record,
1457 and @code{end-of-line} moves point to the end of record.  We do not pass
1458 the arguments @var{startkeyfun} and @var{endkeyfun}, because the entire
1459 record is used as the sort key.
1461 The @code{sort-paragraphs} function is very much the same, except that
1462 its @code{sort-subr} call looks like this:
1464 @example
1465 @group
1466 (sort-subr reverse
1467            (function 
1468             (lambda () 
1469               (skip-chars-forward "\n \t\f")))
1470            'forward-paragraph)
1471 @end group
1472 @end example
1473 @end defun
1475 @deffn Command sort-regexp-fields reverse record-regexp key-regexp start end
1476 This command sorts the region between @var{start} and @var{end}
1477 alphabetically as specified by @var{record-regexp} and @var{key-regexp}.
1478 If @var{reverse} is a negative integer, then sorting is in reverse
1479 order.
1481 Alphabetical sorting means that two sort keys are compared by
1482 comparing the first characters of each, the second characters of each,
1483 and so on.  If a mismatch is found, it means that the sort keys are
1484 unequal; the sort key whose character is less at the point of first
1485 mismatch is the lesser sort key.  The individual characters are compared
1486 according to their numerical values.  Since Emacs uses the @sc{ASCII}
1487 character set, the ordering in that set determines alphabetical order.
1488 @c version 19 change
1490 The value of the @var{record-regexp} argument specifies how to divide
1491 the buffer into sort records.  At the end of each record, a search is
1492 done for this regular expression, and the text that matches it is the
1493 next record.  For example, the regular expression @samp{^.+$}, which
1494 matches lines with at least one character besides a newline, would make
1495 each such line into a sort record.  @xref{Regular Expressions}, for a
1496 description of the syntax and meaning of regular expressions.
1498 The value of the @var{key-regexp} argument specifies what part of each
1499 record is the sort key.  The @var{key-regexp} could match the whole
1500 record, or only a part.  In the latter case, the rest of the record has
1501 no effect on the sorted order of records, but it is carried along when
1502 the record moves to its new position.
1504 The @var{key-regexp} argument can refer to the text matched by a
1505 subexpression of @var{record-regexp}, or it can be a regular expression
1506 on its own.
1508 If @var{key-regexp} is:
1510 @table @asis
1511 @item @samp{\@var{digit}}
1512 then the text matched by the @var{digit}th @samp{\(...\)} parenthesis
1513 grouping in @var{record-regexp} is the sort key.
1515 @item @samp{\&}
1516 then the whole record is the sort key.
1518 @item a regular expression
1519 then @code{sort-regexp-fields} searches for a match for the regular
1520 expression within the record.  If such a match is found, it is the sort
1521 key.  If there is no match for @var{key-regexp} within a record then
1522 that record is ignored, which means its position in the buffer is not
1523 changed.  (The other records may move around it.)
1524 @end table
1526 For example, if you plan to sort all the lines in the region by the
1527 first word on each line starting with the letter @samp{f}, you should
1528 set @var{record-regexp} to @samp{^.*$} and set @var{key-regexp} to
1529 @samp{\<f\w*\>}.  The resulting expression looks like this:
1531 @example
1532 @group
1533 (sort-regexp-fields nil "^.*$" "\\<f\\w*\\>"
1534                     (region-beginning)
1535                     (region-end))
1536 @end group
1537 @end example
1539 If you call @code{sort-regexp-fields} interactively, it prompts for
1540 @var{record-regexp} and @var{key-regexp} in the minibuffer.
1541 @end deffn
1543 @deffn Command sort-lines reverse start end
1544 This command alphabetically sorts lines in the region between
1545 @var{start} and @var{end}.  If @var{reverse} is non-@code{nil}, the sort
1546 is in reverse order.
1547 @end deffn
1549 @deffn Command sort-paragraphs reverse start end
1550 This command alphabetically sorts paragraphs in the region between
1551 @var{start} and @var{end}.  If @var{reverse} is non-@code{nil}, the sort
1552 is in reverse order.
1553 @end deffn
1555 @deffn Command sort-pages reverse start end
1556 This command alphabetically sorts pages in the region between
1557 @var{start} and @var{end}.  If @var{reverse} is non-@code{nil}, the sort
1558 is in reverse order.
1559 @end deffn
1561 @deffn Command sort-fields field start end
1562 This command sorts lines in the region between @var{start} and
1563 @var{end}, comparing them alphabetically by the @var{field}th field
1564 of each line.  Fields are separated by whitespace and numbered starting
1565 from 1.  If @var{field} is negative, sorting is by the
1566 @w{@minus{}@var{field}th} field from the end of the line.  This command
1567 is useful for sorting tables.
1568 @end deffn
1570 @deffn Command sort-numeric-fields field start end
1571 This command sorts lines in the region between @var{start} and
1572 @var{end}, comparing them numerically by the @var{field}th field of each
1573 line.  The specified field must contain a number in each line of the
1574 region.  Fields are separated by whitespace and numbered starting from
1575 1.  If @var{field} is negative, sorting is by the
1576 @w{@minus{}@var{field}th} field from the end of the line.  This command
1577 is useful for sorting tables.
1578 @end deffn
1580 @deffn Command sort-columns reverse &optional beg end
1581 This command sorts the lines in the region between @var{beg} and
1582 @var{end}, comparing them alphabetically by a certain range of columns.
1583 The column positions of @var{beg} and @var{end} bound the range of
1584 columns to sort on.
1586 If @var{reverse} is non-@code{nil}, the sort is in reverse order.
1588 One unusual thing about this command is that the entire line
1589 containing position @var{beg}, and the entire line containing position
1590 @var{end}, are included in the region sorted.
1592 Note that @code{sort-columns} uses the @code{sort} utility program,
1593 and so cannot work properly on text containing tab characters.  Use
1594 @kbd{M-x @code{untabify}} to convert tabs to spaces before sorting.
1595 @end deffn
1597 @node Columns
1598 @comment  node-name,  next,  previous,  up
1599 @section Counting Columns
1600 @cindex columns
1601 @cindex counting columns
1602 @cindex horizontal position
1604   The column functions convert between a character position (counting
1605 characters from the beginning of the buffer) and a column position
1606 (counting screen characters from the beginning of a line).
1608   A character counts according to the number of columns it occupies on
1609 the screen.  This means control characters count as occupying 2 or 4
1610 columns, depending upon the value of @code{ctl-arrow}, and tabs count as
1611 occupying a number of columns that depends on the value of
1612 @code{tab-width} and on the column where the tab begins.  @xref{Usual Display}.
1614   Column number computations ignore the width of the window and the
1615 amount of horizontal scrolling.  Consequently, a column value can be
1616 arbitrarily high.  The first (or leftmost) column is numbered 0.
1618 @defun current-column
1619 This function returns the horizontal position of point, measured in
1620 columns, counting from 0 at the left margin.  The column position is the
1621 sum of the widths of all the displayed representations of the characters
1622 between the start of the current line and point.
1624 For an example of using @code{current-column}, see the description of
1625 @code{count-lines} in @ref{Text Lines}.
1626 @end defun
1628 @defun move-to-column column &optional force
1629 This function moves point to @var{column} in the current line.  The
1630 calculation of @var{column} takes into account the widths of the
1631 displayed representations of the characters between the start of the
1632 line and point.
1634 If column @var{column} is beyond the end of the line, point moves to the
1635 end of the line.  If @var{column} is negative, point moves to the
1636 beginning of the line.
1638 If it is impossible to move to column @var{column} because that is in
1639 the middle of a multicolumn character such as a tab, point moves to the
1640 end of that character.  However, if @var{force} is non-@code{nil}, and
1641 @var{column} is in the middle of a tab, then @code{move-to-column}
1642 converts the tab into spaces so that it can move precisely to column
1643 @var{column}.  Other multicolumn characters can cause anomalies despite
1644 @var{force}, since there is no way to split them.
1646 The argument @var{force} also has an effect if the line isn't long
1647 enough to reach column @var{column}; in that case, it says to add
1648 whitespace at the end of the line to reach that column.
1650 If @var{column} is not an integer, an error is signaled.
1652 The return value is the column number actually moved to.
1653 @end defun
1655 @node Indentation
1656 @section Indentation
1657 @cindex indentation
1659   The indentation functions are used to examine, move to, and change
1660 whitespace that is at the beginning of a line.  Some of the functions
1661 can also change whitespace elsewhere on a line.  Columns and indentation
1662 count from zero at the left margin.
1664 @menu
1665 * Primitive Indent::      Functions used to count and insert indentation.
1666 * Mode-Specific Indent::  Customize indentation for different modes.
1667 * Region Indent::         Indent all the lines in a region.
1668 * Relative Indent::       Indent the current line based on previous lines.
1669 * Indent Tabs::           Adjustable, typewriter-like tab stops.
1670 * Motion by Indent::      Move to first non-blank character.
1671 @end menu
1673 @node Primitive Indent
1674 @subsection Indentation Primitives
1676   This section describes the primitive functions used to count and
1677 insert indentation.  The functions in the following sections use these
1678 primitives.
1680 @defun current-indentation
1681 @comment !!Type Primitive Function
1682 @comment !!SourceFile indent.c
1683 This function returns the indentation of the current line, which is
1684 the horizontal position of the first nonblank character.  If the
1685 contents are entirely blank, then this is the horizontal position of the
1686 end of the line.
1687 @end defun
1689 @deffn Command indent-to column &optional minimum
1690 @comment !!Type Primitive Function
1691 @comment !!SourceFile indent.c
1692 This function indents from point with tabs and spaces until @var{column}
1693 is reached.  If @var{minimum} is specified and non-@code{nil}, then at
1694 least that many spaces are inserted even if this requires going beyond
1695 @var{column}.  Otherwise the function does nothing if point is already
1696 beyond @var{column}.  The value is the column at which the inserted
1697 indentation ends.
1699 The inserted whitespace characters inherit text properties from the
1700 surrounding text (usually, from the preceding text only).  @xref{Sticky
1701 Properties}.
1702 @end deffn
1704 @defopt indent-tabs-mode
1705 @comment !!SourceFile indent.c
1706 If this variable is non-@code{nil}, indentation functions can insert
1707 tabs as well as spaces.  Otherwise, they insert only spaces.  Setting
1708 this variable automatically makes it local to the current buffer.
1709 @end defopt
1711 @node Mode-Specific Indent
1712 @subsection Indentation Controlled by Major Mode
1714   An important function of each major mode is to customize the @key{TAB}
1715 key to indent properly for the language being edited.  This section
1716 describes the mechanism of the @key{TAB} key and how to control it.
1717 The functions in this section return unpredictable values.
1719 @defvar indent-line-function
1720 This variable's value is the function to be used by @key{TAB} (and
1721 various commands) to indent the current line.  The command
1722 @code{indent-according-to-mode} does no more than call this function.
1724 In Lisp mode, the value is the symbol @code{lisp-indent-line}; in C
1725 mode, @code{c-indent-line}; in Fortran mode, @code{fortran-indent-line}.
1726 In Fundamental mode, Text mode, and many other modes with no standard
1727 for indentation, the value is @code{indent-to-left-margin} (which is the
1728 default value).
1729 @end defvar
1731 @deffn Command indent-according-to-mode
1732 This command calls the function in @code{indent-line-function} to
1733 indent the current line in a way appropriate for the current major mode.
1734 @end deffn
1736 @deffn Command indent-for-tab-command
1737 This command calls the function in @code{indent-line-function} to indent
1738 the current line; except that if that function is
1739 @code{indent-to-left-margin}, it calls @code{insert-tab} instead.  (That
1740 is a trivial command that inserts a tab character.)
1741 @end deffn
1743 @deffn Command newline-and-indent
1744 @comment !!SourceFile simple.el
1745 This function inserts a newline, then indents the new line (the one
1746 following the newline just inserted) according to the major mode.
1748 It does indentation by calling the current @code{indent-line-function}.
1749 In programming language modes, this is the same thing @key{TAB} does,
1750 but in some text modes, where @key{TAB} inserts a tab,
1751 @code{newline-and-indent} indents to the column specified by
1752 @code{left-margin}.
1753 @end deffn
1755 @deffn Command reindent-then-newline-and-indent
1756 @comment !!SourceFile simple.el
1757 This command reindents the current line, inserts a newline at point,
1758 and then reindents the new line (the one following the newline just
1759 inserted).
1761 This command does indentation on both lines according to the current
1762 major mode, by calling the current value of @code{indent-line-function}.
1763 In programming language modes, this is the same thing @key{TAB} does,
1764 but in some text modes, where @key{TAB} inserts a tab,
1765 @code{reindent-then-newline-and-indent} indents to the column specified
1766 by @code{left-margin}.
1767 @end deffn
1769 @node Region Indent
1770 @subsection Indenting an Entire Region
1772   This section describes commands that indent all the lines in the
1773 region.  They return unpredictable values.
1775 @deffn Command indent-region start end to-column
1776 This command indents each nonblank line starting between @var{start}
1777 (inclusive) and @var{end} (exclusive).  If @var{to-column} is
1778 @code{nil}, @code{indent-region} indents each nonblank line by calling
1779 the current mode's indentation function, the value of
1780 @code{indent-line-function}.
1782 If @var{to-column} is non-@code{nil}, it should be an integer
1783 specifying the number of columns of indentation; then this function
1784 gives each line exactly that much indentation, by either adding or
1785 deleting whitespace.
1787 If there is a fill prefix, @code{indent-region} indents each line
1788 by making it start with the fill prefix.
1789 @end deffn
1791 @defvar indent-region-function
1792 The value of this variable is a function that can be used by
1793 @code{indent-region} as a short cut.  You should design the function so
1794 that it will produce the same results as indenting the lines of the
1795 region one by one, but presumably faster.
1797 If the value is @code{nil}, there is no short cut, and
1798 @code{indent-region} actually works line by line.
1800 A short-cut function is useful in modes such as C mode and Lisp mode,
1801 where the @code{indent-line-function} must scan from the beginning of
1802 the function definition: applying it to each line would be quadratic in
1803 time.  The short cut can update the scan information as it moves through
1804 the lines indenting them; this takes linear time.  In a mode where
1805 indenting a line individually is fast, there is no need for a short cut.
1807 @code{indent-region} with a non-@code{nil} argument @var{to-column} has
1808 a different meaning and does not use this variable.
1809 @end defvar
1811 @deffn Command indent-rigidly start end count
1812 @comment !!SourceFile indent.el
1813 This command indents all lines starting between @var{start}
1814 (inclusive) and @var{end} (exclusive) sideways by @var{count} columns.
1815 This ``preserves the shape'' of the affected region, moving it as a
1816 rigid unit.  Consequently, this command is useful not only for indenting
1817 regions of unindented text, but also for indenting regions of formatted
1818 code.
1820 For example, if @var{count} is 3, this command adds 3 columns of
1821 indentation to each of the lines beginning in the region specified.
1823 In Mail mode, @kbd{C-c C-y} (@code{mail-yank-original}) uses
1824 @code{indent-rigidly} to indent the text copied from the message being
1825 replied to.
1826 @end deffn
1828 @defun indent-code-rigidly start end columns &optional nochange-regexp
1829 This is like @code{indent-rigidly}, except that it doesn't alter lines
1830 that start within strings or comments.
1832 In addition, it doesn't alter a line if @var{nochange-regexp} matches at
1833 the beginning of the line (if @var{nochange-regexp} is non-@code{nil}).
1834 @end defun
1836 @node Relative Indent
1837 @subsection Indentation Relative to Previous Lines
1839   This section describes two commands that indent the current line
1840 based on the contents of previous lines.
1842 @deffn Command indent-relative &optional unindented-ok
1843 This command inserts whitespace at point, extending to the same
1844 column as the next @dfn{indent point} of the previous nonblank line.  An
1845 indent point is a non-whitespace character following whitespace.  The
1846 next indent point is the first one at a column greater than the current
1847 column of point.  For example, if point is underneath and to the left of
1848 the first non-blank character of a line of text, it moves to that column
1849 by inserting whitespace.
1851 If the previous nonblank line has no next indent point (i.e., none at a
1852 great enough column position), @code{indent-relative} either does
1853 nothing (if @var{unindented-ok} is non-@code{nil}) or calls
1854 @code{tab-to-tab-stop}.  Thus, if point is underneath and to the right
1855 of the last column of a short line of text, this command ordinarily
1856 moves point to the next tab stop by inserting whitespace.
1858 The return value of @code{indent-relative} is unpredictable.
1860 In the following example, point is at the beginning of the second
1861 line:
1863 @example
1864 @group
1865             This line is indented twelve spaces.
1866 @point{}The quick brown fox jumped.
1867 @end group
1868 @end example
1870 @noindent
1871 Evaluation of the expression @code{(indent-relative nil)} produces the
1872 following:
1874 @example
1875 @group
1876             This line is indented twelve spaces.
1877             @point{}The quick brown fox jumped.
1878 @end group
1879 @end example
1881   In this example, point is between the @samp{m} and @samp{p} of
1882 @samp{jumped}:
1884 @example
1885 @group
1886             This line is indented twelve spaces.
1887 The quick brown fox jum@point{}ped.
1888 @end group
1889 @end example
1891 @noindent
1892 Evaluation of the expression @code{(indent-relative nil)} produces the
1893 following:
1895 @example
1896 @group
1897             This line is indented twelve spaces.
1898 The quick brown fox jum  @point{}ped.
1899 @end group
1900 @end example
1901 @end deffn
1903 @deffn Command indent-relative-maybe
1904 @comment !!SourceFile indent.el
1905 This command indents the current line like the previous nonblank line.
1906 It calls @code{indent-relative} with @code{t} as the @var{unindented-ok}
1907 argument.  The return value is unpredictable.
1909 If the previous nonblank line has no indent points beyond the current
1910 column, this command does nothing.
1911 @end deffn
1913 @node Indent Tabs
1914 @comment  node-name,  next,  previous,  up
1915 @subsection Adjustable ``Tab Stops''
1916 @cindex tabs stops for indentation
1918   This section explains the mechanism for user-specified ``tab stops''
1919 and the mechanisms that use and set them.  The name ``tab stops'' is
1920 used because the feature is similar to that of the tab stops on a
1921 typewriter.  The feature works by inserting an appropriate number of
1922 spaces and tab characters to reach the next tab stop column; it does not
1923 affect the display of tab characters in the buffer (@pxref{Usual
1924 Display}).  Note that the @key{TAB} character as input uses this tab
1925 stop feature only in a few major modes, such as Text mode.
1927 @deffn Command tab-to-tab-stop
1928 This command inserts spaces or tabs up to the next tab stop column
1929 defined by @code{tab-stop-list}.  It searches the list for an element
1930 greater than the current column number, and uses that element as the
1931 column to indent to.  It does nothing if no such element is found.
1932 @end deffn
1934 @defopt tab-stop-list
1935 This variable is the list of tab stop columns used by
1936 @code{tab-to-tab-stops}.  The elements should be integers in increasing
1937 order.  The tab stop columns need not be evenly spaced.
1939 Use @kbd{M-x edit-tab-stops} to edit the location of tab stops
1940 interactively.
1941 @end defopt
1943 @node Motion by Indent
1944 @subsection Indentation-Based Motion Commands
1946   These commands, primarily for interactive use, act based on the
1947 indentation in the text.
1949 @deffn Command back-to-indentation 
1950 @comment !!SourceFile simple.el
1951 This command moves point to the first non-whitespace character in the
1952 current line (which is the line in which point is located).  It returns
1953 @code{nil}.
1954 @end deffn
1956 @deffn Command backward-to-indentation arg
1957 @comment !!SourceFile simple.el
1958 This command moves point backward @var{arg} lines and then to the
1959 first nonblank character on that line.  It returns @code{nil}.
1960 @end deffn
1962 @deffn Command forward-to-indentation arg
1963 @comment !!SourceFile simple.el
1964 This command moves point forward @var{arg} lines and then to the first
1965 nonblank character on that line.  It returns @code{nil}.
1966 @end deffn
1968 @node Case Changes
1969 @comment  node-name,  next,  previous,  up
1970 @section Case Changes
1971 @cindex case changes
1973   The case change commands described here work on text in the current
1974 buffer.  @xref{Character Case}, for case conversion commands that work
1975 on strings and characters.  @xref{Case Table}, for how to customize
1976 which characters are upper or lower case and how to convert them.
1978 @deffn Command capitalize-region start end
1979 This function capitalizes all words in the region defined by
1980 @var{start} and @var{end}.  To capitalize means to convert each word's
1981 first character to upper case and convert the rest of each word to lower
1982 case.  The function returns @code{nil}.
1984 If one end of the region is in the middle of a word, the part of the
1985 word within the region is treated as an entire word.
1987 When @code{capitalize-region} is called interactively, @var{start} and
1988 @var{end} are point and the mark, with the smallest first.
1990 @example
1991 @group
1992 ---------- Buffer: foo ----------
1993 This is the contents of the 5th foo.
1994 ---------- Buffer: foo ----------
1995 @end group
1997 @group
1998 (capitalize-region 1 44)
1999 @result{} nil
2001 ---------- Buffer: foo ----------
2002 This Is The Contents Of The 5th Foo.
2003 ---------- Buffer: foo ----------
2004 @end group
2005 @end example
2006 @end deffn
2008 @deffn Command downcase-region start end
2009 This function converts all of the letters in the region defined by
2010 @var{start} and @var{end} to lower case.  The function returns
2011 @code{nil}.
2013 When @code{downcase-region} is called interactively, @var{start} and
2014 @var{end} are point and the mark, with the smallest first.
2015 @end deffn
2017 @deffn Command upcase-region start end
2018 This function converts all of the letters in the region defined by
2019 @var{start} and @var{end} to upper case.  The function returns
2020 @code{nil}.
2022 When @code{upcase-region} is called interactively, @var{start} and
2023 @var{end} are point and the mark, with the smallest first.
2024 @end deffn
2026 @deffn Command capitalize-word count
2027 This function capitalizes @var{count} words after point, moving point
2028 over as it does.  To capitalize means to convert each word's first
2029 character to upper case and convert the rest of each word to lower case.
2030 If @var{count} is negative, the function capitalizes the
2031 @minus{}@var{count} previous words but does not move point.  The value
2032 is @code{nil}.
2034 If point is in the middle of a word, the part of the word before point
2035 is ignored when moving forward.  The rest is treated as an entire word.
2037 When @code{capitalize-word} is called interactively, @var{count} is
2038 set to the numeric prefix argument.
2039 @end deffn
2041 @deffn Command downcase-word count
2042 This function converts the @var{count} words after point to all lower
2043 case, moving point over as it does.  If @var{count} is negative, it
2044 converts the @minus{}@var{count} previous words but does not move point.
2045 The value is @code{nil}.
2047 When @code{downcase-word} is called interactively, @var{count} is set
2048 to the numeric prefix argument.
2049 @end deffn
2051 @deffn Command upcase-word count
2052 This function converts the @var{count} words after point to all upper
2053 case, moving point over as it does.  If @var{count} is negative, it
2054 converts the @minus{}@var{count} previous words but does not move point.
2055 The value is @code{nil}.
2057 When @code{upcase-word} is called interactively, @var{count} is set to
2058 the numeric prefix argument.
2059 @end deffn
2061 @node Text Properties
2062 @section Text Properties
2063 @cindex text properties
2064 @cindex attributes of text
2065 @cindex properties of text
2067   Each character position in a buffer or a string can have a @dfn{text
2068 property list}, much like the property list of a symbol (@pxref{Property
2069 Lists}).  The properties belong to a particular character at a
2070 particular place, such as, the letter @samp{T} at the beginning of this
2071 sentence or the first @samp{o} in @samp{foo}---if the same character
2072 occurs in two different places, the two occurrences generally have
2073 different properties.
2075   Each property has a name and a value.  Both of these can be any Lisp
2076 object, but the name is normally a symbol.  The usual way to access the
2077 property list is to specify a name and ask what value corresponds to it.
2079   If a character has a @code{category} property, we call it the
2080 @dfn{category} of the character.  It should be a symbol.  The properties
2081 of the symbol serve as defaults for the properties of the character.
2083   Copying text between strings and buffers preserves the properties
2084 along with the characters; this includes such diverse functions as
2085 @code{substring}, @code{insert}, and @code{buffer-substring}.
2087 @menu
2088 * Examining Properties::        Looking at the properties of one character.
2089 * Changing Properties::         Setting the properties of a range of text.
2090 * Property Search::             Searching for where a property changes value.
2091 * Special Properties::          Particular properties with special meanings.
2092 * Format Properties::           Properties for representing formatting of text.
2093 * Sticky Properties::           How inserted text gets properties from
2094                                   neighboring text.
2095 * Saving Properties::           Saving text properties in files, and reading
2096                                   them back.
2097 * Lazy Properties::             Computing text properties in a lazy fashion
2098                                   only when text is examined.
2099 * Not Intervals::               Why text properties do not use
2100                                   Lisp-visible text intervals.
2101 @end menu
2103 @node Examining Properties
2104 @subsection Examining Text Properties
2106   The simplest way to examine text properties is to ask for the value of
2107 a particular property of a particular character.  For that, use
2108 @code{get-text-property}.  Use @code{text-properties-at} to get the
2109 entire property list of a character.  @xref{Property Search}, for
2110 functions to examine the properties of a number of characters at once.
2112   These functions handle both strings and buffers.  Keep in mind that
2113 positions in a string start from 0, whereas positions in a buffer start
2114 from 1.
2116 @defun get-text-property pos prop &optional object
2117 This function returns the value of the @var{prop} property of the
2118 character after position @var{pos} in @var{object} (a buffer or
2119 string).  The argument @var{object} is optional and defaults to the
2120 current buffer.
2122 If there is no @var{prop} property strictly speaking, but the character
2123 has a category that is a symbol, then @code{get-text-property} returns
2124 the @var{prop} property of that symbol.
2125 @end defun
2127 @defun get-char-property pos prop &optional object
2128 This function is like @code{get-text-property}, except that it checks
2129 overlays first and then text properties.  @xref{Overlays}.
2131 The argument @var{object} may be a string, a buffer, or a window.  If it
2132 is a window, then the buffer displayed in that window is used for text
2133 properties and overlays, but only the overlays active for that window
2134 are considered.  If @var{object} is a buffer, then all overlays in that
2135 buffer are considered, as well as text properties.  If @var{object} is a
2136 string, only text properties are considered, since strings never have
2137 overlays.
2138 @end defun
2140 @defun text-properties-at position &optional object
2141 This function returns the entire property list of the character at
2142 @var{position} in the string or buffer @var{object}.  If @var{object} is
2143 @code{nil}, it defaults to the current buffer.
2144 @end defun
2146 @defvar default-text-properties
2147 This variable holds a property list giving default values for text
2148 properties.  Whenever a character does not specify a value for a
2149 property, neither directly nor through a category symbol, the value
2150 stored in this list is used instead.  Here is an example:
2152 @example
2153 (setq default-text-properties '(foo 69))
2154 ;; @r{Make sure character 1 has no properties of its own.}
2155 (set-text-properties 1 2 nil)
2156 ;; @r{What we get, when we ask, is the default value.}
2157 (get-text-property 1 'foo)
2158      @result{} 69
2159 @end example
2160 @end defvar
2162 @node Changing Properties
2163 @subsection Changing Text Properties
2165   The primitives for changing properties apply to a specified range of
2166 text.  The function @code{set-text-properties} (see end of section) sets
2167 the entire property list of the text in that range; more often, it is
2168 useful to add, change, or delete just certain properties specified by
2169 name.
2171   Since text properties are considered part of the buffer's contents, and
2172 can affect how the buffer looks on the screen, any change in the text
2173 properties is considered a buffer modification.  Buffer text property
2174 changes are undoable (@pxref{Undo}).
2176 @defun put-text-property start end prop value &optional object
2177 This function sets the @var{prop} property to @var{value} for the text
2178 between @var{start} and @var{end} in the string or buffer @var{object}.
2179 If @var{object} is @code{nil}, it defaults to the current buffer.
2180 @end defun
2182 @defun add-text-properties start end props &optional object
2183 This function modifies the text properties for the text between
2184 @var{start} and @var{end} in the string or buffer @var{object}.  If
2185 @var{object} is @code{nil}, it defaults to the current buffer.
2187 The argument @var{props} specifies which properties to change.  It
2188 should have the form of a property list (@pxref{Property Lists}): a list
2189 whose elements include the property names followed alternately by the
2190 corresponding values.
2192 The return value is @code{t} if the function actually changed some
2193 property's value; @code{nil} otherwise (if @var{props} is @code{nil} or
2194 its values agree with those in the text).
2196 For example, here is how to set the @code{comment} and @code{face}
2197 properties of a range of text:
2199 @example
2200 (add-text-properties @var{start} @var{end}
2201                      '(comment t face highlight))
2202 @end example
2203 @end defun
2205 @defun remove-text-properties start end props &optional object
2206 This function deletes specified text properties from the text between
2207 @var{start} and @var{end} in the string or buffer @var{object}.  If
2208 @var{object} is @code{nil}, it defaults to the current buffer.
2210 The argument @var{props} specifies which properties to delete.  It
2211 should have the form of a property list (@pxref{Property Lists}): a list
2212 whose elements are property names alternating with corresponding values.
2213 But only the names matter---the values that accompany them are ignored.
2214 For example, here's how to remove the @code{face} property.
2216 @example
2217 (remove-text-properties @var{start} @var{end} '(face nil))
2218 @end example
2220 The return value is @code{t} if the function actually changed some
2221 property's value; @code{nil} otherwise (if @var{props} is @code{nil} or
2222 if no character in the specified text had any of those properties).
2223 @end defun
2225 @defun set-text-properties start end props &optional object
2226 This function completely replaces the text property list for the text
2227 between @var{start} and @var{end} in the string or buffer @var{object}.
2228 If @var{object} is @code{nil}, it defaults to the current buffer.
2230 The argument @var{props} is the new property list.  It should be a list
2231 whose elements are property names alternating with corresponding values.
2233 After @code{set-text-properties} returns, all the characters in the
2234 specified range have identical properties.
2236 If @var{props} is @code{nil}, the effect is to get rid of all properties
2237 from the specified range of text.  Here's an example:
2239 @example
2240 (set-text-properties @var{start} @var{end} nil)
2241 @end example
2242 @end defun
2244 See also the function @code{buffer-substring-no-properties}
2245 (@pxref{Buffer Contents}) which copies text from the buffer
2246 but does not copy its properties.
2248 @node Property Search
2249 @subsection Property Search Functions
2251 In typical use of text properties, most of the time several or many
2252 consecutive characters have the same value for a property.  Rather than
2253 writing your programs to examine characters one by one, it is much
2254 faster to process chunks of text that have the same property value.
2256 Here are functions you can use to do this.  They use @code{eq} for
2257 comparing property values.  In all cases, @var{object} defaults to the
2258 current buffer.
2260 For high performance, it's very important to use the @var{limit}
2261 argument to these functions, especially the ones that search for a
2262 single property---otherwise, they may spend a long time scanning to the
2263 end of the buffer, if the property you are interested in does not change.
2265 Remember that a position is always between two characters; the position
2266 returned by these functions is between two characters with different
2267 properties.
2269 @defun next-property-change pos &optional object limit
2270 The function scans the text forward from position @var{pos} in the
2271 string or buffer @var{object} till it finds a change in some text
2272 property, then returns the position of the change.  In other words, it
2273 returns the position of the first character beyond @var{pos} whose
2274 properties are not identical to those of the character just after
2275 @var{pos}.
2277 If @var{limit} is non-@code{nil}, then the scan ends at position
2278 @var{limit}.  If there is no property change before that point, 
2279 @code{next-property-change} returns @var{limit}.
2281 The value is @code{nil} if the properties remain unchanged all the way
2282 to the end of @var{object} and @var{limit} is @code{nil}.  If the value
2283 is non-@code{nil}, it is a position greater than or equal to @var{pos}.
2284 The value equals @var{pos} only when @var{limit} equals @var{pos}.
2286 Here is an example of how to scan the buffer by chunks of text within
2287 which all properties are constant:
2289 @smallexample
2290 (while (not (eobp))
2291   (let ((plist (text-properties-at (point)))
2292         (next-change
2293          (or (next-property-change (point) (current-buffer))
2294              (point-max))))
2295     @r{Process text from point to @var{next-change}@dots{}}
2296     (goto-char next-change)))
2297 @end smallexample
2298 @end defun
2300 @defun next-single-property-change pos prop &optional object limit
2301 The function scans the text forward from position @var{pos} in the
2302 string or buffer @var{object} till it finds a change in the @var{prop}
2303 property, then returns the position of the change.  In other words, it
2304 returns the position of the first character beyond @var{pos} whose
2305 @var{prop} property differs from that of the character just after
2306 @var{pos}.
2308 If @var{limit} is non-@code{nil}, then the scan ends at position
2309 @var{limit}.  If there is no property change before that point, 
2310 @code{next-single-property-change} returns @var{limit}.
2312 The value is @code{nil} if the property remains unchanged all the way to
2313 the end of @var{object} and @var{limit} is @code{nil}.  If the value is
2314 non-@code{nil}, it is a position greater than or equal to @var{pos}; it
2315 equals @var{pos} only if @var{limit} equals @var{pos}.
2316 @end defun
2318 @defun previous-property-change pos &optional object limit
2319 This is like @code{next-property-change}, but scans back from @var{pos}
2320 instead of forward.  If the value is non-@code{nil}, it is a position
2321 less than or equal to @var{pos}; it equals @var{pos} only if @var{limit}
2322 equals @var{pos}.
2323 @end defun
2325 @defun previous-single-property-change pos prop &optional object limit
2326 This is like @code{next-single-property-change}, but scans back from
2327 @var{pos} instead of forward.  If the value is non-@code{nil}, it is a
2328 position less than or equal to @var{pos}; it equals @var{pos} only if
2329 @var{limit} equals @var{pos}.
2330 @end defun
2332 @defun text-property-any start end prop value &optional object
2333 This function returns non-@code{nil} if at least one character between
2334 @var{start} and @var{end} has a property @var{prop} whose value is
2335 @var{value}.  More precisely, it returns the position of the first such
2336 character.  Otherwise, it returns @code{nil}.
2338 The optional fifth argument, @var{object}, specifies the string or
2339 buffer to scan.  Positions are relative to @var{object}.  The default
2340 for @var{object} is the current buffer.
2341 @end defun
2343 @defun text-property-not-all start end prop value &optional object
2344 This function returns non-@code{nil} if at least one character between
2345 @var{start} and @var{end} has a property @var{prop} whose value differs
2346 from @var{value}.  More precisely, it returns the position of the
2347 first such character.  Otherwise, it returns @code{nil}.
2349 The optional fifth argument, @var{object}, specifies the string or
2350 buffer to scan.  Positions are relative to @var{object}.  The default
2351 for @var{object} is the current buffer.
2352 @end defun
2354 @node Special Properties
2355 @subsection Properties with Special Meanings
2357   Here is a table of text property names that have special built-in
2358 meanings.  The following section lists a few more special property names
2359 that are used to control filling.  All other names have no standard
2360 meaning, and you can use them as you like.
2362 @table @code
2363 @cindex category of text character
2364 @kindex category @r{(text property)}
2365 @item category
2366 If a character has a @code{category} property, we call it the
2367 @dfn{category} of the character.  It should be a symbol.  The properties
2368 of the symbol serve as defaults for the properties of the character.
2370 @item face
2371 @cindex face codes of text
2372 @kindex face @r{(text property)}
2373 You can use the property @code{face} to control the font and color of
2374 text.  Its value is a face name or a list of face names.  @xref{Faces},
2375 for more information.  This feature may be temporary; in the future, we
2376 may replace it with other ways of specifying how to display text.
2378 @item mouse-face
2379 @kindex mouse-face @r{(text property)}
2380 The property @code{mouse-face} is used instead of @code{face} when the
2381 mouse is on or near the character.  For this purpose, ``near'' means
2382 that all text between the character and where the mouse is have the same
2383 @code{mouse-face} property value.
2385 @item local-map
2386 @cindex keymap of character
2387 @kindex local-map @r{(text property)}
2388 You can specify a different keymap for a portion of the text by means of
2389 a @code{local-map} property.  The property's value for the character
2390 after point, if non-@code{nil}, replaces the buffer's local map.
2391 @xref{Active Keymaps}.
2393 @item read-only
2394 @cindex read-only character
2395 @kindex read-only @r{(text property)}
2396 If a character has the property @code{read-only}, then modifying that
2397 character is not allowed.  Any command that would do so gets an error.
2399 Insertion next to a read-only character is an error if inserting
2400 ordinary text there would inherit the @code{read-only} property due to
2401 stickiness.  Thus, you can control permission to insert next to
2402 read-only text by controlling the stickiness.  @xref{Sticky Properties}.
2404 Since changing properties counts as modifying the buffer, it is not
2405 possible to remove a @code{read-only} property unless you know the
2406 special trick: bind @code{inhibit-read-only} to a non-@code{nil} value
2407 and then remove the property.  @xref{Read Only Buffers}.
2409 @item invisible
2410 @kindex invisible @r{(text property)}
2411 A non-@code{nil} @code{invisible} property can make a character invisible
2412 on the screen.  @xref{Invisible Text}, for details.
2414 @item intangible
2415 @kindex intangible @r{(text property)}
2416 If a group of consecutive characters have equal and non-@code{nil}
2417 @code{intangible} properties, then you cannot place point between them.
2418 If you try to move point forward into the group, point actually moves to
2419 the end of the group.  If you try to move point backward into the group,
2420 point actually moves to the start of the group.
2422 When the variable @code{inhibit-point-motion-hooks} is non-@code{nil},
2423 the @code{intangible} property is ignored.
2425 @item modification-hooks
2426 @cindex change hooks for a character
2427 @cindex hooks for changing a character
2428 @kindex modification-hooks @r{(text property)}
2429 If a character has the property @code{modification-hooks}, then its
2430 value should be a list of functions; modifying that character calls all
2431 of those functions.  Each function receives two arguments: the beginning
2432 and end of the part of the buffer being modified.  Note that if a
2433 particular modification hook function appears on several characters
2434 being modified by a single primitive, you can't predict how many times
2435 the function will be called.
2437 @item insert-in-front-hooks
2438 @itemx insert-behind-hooks
2439 @kindex insert-in-front-hooks @r{(text property)}
2440 @kindex insert-behind-hooks @r{(text property)}
2441 The operation of inserting text in a buffer, before actually modifying
2442 the buffer, calls the functions listed in the
2443 @code{insert-in-front-hooks} property of the following character and in
2444 the @code{insert-behind-hooks} property of the preceding character.
2445 These functions receive two arguments, the beginning and end of the
2446 inserted text.
2448 See also @ref{Change Hooks}, for other hooks that are called
2449 when you change text in a buffer.
2451 @item point-entered
2452 @itemx point-left
2453 @cindex hooks for motion of point
2454 @kindex point-entered @r{(text property)}
2455 @kindex point-left @r{(text property)}
2456 The special properties @code{point-entered} and @code{point-left}
2457 record hook functions that report motion of point.  Each time point
2458 moves, Emacs compares these two property values:
2460 @itemize @bullet
2461 @item
2462 the @code{point-left} property of the character after the old location,
2464 @item
2465 the @code{point-entered} property of the character after the new
2466 location.
2467 @end itemize
2469 @noindent
2470 If these two values differ, each of them is called (if not @code{nil})
2471 with two arguments: the old value of point, and the new one.
2473 The same comparison is made for the characters before the old and new
2474 locations.  The result may be to execute two @code{point-left} functions
2475 (which may be the same function) and/or two @code{point-entered}
2476 functions (which may be the same function).  In any case, all the
2477 @code{point-left} functions are called first, followed by all the
2478 @code{point-entered} functions.
2480 A primitive function may examine characters at various positions
2481 without moving point to those positions.  Only an actual change in the
2482 value of point runs these hook functions.
2483 @end table
2485 @defvar inhibit-point-motion-hooks
2486 When this variable is non-@code{nil}, @code{point-left} and
2487 @code{point-entered} hooks are not run, and the @code{intangible}
2488 property has no effect.
2489 @end defvar
2491 @node Format Properties
2492 @subsection Formatted Text Properties
2494   These text properties affect the behavior of the fill commands.  They
2495 are used for representing formatted text.  @xref{Filling}, and
2496 @ref{Margins}.
2498 @table @code
2499 @item hard
2500 If a newline character has this property, it is a ``hard'' newline.
2501 The fill commands do not alter hard newlines and do not move words
2502 across them.  However, this property takes effect only if the variable
2503 @code{use-hard-newlines} is non-@code{nil}.
2505 @item right-margin
2506 This property specifies an extra right margin for filling this part of the
2507 text.
2509 @item left-margin
2510 This property specifies an extra left margin for filling this part of the
2511 text.
2513 @item justification
2514 This property specifies the style of justification for filling this part
2515 of the text.
2516 @end table
2518 @node Sticky Properties
2519 @subsection Stickiness of Text Properties
2520 @cindex sticky text properties
2521 @cindex inheritance of text properties
2523   Self-inserting characters normally take on the same properties as the
2524 preceding character.  This is called @dfn{inheritance} of properties.
2526   In a Lisp program, you can do insertion with inheritance or without,
2527 depending on your choice of insertion primitive.  The ordinary text
2528 insertion functions such as @code{insert} do not inherit any properties.
2529 They insert text with precisely the properties of the string being
2530 inserted, and no others.  This is correct for programs that copy text
2531 from one context to another---for example, into or out of the kill ring.
2532 To insert with inheritance, use the special primitives described in this
2533 section.  Self-inserting characters inherit properties because they work
2534 using these primitives.
2536   When you do insertion with inheritance, @emph{which} properties are
2537 inherited depends on two specific properties: @code{front-sticky} and
2538 @code{rear-nonsticky}.
2540   Insertion after a character inherits those of its properties that are
2541 @dfn{rear-sticky}.  Insertion before a character inherits those of its
2542 properties that are @dfn{front-sticky}.  By default, a text property is
2543 rear-sticky but not front-sticky.  Thus, the default is to inherit all
2544 the properties of the preceding character, and nothing from the
2545 following character.  You can request different behavior by specifying
2546 the stickiness of certain properties.
2548   If a character's @code{front-sticky} property is @code{t}, then all
2549 its properties are front-sticky.  If the @code{front-sticky} property is
2550 a list, then the sticky properties of the character are those whose
2551 names are in the list.  For example, if a character has a
2552 @code{front-sticky} property whose value is @code{(face read-only)},
2553 then insertion before the character can inherit its @code{face} property
2554 and its @code{read-only} property, but no others.
2556   The @code{rear-nonsticky} works the opposite way.  Every property is
2557 rear-sticky by default, so the @code{rear-nonsticky} property says which
2558 properties are @emph{not} rear-sticky.  If a character's
2559 @code{rear-nonsticky} property is @code{t}, then none of its properties
2560 are rear-sticky.  If the @code{rear-nonsticky} property is a list,
2561 properties are rear-sticky @emph{unless} their names are in the list.
2563   When you insert text with inheritance, it inherits all the rear-sticky
2564 properties of the preceding character, and all the front-sticky
2565 properties of the following character.  The previous character's
2566 properties take precedence when both sides offer different sticky values
2567 for the same property.
2569   Here are the functions that insert text with inheritance of properties:
2571 @defun insert-and-inherit &rest strings
2572 Insert the strings @var{strings}, just like the function @code{insert},
2573 but inherit any sticky properties from the adjoining text.
2574 @end defun
2576 @defun insert-before-markers-and-inherit &rest strings
2577 Insert the strings @var{strings}, just like the function
2578 @code{insert-before-markers}, but inherit any sticky properties from the
2579 adjoining text.
2580 @end defun
2582 @node Saving Properties
2583 @subsection Saving Text Properties in Files
2584 @cindex text properties in files
2585 @cindex saving text properties
2587   You can save text properties in files, and restore text properties
2588 when inserting the files, using these two hooks: 
2590 @defvar write-region-annotate-functions
2591 This variable's value is a list of functions for @code{write-region} to
2592 run to encode text properties in some fashion as annotations to the text
2593 being written in the file.  @xref{Writing to Files}.
2595 Each function in the list is called with two arguments: the start and
2596 end of the region to be written.  These functions should not alter the
2597 contents of the buffer.  Instead, they should return lists indicating
2598 annotations to write in the file in addition to the text in the
2599 buffer.
2601 Each function should return a list of elements of the form
2602 @code{(@var{position} . @var{string})}, where @var{position} is an
2603 integer specifying the relative position in the text to be written, and
2604 @var{string} is the annotation to add there.
2606 Each list returned by one of these functions must be already sorted in
2607 increasing order by @var{position}.  If there is more than one function,
2608 @code{write-region} merges the lists destructively into one sorted list.
2610 When @code{write-region} actually writes the text from the buffer to the
2611 file, it intermixes the specified annotations at the corresponding
2612 positions.  All this takes place without modifying the buffer.
2613 @end defvar
2615 @defvar after-insert-file-functions
2616 This variable holds a list of functions for @code{insert-file-contents}
2617 to call after inserting a file's contents.  These functions should scan
2618 the inserted text for annotations, and convert them to the text
2619 properties they stand for.
2621 Each function receives one argument, the length of the inserted text;
2622 point indicates the start of that text.  The function should scan that
2623 text for annotations, delete them, and create the text properties that
2624 the annotations specify.  The function should return the updated length
2625 of the inserted text, as it stands after those changes.  The value
2626 returned by one function becomes the argument to the next function.
2628 These functions should always return with point at the beginning of
2629 the inserted text.
2631 The intended use of @code{after-insert-file-functions} is for converting
2632 some sort of textual annotations into actual text properties.  But other
2633 uses may be possible.
2634 @end defvar
2636 We invite users to write Lisp programs to store and retrieve text
2637 properties in files, using these hooks, and thus to experiment with
2638 various data formats and find good ones.  Eventually we hope users 
2639 will produce good, general extensions we can install in Emacs.
2641 We suggest not trying to handle arbitrary Lisp objects as property
2642 names or property values---because a program that general is probably
2643 difficult to write, and slow.  Instead, choose a set of possible data
2644 types that are reasonably flexible, and not too hard to encode.
2646 @xref{Format Conversion}, for a related feature.
2648 @c ??? In next edition, merge this info Format Conversion.
2650 @node Lazy Properties
2651 @subsection Lazy Computation of Text Properties
2653   Instead of computing text properties for all the text in the buffer,
2654 you can arrange to compute the text properties for parts of the text
2655 when and if something depends on them.
2657   The primitive that extracts text from the buffer along with its
2658 properties is @code{buffer-substring}.  Before examining the properties,
2659 this function runs the abnormal hook @code{buffer-access-fontify-functions}.
2661 @defvar buffer-access-fontify-functions
2662 This variable holds a list of functions for computing text properties.
2663 Before @code{buffer-substring} copies the text and text properties for a
2664 portion of the buffer, it calls all the functions in this list.  Each of
2665 the functions receives two arguments that specify the range of the
2666 buffer being accessed.  (The buffer itself is always the current
2667 buffer.)
2668 @end defvar
2670   The function @code{buffer-substring-no-properties} does not call these
2671 functions, since it ignores text properties anyway.
2673   In order to prevent the hook functions from being called more than
2674 once for the same part of the buffer, you can use the variable
2675 @code{buffer-access-fontified-property}.
2677 @defvar buffer-access-fontified-property
2678 If this value's variable is non-@code{nil}, it is a symbol which is used
2679 as a text property name.  A non-@code{nil} value for that text property
2680 means, ``the other text properties for this character have already been
2681 computed.''
2683 If all the characters in the range specified for @code{buffer-substring}
2684 have a non-@code{nil} value for this property, @code{buffer-substring}
2685 does not call the @code{buffer-access-fontify-functions} functions.  It
2686 assumes these characters already have the right text properties, and
2687 just copies the properties they already have.
2689 The normal way to use this feature is that the
2690 @code{buffer-access-fontify-functions} functions add this property, as
2691 well as others, to the characters they operate on.  That way, they avoid
2692 being called over and over for the same text.
2693 @end defvar
2695 @node Not Intervals
2696 @subsection Why Text Properties are not Intervals
2697 @cindex intervals
2699   Some editors that support adding attributes to text in the buffer do
2700 so by letting the user specify ``intervals'' within the text, and adding
2701 the properties to the intervals.  Those editors permit the user or the
2702 programmer to determine where individual intervals start and end.  We
2703 deliberately provided a different sort of interface in Emacs Lisp to
2704 avoid certain paradoxical behavior associated with text modification.
2706   If the actual subdivision into intervals is meaningful, that means you
2707 can distinguish between a buffer that is just one interval with a
2708 certain property, and a buffer containing the same text subdivided into
2709 two intervals, both of which have that property.
2711   Suppose you take the buffer with just one interval and kill part of
2712 the text.  The text remaining in the buffer is one interval, and the
2713 copy in the kill ring (and the undo list) becomes a separate interval.
2714 Then if you yank back the killed text, you get two intervals with the
2715 same properties.  Thus, editing does not preserve the distinction
2716 between one interval and two.
2718   Suppose we ``fix'' this problem by coalescing the two intervals when
2719 the text is inserted.  That works fine if the buffer originally was a
2720 single interval.  But suppose instead that we have two adjacent
2721 intervals with the same properties, and we kill the text of one interval
2722 and yank it back.  The same interval-coalescence feature that rescues
2723 the other case causes trouble in this one: after yanking, we have just
2724 one interval.  One again, editing does not preserve the distinction
2725 between one interval and two.
2727   Insertion of text at the border between intervals also raises
2728 questions that have no satisfactory answer.
2730   However, it is easy to arrange for editing to behave consistently for
2731 questions of the form, ``What are the properties of this character?''
2732 So we have decided these are the only questions that make sense; we have
2733 not implemented asking questions about where intervals start or end.
2735   In practice, you can usually use the property search functions in
2736 place of explicit interval boundaries.  You can think of them as finding
2737 the boundaries of intervals, assuming that intervals are always
2738 coalesced whenever possible.  @xref{Property Search}.
2740   Emacs also provides explicit intervals as a presentation feature; see
2741 @ref{Overlays}.
2743 @node Substitution
2744 @section Substituting for a Character Code
2746   The following functions replace characters within a specified region
2747 based on their character codes.
2749 @defun subst-char-in-region start end old-char new-char &optional noundo
2750 @cindex replace characters
2751 This function replaces all occurrences of the character @var{old-char}
2752 with the character @var{new-char} in the region of the current buffer
2753 defined by @var{start} and @var{end}.
2755 @cindex Outline mode
2756 @cindex undo avoidance
2757 If @var{noundo} is non-@code{nil}, then @code{subst-char-in-region} does
2758 not record the change for undo and does not mark the buffer as modified.
2759 This feature is used for controlling selective display (@pxref{Selective
2760 Display}).
2762 @code{subst-char-in-region} does not move point and returns
2763 @code{nil}.
2765 @example
2766 @group
2767 ---------- Buffer: foo ----------
2768 This is the contents of the buffer before.
2769 ---------- Buffer: foo ----------
2770 @end group
2772 @group
2773 (subst-char-in-region 1 20 ?i ?X)
2774      @result{} nil
2776 ---------- Buffer: foo ----------
2777 ThXs Xs the contents of the buffer before.
2778 ---------- Buffer: foo ----------
2779 @end group
2780 @end example
2781 @end defun
2783 @defun translate-region start end table
2784 This function applies a translation table to the characters in the
2785 buffer between positions @var{start} and @var{end}.
2787 The translation table @var{table} is a string; @code{(aref @var{table}
2788 @var{ochar})} gives the translated character corresponding to
2789 @var{ochar}.  If the length of @var{table} is less than 256, any
2790 characters with codes larger than the length of @var{table} are not
2791 altered by the translation.
2793 The return value of @code{translate-region} is the number of
2794 characters that were actually changed by the translation.  This does
2795 not count characters that were mapped into themselves in the
2796 translation table.
2797 @end defun
2799 @node Registers
2800 @section Registers
2801 @cindex registers
2803   A register is a sort of variable used in Emacs editing that can hold a
2804 marker, a string, a rectangle, a window configuration (of one frame), or
2805 a frame configuration (of all frames).  Each register is named by a
2806 single character.  All characters, including control and meta characters
2807 (but with the exception of @kbd{C-g}), can be used to name registers.
2808 Thus, there are 255 possible registers.  A register is designated in
2809 Emacs Lisp by a character that is its name.
2811   The functions in this section return unpredictable values unless
2812 otherwise stated.
2813 @c Will change in version 19
2815 @defvar register-alist
2816 This variable is an alist of elements of the form @code{(@var{name} .
2817 @var{contents})}.  Normally, there is one element for each Emacs
2818 register that has been used.
2820 The object @var{name} is a character (an integer) identifying the
2821 register.  The object @var{contents} is a string, marker, or list
2822 representing the register contents.  A string represents text stored in
2823 the register.  A marker represents a position.  A list represents a
2824 rectangle; its elements are strings, one per line of the rectangle.
2825 @end defvar
2827 @defun get-register reg
2828 This function returns the contents of the register
2829 @var{reg}, or @code{nil} if it has no contents.
2830 @end defun
2832 @defun set-register reg value
2833 This function sets the contents of register @var{reg} to @var{value}.
2834 A register can be set to any value, but the other register functions
2835 expect only certain data types.  The return value is @var{value}.
2836 @end defun
2838 @deffn Command view-register reg
2839 This command displays what is contained in register @var{reg}.
2840 @end deffn
2842 @ignore
2843 @deffn Command point-to-register reg
2844 This command stores both the current location of point and the current
2845 buffer in register @var{reg} as a marker.
2846 @end deffn
2848 @deffn Command jump-to-register reg
2849 @deffnx Command register-to-point reg
2850 @comment !!SourceFile register.el
2851 This command restores the status recorded in register @var{reg}.
2853 If @var{reg} contains a marker, it moves point to the position stored in
2854 the marker.  Since both the buffer and the location within the buffer
2855 are stored by the @code{point-to-register} function, this command can
2856 switch you to another buffer.
2858 If @var{reg} contains a window configuration or a frame configuration.
2859 @code{jump-to-register} restores that configuration.
2860 @end deffn
2861 @end ignore
2863 @deffn Command insert-register reg &optional beforep
2864 This command inserts contents of register @var{reg} into the current
2865 buffer.
2867 Normally, this command puts point before the inserted text, and the
2868 mark after it.  However, if the optional second argument @var{beforep}
2869 is non-@code{nil}, it puts the mark before and point after.
2870 You can pass a non-@code{nil} second argument @var{beforep} to this
2871 function interactively by supplying any prefix argument.
2873 If the register contains a rectangle, then the rectangle is inserted
2874 with its upper left corner at point.  This means that text is inserted
2875 in the current line and underneath it on successive lines.
2877 If the register contains something other than saved text (a string) or
2878 a rectangle (a list), currently useless things happen.  This may be
2879 changed in the future.
2880 @end deffn
2882 @ignore
2883 @deffn Command copy-to-register reg start end &optional delete-flag
2884 This command copies the region from @var{start} to @var{end} into
2885 register @var{reg}.  If @var{delete-flag} is non-@code{nil}, it deletes
2886 the region from the buffer after copying it into the register.
2887 @end deffn
2889 @deffn Command prepend-to-register reg start end &optional delete-flag
2890 This command prepends the region from @var{start} to @var{end} into
2891 register @var{reg}.  If @var{delete-flag} is non-@code{nil}, it deletes
2892 the region from the buffer after copying it to the register.
2893 @end deffn
2895 @deffn Command append-to-register reg start end &optional delete-flag
2896 This command appends the region from @var{start} to @var{end} to the
2897 text already in register @var{reg}.  If @var{delete-flag} is
2898 non-@code{nil}, it deletes the region from the buffer after copying it
2899 to the register.
2900 @end deffn
2902 @deffn Command copy-rectangle-to-register reg start end &optional delete-flag
2903 This command copies a rectangular region from @var{start} to @var{end}
2904 into register @var{reg}.  If @var{delete-flag} is non-@code{nil}, it
2905 deletes the region from the buffer after copying it to the register.
2906 @end deffn
2908 @deffn Command window-configuration-to-register reg
2909 This function stores the window configuration of the selected frame in
2910 register @var{reg}.
2911 @end deffn
2913 @deffn Command frame-configuration-to-register reg
2914 This function stores the current frame configuration in register
2915 @var{reg}.
2916 @end deffn
2917 @end ignore
2919 @node Transposition
2920 @section Transposition of Text
2922   This subroutine is used by the transposition commands.
2924 @defun transpose-regions start1 end1 start2 end2 &optional leave-markers
2925 This function exchanges two nonoverlapping portions of the buffer.
2926 Arguments @var{start1} and @var{end1} specify the bounds of one portion
2927 and arguments @var{start2} and @var{end2} specify the bounds of the
2928 other portion.
2930 Normally, @code{transpose-regions} relocates markers with the transposed
2931 text; a marker previously positioned within one of the two transposed
2932 portions moves along with that portion, thus remaining between the same
2933 two characters in their new position.  However, if @var{leave-markers}
2934 is non-@code{nil}, @code{transpose-regions} does not do this---it leaves
2935 all markers unrelocated.
2936 @end defun
2938 @node Change Hooks
2939 @section Change Hooks
2940 @cindex change hooks
2941 @cindex hooks for text changes
2943   These hook variables let you arrange to take notice of all changes in
2944 all buffers (or in a particular buffer, if you make them buffer-local).
2945 See also @ref{Special Properties}, for how to detect changes to specific
2946 parts of the text.
2948   The functions you use in these hooks should save and restore the match
2949 data if they do anything that uses regular expressions; otherwise, they
2950 will interfere in bizarre ways with the editing operations that call
2951 them.
2953 @defvar before-change-functions
2954 This variable holds a list of a functions to call before any buffer
2955 modification.  Each function gets two arguments, the beginning and end
2956 of the region that is about to change, represented as integers.  The
2957 buffer that is about to change is always the current buffer.
2958 @end defvar
2960 @defvar after-change-functions
2961 This variable holds a list of a functions to call after any buffer
2962 modification.  Each function receives three arguments: the beginning and
2963 end of the region just changed, and the length of the text that existed
2964 before the change.  (To get the current length, subtract the region
2965 beginning from the region end.)  All three arguments are integers.  The
2966 buffer that's about to change is always the current buffer.
2967 @end defvar
2969 @defvar before-change-function
2970 This obsolete variable holds one function to call before any buffer
2971 modification (or @code{nil} for no function).  It is called just like
2972 the functions in @code{before-change-functions}.
2973 @end defvar
2975 @defvar after-change-function
2976 This obsolete variable holds one function to call after any buffer modification
2977 (or @code{nil} for no function).  It is called just like the functions in
2978 @code{after-change-functions}.
2979 @end defvar
2981 The four variables above are temporarily bound to @code{nil} during the
2982 time that any of these functions is running.  This means that if one of
2983 these functions changes the buffer, that change won't run these
2984 functions.  If you do want a hook function to make changes that run
2985 these functions, make it bind these variables back to their usual
2986 values.
2988 One inconvenient result of this protective feature is that you cannot
2989 have a function in @code{after-change-functions} or
2990 @code{before-change-functions} which changes the value of that variable.
2991 But that's not a real limitation.  If you want those functions to change
2992 the list of functions to run, simply add one fixed function to the hook,
2993 and code that function to look in another variable for other functions
2994 to call.  Here is an example:
2996 @example
2997 (setq my-own-after-change-functions nil)
2998 (defun indirect-after-change-function (beg end len)
2999   (let ((list my-own-after-change-functions))
3000     (while list
3001       (funcall (car list) beg end len)
3002       (setq list (cdr list)))))
3003 (add-hooks 'after-change-functions
3004            'indirect-after-change-function)
3005 @end example
3007 @defvar first-change-hook
3008 This variable is a normal hook that is run whenever a buffer is changed
3009 that was previously in the unmodified state.
3010 @end defvar