diff options
| author | Xue Fuqiao | 2013-08-14 22:02:46 +0800 |
|---|---|---|
| committer | Xue Fuqiao | 2013-08-14 22:02:46 +0800 |
| commit | d48d97ee4ab07e0c3e8c1a63efcfb707eef1b352 (patch) | |
| tree | 1a5ac8e65ef15d0e9acb92a758c3ad672ac6b90c /src | |
| parent | 7510a061cbcec1b0d0f255448c9bf81638004cdb (diff) | |
| download | emacs-d48d97ee4ab07e0c3e8c1a63efcfb707eef1b352.tar.gz emacs-d48d97ee4ab07e0c3e8c1a63efcfb707eef1b352.zip | |
Refine previous change.
Diffstat (limited to 'src')
| -rw-r--r-- | src/marker.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/marker.c b/src/marker.c index 2f91bdf9727..d25e7104b57 100644 --- a/src/marker.c +++ b/src/marker.c | |||
| @@ -536,8 +536,11 @@ set_marker_internal (Lisp_Object marker, Lisp_Object position, | |||
| 536 | DEFUN ("set-marker", Fset_marker, Sset_marker, 2, 3, 0, | 536 | DEFUN ("set-marker", Fset_marker, Sset_marker, 2, 3, 0, |
| 537 | doc: /* Position MARKER before character number POSITION in BUFFER. | 537 | doc: /* Position MARKER before character number POSITION in BUFFER. |
| 538 | If BUFFER is omitted or nil, it defaults to the current buffer. If | 538 | If BUFFER is omitted or nil, it defaults to the current buffer. If |
| 539 | POSITION is nil, makes marker point nowhere so it no longer slows down | 539 | POSITION is less than 1, MARKER is moved to the beginning of the |
| 540 | editing in any buffer. Returns MARKER. */) | 540 | buffer. If POSITION is greater than the size of the buffer, marker is |
| 541 | moved to the end of the buffer. If POSITION is nil, makes marker | ||
| 542 | point nowhere so it no longer slows down editing in any buffer. | ||
| 543 | Returns MARKER. */) | ||
| 541 | (Lisp_Object marker, Lisp_Object position, Lisp_Object buffer) | 544 | (Lisp_Object marker, Lisp_Object position, Lisp_Object buffer) |
| 542 | { | 545 | { |
| 543 | return set_marker_internal (marker, position, buffer, 0); | 546 | return set_marker_internal (marker, position, buffer, 0); |