Mercurial > emacs
annotate lispref/positions.texi @ 21682:90da2489c498
*** empty log message ***
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 20 Apr 1998 17:43:57 +0000 |
parents | 66d807bdc5b4 |
children | d4ac295a98b3 |
rev | line source |
---|---|
6552 | 1 @c -*-texinfo-*- |
2 @c This is part of the GNU Emacs Lisp Reference Manual. | |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998 Free Software Foundation, Inc. |
6552 | 4 @c See the file elisp.texi for copying conditions. |
5 @setfilename ../info/positions | |
6 @node Positions, Markers, Frames, Top | |
7 @chapter Positions | |
8 @cindex position (in buffer) | |
9 | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
10 A @dfn{position} is the index of a character in the text of a buffer. |
6552 | 11 More precisely, a position identifies the place between two characters |
12 (or before the first character, or after the last character), so we can | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
13 speak of the character before or after a given position. However, we |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
14 often speak of the character ``at'' a position, meaning the character |
6552 | 15 after that position. |
16 | |
17 Positions are usually represented as integers starting from 1, but can | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
18 also be represented as @dfn{markers}---special objects that relocate |
6552 | 19 automatically when text is inserted or deleted so they stay with the |
20 surrounding characters. @xref{Markers}. | |
21 | |
22 @menu | |
23 * Point:: The special position where editing takes place. | |
24 * Motion:: Changing point. | |
25 * Excursions:: Temporary motion and buffer changes. | |
26 * Narrowing:: Restricting editing to a portion of the buffer. | |
27 @end menu | |
28 | |
29 @node Point | |
30 @section Point | |
31 @cindex point | |
32 | |
33 @dfn{Point} is a special buffer position used by many editing | |
34 commands, including the self-inserting typed characters and text | |
35 insertion functions. Other commands move point through the text | |
36 to allow editing and insertion at different places. | |
37 | |
38 Like other positions, point designates a place between two characters | |
39 (or before the first character, or after the last character), rather | |
12098 | 40 than a particular character. Usually terminals display the cursor over |
41 the character that immediately follows point; point is actually before | |
42 the character on which the cursor sits. | |
6552 | 43 |
44 @cindex point with narrowing | |
45 The value of point is a number between 1 and the buffer size plus 1. | |
46 If narrowing is in effect (@pxref{Narrowing}), then point is constrained | |
47 to fall within the accessible portion of the buffer (possibly at one end | |
48 of it). | |
49 | |
50 Each buffer has its own value of point, which is independent of the | |
51 value of point in other buffers. Each window also has a value of point, | |
52 which is independent of the value of point in other windows on the same | |
53 buffer. This is why point can have different values in various windows | |
54 that display the same buffer. When a buffer appears in only one window, | |
55 the buffer's point and the window's point normally have the same value, | |
56 so the distinction is rarely important. @xref{Window Point}, for more | |
57 details. | |
58 | |
59 @defun point | |
60 @cindex current buffer position | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
61 This function returns the value of point in the current buffer, |
6552 | 62 as an integer. |
63 | |
64 @need 700 | |
65 @example | |
66 @group | |
67 (point) | |
68 @result{} 175 | |
69 @end group | |
70 @end example | |
71 @end defun | |
72 | |
73 @defun point-min | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
74 This function returns the minimum accessible value of point in the |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
75 current buffer. This is normally 1, but if narrowing is in effect, it |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
76 is the position of the start of the region that you narrowed to. |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
77 (@xref{Narrowing}.) |
6552 | 78 @end defun |
79 | |
80 @defun point-max | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
81 This function returns the maximum accessible value of point in the |
6552 | 82 current buffer. This is @code{(1+ (buffer-size))}, unless narrowing is |
83 in effect, in which case it is the position of the end of the region | |
84 that you narrowed to. (@xref{Narrowing}). | |
85 @end defun | |
86 | |
87 @defun buffer-end flag | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
88 This function returns @code{(point-min)} if @var{flag} is less than 1, |
6552 | 89 @code{(point-max)} otherwise. The argument @var{flag} must be a number. |
90 @end defun | |
91 | |
92 @defun buffer-size | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
93 This function returns the total number of characters in the current |
6552 | 94 buffer. In the absence of any narrowing (@pxref{Narrowing}), |
95 @code{point-max} returns a value one larger than this. | |
96 | |
97 @example | |
98 @group | |
99 (buffer-size) | |
100 @result{} 35 | |
101 @end group | |
102 @group | |
103 (point-max) | |
104 @result{} 36 | |
105 @end group | |
106 @end example | |
107 @end defun | |
108 | |
109 @node Motion | |
110 @section Motion | |
111 | |
112 Motion functions change the value of point, either relative to the | |
113 current value of point, relative to the beginning or end of the buffer, | |
114 or relative to the edges of the selected window. @xref{Point}. | |
115 | |
116 @menu | |
117 * Character Motion:: Moving in terms of characters. | |
118 * Word Motion:: Moving in terms of words. | |
119 * Buffer End Motion:: Moving to the beginning or end of the buffer. | |
120 * Text Lines:: Moving in terms of lines of text. | |
121 * Screen Lines:: Moving in terms of lines as displayed. | |
122 * List Motion:: Moving by parsing lists and sexps. | |
123 * Skipping Characters:: Skipping characters belonging to a certain set. | |
124 @end menu | |
125 | |
126 @node Character Motion | |
127 @subsection Motion by Characters | |
128 | |
129 These functions move point based on a count of characters. | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
130 @code{goto-char} is the fundamental primitive; the other functions use |
6552 | 131 that. |
132 | |
133 @deffn Command goto-char position | |
134 This function sets point in the current buffer to the value | |
135 @var{position}. If @var{position} is less than 1, it moves point to the | |
136 beginning of the buffer. If @var{position} is greater than the length | |
137 of the buffer, it moves point to the end. | |
138 | |
139 If narrowing is in effect, @var{position} still counts from the | |
140 beginning of the buffer, but point cannot go outside the accessible | |
141 portion. If @var{position} is out of range, @code{goto-char} moves | |
142 point to the beginning or the end of the accessible portion. | |
143 | |
144 When this function is called interactively, @var{position} is the | |
145 numeric prefix argument, if provided; otherwise it is read from the | |
146 minibuffer. | |
147 | |
148 @code{goto-char} returns @var{position}. | |
149 @end deffn | |
150 | |
151 @deffn Command forward-char &optional count | |
152 @c @kindex beginning-of-buffer | |
153 @c @kindex end-of-buffer | |
154 This function moves point @var{count} characters forward, towards the | |
155 end of the buffer (or backward, towards the beginning of the buffer, if | |
156 @var{count} is negative). If the function attempts to move point past | |
157 the beginning or end of the buffer (or the limits of the accessible | |
158 portion, when narrowing is in effect), an error is signaled with error | |
159 code @code{beginning-of-buffer} or @code{end-of-buffer}. | |
160 | |
161 In an interactive call, @var{count} is the numeric prefix argument. | |
162 @end deffn | |
163 | |
164 @deffn Command backward-char &optional count | |
165 This function moves point @var{count} characters backward, towards the | |
166 beginning of the buffer (or forward, towards the end of the buffer, if | |
167 @var{count} is negative). If the function attempts to move point past | |
168 the beginning or end of the buffer (or the limits of the accessible | |
169 portion, when narrowing is in effect), an error is signaled with error | |
170 code @code{beginning-of-buffer} or @code{end-of-buffer}. | |
171 | |
172 In an interactive call, @var{count} is the numeric prefix argument. | |
173 @end deffn | |
174 | |
175 @node Word Motion | |
176 @subsection Motion by Words | |
177 | |
178 These functions for parsing words use the syntax table to decide | |
179 whether a given character is part of a word. @xref{Syntax Tables}. | |
180 | |
181 @deffn Command forward-word count | |
182 This function moves point forward @var{count} words (or backward if | |
183 @var{count} is negative). Normally it returns @code{t}. If this motion | |
184 encounters the beginning or end of the buffer, or the limits of the | |
185 accessible portion when narrowing is in effect, point stops there | |
186 and the value is @code{nil}. | |
187 | |
188 In an interactive call, @var{count} is set to the numeric prefix | |
189 argument. | |
190 @end deffn | |
191 | |
192 @deffn Command backward-word count | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
193 This function is just like @code{forward-word}, except that it moves |
6552 | 194 backward until encountering the front of a word, rather than forward. |
195 | |
196 In an interactive call, @var{count} is set to the numeric prefix | |
197 argument. | |
198 | |
199 This function is rarely used in programs, as it is more efficient to | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
200 call @code{forward-word} with a negative argument. |
6552 | 201 @end deffn |
202 | |
203 @defvar words-include-escapes | |
204 @c Emacs 19 feature | |
205 This variable affects the behavior of @code{forward-word} and everything | |
206 that uses it. If it is non-@code{nil}, then characters in the | |
207 ``escape'' and ``character quote'' syntax classes count as part of | |
208 words. Otherwise, they do not. | |
209 @end defvar | |
210 | |
211 @node Buffer End Motion | |
212 @subsection Motion to an End of the Buffer | |
213 | |
214 To move point to the beginning of the buffer, write: | |
215 | |
216 @example | |
217 @group | |
218 (goto-char (point-min)) | |
219 @end group | |
220 @end example | |
221 | |
222 @noindent | |
223 Likewise, to move to the end of the buffer, use: | |
224 | |
225 @example | |
226 @group | |
227 (goto-char (point-max)) | |
228 @end group | |
229 @end example | |
230 | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
231 Here are two commands that users use to do these things. They are |
6552 | 232 documented here to warn you not to use them in Lisp programs, because |
233 they set the mark and display messages in the echo area. | |
234 | |
235 @deffn Command beginning-of-buffer &optional n | |
236 This function moves point to the beginning of the buffer (or the limits | |
237 of the accessible portion, when narrowing is in effect), setting the | |
238 mark at the previous position. If @var{n} is non-@code{nil}, then it | |
239 puts point @var{n} tenths of the way from the beginning of the buffer. | |
240 | |
241 In an interactive call, @var{n} is the numeric prefix argument, | |
242 if provided; otherwise @var{n} defaults to @code{nil}. | |
243 | |
21682
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
244 @strong{Warning:} Don't use this function in Lisp programs! |
6552 | 245 @end deffn |
246 | |
247 @deffn Command end-of-buffer &optional n | |
248 This function moves point to the end of the buffer (or the limits of | |
249 the accessible portion, when narrowing is in effect), setting the mark | |
250 at the previous position. If @var{n} is non-@code{nil}, then it puts | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
251 point @var{n} tenths of the way from the end of the buffer. |
6552 | 252 |
253 In an interactive call, @var{n} is the numeric prefix argument, | |
254 if provided; otherwise @var{n} defaults to @code{nil}. | |
255 | |
21682
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
256 @strong{Warning:} Don't use this function in Lisp programs! |
6552 | 257 @end deffn |
258 | |
259 @node Text Lines | |
260 @subsection Motion by Text Lines | |
261 @cindex lines | |
262 | |
263 Text lines are portions of the buffer delimited by newline characters, | |
264 which are regarded as part of the previous line. The first text line | |
265 begins at the beginning of the buffer, and the last text line ends at | |
266 the end of the buffer whether or not the last character is a newline. | |
267 The division of the buffer into text lines is not affected by the width | |
268 of the window, by line continuation in display, or by how tabs and | |
269 control characters are displayed. | |
270 | |
271 @deffn Command goto-line line | |
272 This function moves point to the front of the @var{line}th line, | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
273 counting from line 1 at beginning of the buffer. If @var{line} is less |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
274 than 1, it moves point to the beginning of the buffer. If @var{line} is |
6552 | 275 greater than the number of lines in the buffer, it moves point to the |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
276 end of the buffer---that is, the @emph{end of the last line} of the |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
277 buffer. This is the only case in which @code{goto-line} does not |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
278 necessarily move to the beginning of a line. |
6552 | 279 |
280 If narrowing is in effect, then @var{line} still counts from the | |
281 beginning of the buffer, but point cannot go outside the accessible | |
282 portion. So @code{goto-line} moves point to the beginning or end of the | |
283 accessible portion, if the line number specifies an inaccessible | |
284 position. | |
285 | |
286 The return value of @code{goto-line} is the difference between | |
287 @var{line} and the line number of the line to which point actually was | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
288 able to move (in the full buffer, before taking account of narrowing). |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
289 Thus, the value is positive if the scan encounters the real end of the |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
290 buffer before finding the specified line. The value is zero if scan |
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
291 encounters the end of the accessible portion but not the real end of the |
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
292 buffer. |
6552 | 293 |
294 In an interactive call, @var{line} is the numeric prefix argument if | |
295 one has been provided. Otherwise @var{line} is read in the minibuffer. | |
296 @end deffn | |
297 | |
298 @deffn Command beginning-of-line &optional count | |
299 This function moves point to the beginning of the current line. With an | |
300 argument @var{count} not @code{nil} or 1, it moves forward | |
301 @var{count}@minus{}1 lines and then to the beginning of the line. | |
302 | |
303 If this function reaches the end of the buffer (or of the accessible | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
304 portion, if narrowing is in effect), it positions point there. No error |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
305 is signaled. |
6552 | 306 @end deffn |
307 | |
308 @deffn Command end-of-line &optional count | |
309 This function moves point to the end of the current line. With an | |
310 argument @var{count} not @code{nil} or 1, it moves forward | |
311 @var{count}@minus{}1 lines and then to the end of the line. | |
312 | |
313 If this function reaches the end of the buffer (or of the accessible | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
314 portion, if narrowing is in effect), it positions point there. No error |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
315 is signaled. |
6552 | 316 @end deffn |
317 | |
318 @deffn Command forward-line &optional count | |
319 @cindex beginning of line | |
320 This function moves point forward @var{count} lines, to the beginning of | |
321 the line. If @var{count} is negative, it moves point | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
322 @minus{}@var{count} lines backward, to the beginning of a line. If |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
323 @var{count} is zero, it moves point to the beginning of the current |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
324 line. |
6552 | 325 |
326 If @code{forward-line} encounters the beginning or end of the buffer (or | |
327 of the accessible portion) before finding that many lines, it sets point | |
328 there. No error is signaled. | |
329 | |
330 @code{forward-line} returns the difference between @var{count} and the | |
331 number of lines actually moved. If you attempt to move down five lines | |
332 from the beginning of a buffer that has only three lines, point stops at | |
333 the end of the last line, and the value will be 2. | |
334 | |
335 In an interactive call, @var{count} is the numeric prefix argument. | |
336 @end deffn | |
337 | |
338 @defun count-lines start end | |
339 @cindex lines in region | |
340 This function returns the number of lines between the positions | |
341 @var{start} and @var{end} in the current buffer. If @var{start} and | |
342 @var{end} are equal, then it returns 0. Otherwise it returns at least | |
343 1, even if @var{start} and @var{end} are on the same line. This is | |
344 because the text between them, considered in isolation, must contain at | |
345 least one line unless it is empty. | |
346 | |
347 Here is an example of using @code{count-lines}: | |
348 | |
349 @example | |
350 @group | |
351 (defun current-line () | |
352 "Return the vertical position of point@dots{}" | |
353 (+ (count-lines (window-start) (point)) | |
354 (if (= (current-column) 0) 1 0) | |
355 -1)) | |
356 @end group | |
357 @end example | |
358 @end defun | |
359 | |
360 @ignore | |
361 @c ================ | |
362 The @code{previous-line} and @code{next-line} commands are functions | |
363 that should not be used in programs. They are for users and are | |
364 mentioned here only for completeness. | |
365 | |
366 @deffn Command previous-line count | |
367 @cindex goal column | |
368 This function moves point up @var{count} lines (down if @var{count} | |
369 is negative). In moving, it attempts to keep point in the ``goal column'' | |
370 (normally the same column that it was at the beginning of the move). | |
371 | |
372 If there is no character in the target line exactly under the current | |
373 column, point is positioned after the character in that line which | |
374 spans this column, or at the end of the line if it is not long enough. | |
375 | |
376 If it attempts to move beyond the top or bottom of the buffer (or clipped | |
377 region), then point is positioned in the goal column in the top or | |
378 bottom line. No error is signaled. | |
379 | |
380 In an interactive call, @var{count} will be the numeric | |
381 prefix argument. | |
382 | |
383 The command @code{set-goal-column} can be used to create a semipermanent | |
384 goal column to which this command always moves. Then it does not try to | |
385 move vertically. | |
386 | |
387 If you are thinking of using this in a Lisp program, consider using | |
388 @code{forward-line} with a negative argument instead. It is usually easier | |
389 to use and more reliable (no dependence on goal column, etc.). | |
390 @end deffn | |
391 | |
392 @deffn Command next-line count | |
393 This function moves point down @var{count} lines (up if @var{count} | |
394 is negative). In moving, it attempts to keep point in the ``goal column'' | |
395 (normally the same column that it was at the beginning of the move). | |
396 | |
397 If there is no character in the target line exactly under the current | |
398 column, point is positioned after the character in that line which | |
399 spans this column, or at the end of the line if it is not long enough. | |
400 | |
401 If it attempts to move beyond the top or bottom of the buffer (or clipped | |
402 region), then point is positioned in the goal column in the top or | |
403 bottom line. No error is signaled. | |
404 | |
405 In the case where the @var{count} is 1, and point is on the last | |
406 line of the buffer (or clipped region), a new empty line is inserted at the | |
407 end of the buffer (or clipped region) and point moved there. | |
408 | |
409 In an interactive call, @var{count} will be the numeric | |
410 prefix argument. | |
411 | |
412 The command @code{set-goal-column} can be used to create a semipermanent | |
413 goal column to which this command always moves. Then it does not try to | |
414 move vertically. | |
415 | |
416 If you are thinking of using this in a Lisp program, consider using | |
417 @code{forward-line} instead. It is usually easier | |
418 to use and more reliable (no dependence on goal column, etc.). | |
419 @end deffn | |
420 | |
421 @c ================ | |
422 @end ignore | |
423 | |
424 Also see the functions @code{bolp} and @code{eolp} in @ref{Near Point}. | |
425 These functions do not move point, but test whether it is already at the | |
426 beginning or end of a line. | |
427 | |
428 @node Screen Lines | |
429 @subsection Motion by Screen Lines | |
430 | |
431 The line functions in the previous section count text lines, delimited | |
432 only by newline characters. By contrast, these functions count screen | |
433 lines, which are defined by the way the text appears on the screen. A | |
434 text line is a single screen line if it is short enough to fit the width | |
435 of the selected window, but otherwise it may occupy several screen | |
436 lines. | |
437 | |
438 In some cases, text lines are truncated on the screen rather than | |
439 continued onto additional screen lines. In these cases, | |
440 @code{vertical-motion} moves point much like @code{forward-line}. | |
441 @xref{Truncation}. | |
442 | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
443 Because the width of a given string depends on the flags that control |
6552 | 444 the appearance of certain characters, @code{vertical-motion} behaves |
445 differently, for a given piece of text, depending on the buffer it is | |
446 in, and even on the selected window (because the width, the truncation | |
447 flag, and display table may vary between windows). @xref{Usual | |
448 Display}. | |
449 | |
9401
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
450 These functions scan text to determine where screen lines break, and |
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
451 thus take time proportional to the distance scanned. If you intend to |
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
452 use them heavily, Emacs provides caches which may improve the |
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
453 performance of your code. @xref{Text Lines, cache-long-line-scans}. |
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
454 |
32ae92d81323
Document cache-long-line-scans in @node Text Lines.
Jim Blandy <jimb@redhat.com>
parents:
7734
diff
changeset
|
455 |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
456 @defun vertical-motion count &optional window |
6552 | 457 This function moves point to the start of the screen line @var{count} |
458 screen lines down from the screen line containing point. If @var{count} | |
459 is negative, it moves up instead. | |
460 | |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
461 @code{vertical-motion} returns the number of screen lines over which it |
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
462 moved point. The value may be less in absolute value than @var{count} |
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
463 if the beginning or end of the buffer was reached. |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
464 |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
465 The window @var{window} is used for obtaining parameters such as the |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
466 width, the horizontal scrolling, and the display table. But |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
467 @code{vertical-motion} always operates on the current buffer, even if |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
468 @var{window} currently displays some other buffer. |
6552 | 469 @end defun |
470 | |
471 @deffn Command move-to-window-line count | |
472 This function moves point with respect to the text currently displayed | |
473 in the selected window. It moves point to the beginning of the screen | |
474 line @var{count} screen lines from the top of the window. If | |
475 @var{count} is negative, that specifies a position | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
476 @w{@minus{}@var{count}} lines from the bottom (or the last line of the |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
477 buffer, if the buffer ends above the specified screen position). |
6552 | 478 |
479 If @var{count} is @code{nil}, then point moves to the beginning of the | |
480 line in the middle of the window. If the absolute value of @var{count} | |
481 is greater than the size of the window, then point moves to the place | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
482 that would appear on that screen line if the window were tall enough. |
6552 | 483 This will probably cause the next redisplay to scroll to bring that |
484 location onto the screen. | |
485 | |
486 In an interactive call, @var{count} is the numeric prefix argument. | |
487 | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
488 The value returned is the window line number point has moved to, with |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
489 the top line in the window numbered 0. |
6552 | 490 @end deffn |
491 | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
492 @defun compute-motion from frompos to topos width offsets window |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
493 This function scans the current buffer, calculating screen positions. |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
494 It scans the buffer forward from position @var{from}, assuming that is |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
495 at screen coordinates @var{frompos}, to position @var{to} or coordinates |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
496 @var{topos}, whichever comes first. It returns the ending buffer |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
497 position and screen coordinates. |
6552 | 498 |
499 The coordinate arguments @var{frompos} and @var{topos} are cons cells of | |
500 the form @code{(@var{hpos} . @var{vpos})}. | |
501 | |
502 The argument @var{width} is the number of columns available to display | |
503 text; this affects handling of continuation lines. Use the value | |
12098 | 504 returned by @code{window-width} for the window of your choice; |
505 normally, use @code{(window-width @var{window})}. | |
6552 | 506 |
507 The argument @var{offsets} is either @code{nil} or a cons cell of the | |
508 form @code{(@var{hscroll} . @var{tab-offset})}. Here @var{hscroll} is | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
509 the number of columns not being displayed at the left margin; most |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
510 callers get this from @code{window-hscroll}. Meanwhile, |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
511 @var{tab-offset} is the offset between column numbers on the screen and |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
512 column numbers in the buffer. This can be nonzero in a continuation |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
513 line, when the previous screen lines' widths do not add up to a multiple |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
514 of @code{tab-width}. It is always zero in a non-continuation line. |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
515 |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
516 The window @var{window} serves only to specify which display table to |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
517 use. @code{compute-motion} always operates on the current buffer, |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
518 regardless of what buffer is displayed in @var{window}. |
6552 | 519 |
520 The return value is a list of five elements: | |
521 | |
522 @example | |
523 (@var{pos} @var{vpos} @var{hpos} @var{prevhpos} @var{contin}) | |
524 @end example | |
525 | |
526 @noindent | |
527 Here @var{pos} is the buffer position where the scan stopped, @var{vpos} | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
528 is the vertical screen position, and @var{hpos} is the horizontal screen |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
529 position. |
6552 | 530 |
531 The result @var{prevhpos} is the horizontal position one character back | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
532 from @var{pos}. The result @var{contin} is @code{t} if the last line |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
533 was continued after (or within) the previous character. |
6552 | 534 |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
535 For example, to find the buffer position of column @var{col} of screen line |
6552 | 536 @var{line} of a certain window, pass the window's display start location |
537 as @var{from} and the window's upper-left coordinates as @var{frompos}. | |
538 Pass the buffer's @code{(point-max)} as @var{to}, to limit the scan to | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
539 the end of the accessible portion of the buffer, and pass @var{line} and |
6552 | 540 @var{col} as @var{topos}. Here's a function that does this: |
541 | |
542 @example | |
543 (defun coordinates-of-position (col line) | |
544 (car (compute-motion (window-start) | |
545 '(0 . 0) | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
546 (point-max) |
6552 | 547 (cons col line) |
548 (window-width) | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
549 (cons (window-hscroll) 0) |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
550 (selected-window)))) |
6552 | 551 @end example |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
552 |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
553 When you use @code{compute-motion} for the minibuffer, you need to use |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
554 @code{minibuffer-prompt-width} to get the horizontal position of the |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
555 beginning of the first screen line. @xref{Minibuffer Misc}. |
6552 | 556 @end defun |
557 | |
558 @node List Motion | |
559 @comment node-name, next, previous, up | |
560 @subsection Moving over Balanced Expressions | |
561 @cindex sexp motion | |
562 @cindex Lisp expression motion | |
563 @cindex list motion | |
564 | |
565 Here are several functions concerned with balanced-parenthesis | |
566 expressions (also called @dfn{sexps} in connection with moving across | |
567 them in Emacs). The syntax table controls how these functions interpret | |
568 various characters; see @ref{Syntax Tables}. @xref{Parsing | |
569 Expressions}, for lower-level primitives for scanning sexps or parts of | |
14504
680aa532d697
(List Motion): Fix xref to Emacs manual.
Richard M. Stallman <rms@gnu.org>
parents:
13074
diff
changeset
|
570 sexps. For user-level commands, see @ref{Lists Commands,,, emacs, GNU |
6552 | 571 Emacs Manual}. |
572 | |
573 @deffn Command forward-list arg | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
574 This function moves forward across @var{arg} balanced groups of |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
575 parentheses. (Other syntactic entities such as words or paired string |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
576 quotes are ignored.) |
6552 | 577 @end deffn |
578 | |
579 @deffn Command backward-list arg | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
580 This function moves backward across @var{arg} balanced groups of |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
581 parentheses. (Other syntactic entities such as words or paired string |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
582 quotes are ignored.) |
6552 | 583 @end deffn |
584 | |
585 @deffn Command up-list arg | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
586 This function moves forward out of @var{arg} levels of parentheses. |
6552 | 587 A negative argument means move backward but still to a less deep spot. |
588 @end deffn | |
589 | |
590 @deffn Command down-list arg | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
591 This function moves forward into @var{arg} levels of parentheses. A |
7734 | 592 negative argument means move backward but still go |
593 deeper in parentheses (@minus{}@var{arg} levels). | |
6552 | 594 @end deffn |
595 | |
596 @deffn Command forward-sexp arg | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
597 This function moves forward across @var{arg} balanced expressions. |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
598 Balanced expressions include both those delimited by parentheses and |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
599 other kinds, such as words and string constants. For example, |
6552 | 600 |
601 @example | |
602 @group | |
603 ---------- Buffer: foo ---------- | |
604 (concat@point{} "foo " (car x) y z) | |
605 ---------- Buffer: foo ---------- | |
606 @end group | |
607 | |
608 @group | |
609 (forward-sexp 3) | |
610 @result{} nil | |
611 | |
612 ---------- Buffer: foo ---------- | |
613 (concat "foo " (car x) y@point{} z) | |
614 ---------- Buffer: foo ---------- | |
615 @end group | |
616 @end example | |
617 @end deffn | |
618 | |
619 @deffn Command backward-sexp arg | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
620 This function moves backward across @var{arg} balanced expressions. |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
621 @end deffn |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
622 |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
623 @deffn Command beginning-of-defun arg |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
624 This function moves back to the @var{arg}th beginning of a defun. If |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
625 @var{arg} is negative, this actually moves forward, but it still moves |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
626 to the beginning of a defun, not to the end of one. |
6552 | 627 @end deffn |
628 | |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
629 @deffn Command end-of-defun arg |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
630 This function moves forward to the @var{arg}th end of a defun. If |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
631 @var{arg} is negative, this actually moves backward, but it still moves |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
632 to the end of a defun, not to the beginning of one. |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
633 @end deffn |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
634 |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
635 @defopt defun-prompt-regexp |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
636 If non-@code{nil}, this variable holds a regular expression that |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
637 specifies what text can appear before the open-parenthesis that starts a |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
638 defun. That is to say, a defun begins on a line that starts with a |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
639 match for this regular expression, followed by a character with |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
640 open-parenthesis syntax. |
7086
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
641 @end defopt |
075343a6b32b
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
6552
diff
changeset
|
642 |
6552 | 643 @node Skipping Characters |
644 @comment node-name, next, previous, up | |
645 @subsection Skipping Characters | |
646 @cindex skipping characters | |
647 | |
648 The following two functions move point over a specified set of | |
649 characters. For example, they are often used to skip whitespace. For | |
650 related functions, see @ref{Motion and Syntax}. | |
651 | |
652 @defun skip-chars-forward character-set &optional limit | |
653 This function moves point in the current buffer forward, skipping over a | |
654 given set of characters. It examines the character following point, | |
655 then advances point if the character matches @var{character-set}. This | |
656 continues until it reaches a character that does not match. The | |
657 function returns @code{nil}. | |
658 | |
659 The argument @var{character-set} is like the inside of a | |
660 @samp{[@dots{}]} in a regular expression except that @samp{]} is never | |
661 special and @samp{\} quotes @samp{^}, @samp{-} or @samp{\}. Thus, | |
662 @code{"a-zA-Z"} skips over all letters, stopping before the first | |
13074 | 663 nonletter, and @code{"^a-zA-Z"} skips nonletters stopping before the |
6552 | 664 first letter. @xref{Regular Expressions}. |
665 | |
666 If @var{limit} is supplied (it must be a number or a marker), it | |
667 specifies the maximum position in the buffer that point can be skipped | |
668 to. Point will stop at or before @var{limit}. | |
669 | |
670 In the following example, point is initially located directly before the | |
671 @samp{T}. After the form is evaluated, point is located at the end of | |
672 that line (between the @samp{t} of @samp{hat} and the newline). The | |
673 function skips all letters and spaces, but not newlines. | |
674 | |
675 @example | |
676 @group | |
677 ---------- Buffer: foo ---------- | |
678 I read "@point{}The cat in the hat | |
679 comes back" twice. | |
680 ---------- Buffer: foo ---------- | |
681 @end group | |
682 | |
683 @group | |
684 (skip-chars-forward "a-zA-Z ") | |
685 @result{} nil | |
686 | |
687 ---------- Buffer: foo ---------- | |
688 I read "The cat in the hat@point{} | |
689 comes back" twice. | |
690 ---------- Buffer: foo ---------- | |
691 @end group | |
692 @end example | |
693 @end defun | |
694 | |
695 @defun skip-chars-backward character-set &optional limit | |
696 This function moves point backward, skipping characters that match | |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
697 @var{character-set}, until @var{limit}. It is just like |
6552 | 698 @code{skip-chars-forward} except for the direction of motion. |
699 @end defun | |
700 | |
701 @node Excursions | |
702 @section Excursions | |
703 @cindex excursion | |
704 | |
705 It is often useful to move point ``temporarily'' within a localized | |
706 portion of the program, or to switch buffers temporarily. This is | |
707 called an @dfn{excursion}, and it is done with the @code{save-excursion} | |
708 special form. This construct saves the current buffer and its values of | |
709 point and the mark so they can be restored after the completion of the | |
710 excursion. | |
711 | |
712 The forms for saving and restoring the configuration of windows are | |
713 described elsewhere (see @ref{Window Configurations}, and @pxref{Frame | |
714 Configurations}). | |
715 | |
716 @defspec save-excursion forms@dots{} | |
717 @cindex mark excursion | |
718 @cindex point excursion | |
719 @cindex current buffer excursion | |
720 The @code{save-excursion} special form saves the identity of the current | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
721 buffer and the values of point and the mark in it, evaluates |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
722 @var{forms}, and finally restores the buffer and its saved values of |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
723 point and the mark. All three saved values are restored even in case of |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
724 an abnormal exit via @code{throw} or error (@pxref{Nonlocal Exits}). |
6552 | 725 |
726 The @code{save-excursion} special form is the standard way to switch | |
727 buffers or move point within one part of a program and avoid affecting | |
728 the rest of the program. It is used more than 500 times in the Lisp | |
729 sources of Emacs. | |
730 | |
731 @code{save-excursion} does not save the values of point and the mark for | |
732 other buffers, so changes in other buffers remain in effect after | |
733 @code{save-excursion} exits. | |
734 | |
735 @cindex window excursions | |
736 Likewise, @code{save-excursion} does not restore window-buffer | |
737 correspondences altered by functions such as @code{switch-to-buffer}. | |
738 One way to restore these correspondences, and the selected window, is to | |
739 use @code{save-window-excursion} inside @code{save-excursion} | |
740 (@pxref{Window Configurations}). | |
741 | |
742 The value returned by @code{save-excursion} is the result of the last of | |
743 @var{forms}, or @code{nil} if no @var{forms} are given. | |
744 | |
745 @example | |
746 @group | |
747 (save-excursion | |
748 @var{forms}) | |
749 @equiv{} | |
750 (let ((old-buf (current-buffer)) | |
751 (old-pnt (point-marker)) | |
752 (old-mark (copy-marker (mark-marker)))) | |
753 (unwind-protect | |
754 (progn @var{forms}) | |
755 (set-buffer old-buf) | |
756 (goto-char old-pnt) | |
757 (set-marker (mark-marker) old-mark))) | |
758 @end group | |
759 @end example | |
760 @end defspec | |
761 | |
21682
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
762 Although @code{save-excursion} saves the location of the mark, it does |
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
763 not prevent functions which modify the buffer from setting |
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
764 @code{deactivate-mark}, and thus causing the deactivation of the mark |
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
765 after the command finishes. @xref{The Mark}. |
90da2489c498
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
21007
diff
changeset
|
766 |
6552 | 767 @node Narrowing |
768 @section Narrowing | |
769 @cindex narrowing | |
770 @cindex restriction (in a buffer) | |
771 @cindex accessible portion (of a buffer) | |
772 | |
773 @dfn{Narrowing} means limiting the text addressable by Emacs editing | |
774 commands to a limited range of characters in a buffer. The text that | |
775 remains addressable is called the @dfn{accessible portion} of the | |
776 buffer. | |
777 | |
778 Narrowing is specified with two buffer positions which become the | |
779 beginning and end of the accessible portion. For most editing commands | |
780 and most Emacs primitives, these positions replace the values of the | |
781 beginning and end of the buffer. While narrowing is in effect, no text | |
782 outside the accessible portion is displayed, and point cannot move | |
783 outside the accessible portion. | |
784 | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
785 Values such as positions or line numbers, which usually count from the |
6552 | 786 beginning of the buffer, do so despite narrowing, but the functions |
787 which use them refuse to operate on text that is inaccessible. | |
788 | |
789 The commands for saving buffers are unaffected by narrowing; they save | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
790 the entire buffer regardless of any narrowing. |
6552 | 791 |
792 @deffn Command narrow-to-region start end | |
793 This function sets the accessible portion of the current buffer to start | |
794 at @var{start} and end at @var{end}. Both arguments should be character | |
795 positions. | |
796 | |
797 In an interactive call, @var{start} and @var{end} are set to the bounds | |
798 of the current region (point and the mark, with the smallest first). | |
799 @end deffn | |
800 | |
801 @deffn Command narrow-to-page move-count | |
802 This function sets the accessible portion of the current buffer to | |
803 include just the current page. An optional first argument | |
804 @var{move-count} non-@code{nil} means to move forward or backward by | |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
805 @var{move-count} pages and then narrow to one page. The variable |
6552 | 806 @code{page-delimiter} specifies where pages start and end |
807 (@pxref{Standard Regexps}). | |
808 | |
809 In an interactive call, @var{move-count} is set to the numeric prefix | |
810 argument. | |
811 @end deffn | |
812 | |
813 @deffn Command widen | |
814 @cindex widening | |
815 This function cancels any narrowing in the current buffer, so that the | |
816 entire contents are accessible. This is called @dfn{widening}. | |
817 It is equivalent to the following expression: | |
818 | |
819 @example | |
820 (narrow-to-region 1 (1+ (buffer-size))) | |
821 @end example | |
822 @end deffn | |
823 | |
824 @defspec save-restriction body@dots{} | |
825 This special form saves the current bounds of the accessible portion, | |
826 evaluates the @var{body} forms, and finally restores the saved bounds, | |
827 thus restoring the same state of narrowing (or absence thereof) formerly | |
828 in effect. The state of narrowing is restored even in the event of an | |
7729
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
829 abnormal exit via @code{throw} or error (@pxref{Nonlocal Exits}). |
a1c07008521d
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
7086
diff
changeset
|
830 Therefore, this construct is a clean way to narrow a buffer temporarily. |
6552 | 831 |
832 The value returned by @code{save-restriction} is that returned by the | |
833 last form in @var{body}, or @code{nil} if no body forms were given. | |
834 | |
835 @c Wordy to avoid overfull hbox. --rjc 16mar92 | |
836 @strong{Caution:} it is easy to make a mistake when using the | |
837 @code{save-restriction} construct. Read the entire description here | |
838 before you try it. | |
839 | |
840 If @var{body} changes the current buffer, @code{save-restriction} still | |
841 restores the restrictions on the original buffer (the buffer whose | |
21007
66d807bdc5b4
*** empty log message ***
Richard M. Stallman <rms@gnu.org>
parents:
14504
diff
changeset
|
842 restrictions it saved from), but it does not restore the identity of the |
6552 | 843 current buffer. |
844 | |
845 @code{save-restriction} does @emph{not} restore point and the mark; use | |
846 @code{save-excursion} for that. If you use both @code{save-restriction} | |
847 and @code{save-excursion} together, @code{save-excursion} should come | |
848 first (on the outside). Otherwise, the old point value would be | |
849 restored with temporary narrowing still in effect. If the old point | |
850 value were outside the limits of the temporary narrowing, this would | |
851 fail to restore it accurately. | |
852 | |
853 The @code{save-restriction} special form records the values of the | |
854 beginning and end of the accessible portion as distances from the | |
855 beginning and end of the buffer. In other words, it records the amount | |
856 of inaccessible text before and after the accessible portion. | |
857 | |
858 This method yields correct results if @var{body} does further narrowing. | |
859 However, @code{save-restriction} can become confused if the body widens | |
860 and then make changes outside the range of the saved narrowing. When | |
861 this is what you want to do, @code{save-restriction} is not the right | |
862 tool for the job. Here is what you must use instead: | |
863 | |
864 @example | |
865 @group | |
866 (let ((beg (point-min-marker)) | |
867 (end (point-max-marker))) | |
868 (unwind-protect | |
869 (progn @var{body}) | |
870 (save-excursion | |
871 (set-buffer (marker-buffer beg)) | |
872 (narrow-to-region beg end)))) | |
873 @end group | |
874 @end example | |
875 | |
876 Here is a simple example of correct use of @code{save-restriction}: | |
877 | |
878 @example | |
879 @group | |
880 ---------- Buffer: foo ---------- | |
881 This is the contents of foo | |
882 This is the contents of foo | |
883 This is the contents of foo@point{} | |
884 ---------- Buffer: foo ---------- | |
885 @end group | |
886 | |
887 @group | |
888 (save-excursion | |
889 (save-restriction | |
890 (goto-char 1) | |
891 (forward-line 2) | |
892 (narrow-to-region 1 (point)) | |
893 (goto-char (point-min)) | |
894 (replace-string "foo" "bar"))) | |
895 | |
896 ---------- Buffer: foo ---------- | |
897 This is the contents of bar | |
898 This is the contents of bar | |
899 This is the contents of foo@point{} | |
900 ---------- Buffer: foo ---------- | |
901 @end group | |
902 @end example | |
903 @end defspec |