* src/marker.c (set_marker): Reformat documentation.

diff --git a/doc/lispref/markers.texi b/doc/lispref/markers.texi
index cae14ab9a7892b3e7192c8ceadf0de81ae3ab5cb..05c3fc56fd4435dbc94dc39abad3acca55147620 100644 (file)
--- a/doc/lispref/markers.texi
+++ b/doc/lispref/markers.texi
@@ -279,6 +279,8 @@ This function returns the position that @var{marker} points to, or
 This function returns the buffer that @var{marker} points into, or
 @code{nil} if it points nowhere.
 
+@c FIXME: The `buffer' argument of `set-marker' already defaults to
+@c the current buffer, why use `(current-buffer)' explicitly here?
 @example
 @group
 (setq m (make-marker))
@@ -384,6 +386,7 @@ This is another name for @code{set-marker}.
 @node The Mark
 @section The Mark
 @cindex mark, the
+@c @cindex the mark?
 @cindex mark ring
 
   Each buffer has a special marker, which is designated @dfn{the

diff --git a/doc/lispref/positions.texi b/doc/lispref/positions.texi
index 5cb1a851a5b850c9da3fbc3957bd3ef63497d936..8a883061b93ba75f5f98198917d183579b7b3ded 100644 (file)
--- a/doc/lispref/positions.texi
+++ b/doc/lispref/positions.texi
@@ -805,7 +805,7 @@ thousands of times in the Lisp sources of Emacs.
 buffer, use @code{save-current-buffer} or @code{with-current-buffer}
 instead (@pxref{Current Buffer}).  If you need to save or restore
 window configurations, see the forms described in @ref{Window
-Configurations} and in @ref{Frame Configurations}.
+Configurations} and in @ref{Frame Configurations}. @c frameset?
 
 @defspec save-excursion body@dots{}
 @cindex mark excursion

diff --git a/src/ChangeLog b/src/ChangeLog
index 548ae5ab2c0d332cf59c655141e8288b4e474985..8a3186b85f27c9895cb436cd37e182b617cfea63 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -6,6 +6,10 @@
 
        * decompress.c (unwind_decompress): Always restore point.
 
+2013-08-14  Xue Fuqiao  <xfq.free@gmail.com>
+
+       * marker.c (set_marker): Reformat documentation.
+
 2013-08-14  Paul Eggert  <eggert@cs.ucla.edu>
 
        * xdisp.c (cursor_type_changed): Now static.

diff --git a/src/marker.c b/src/marker.c
index 6c50def51a304187bb5509471d2578eca77224fa..2f91bdf9727803f7d6a74e1548afa2e3e4b0332f 100644 (file)
--- a/src/marker.c
+++ b/src/marker.c
@@ -534,9 +534,9 @@ set_marker_internal (Lisp_Object marker, Lisp_Object position,
 }
 
 DEFUN ("set-marker", Fset_marker, Sset_marker, 2, 3, 0,
-       doc: /* Position MARKER before character number POSITION in BUFFER,
-which defaults to the current buffer.  If POSITION is nil,
-makes marker point nowhere so it no longer slows down
+       doc: /* Position MARKER before character number POSITION in BUFFER.
+If BUFFER is omitted or nil, it defaults to the current buffer.  If
+POSITION is nil, makes marker point nowhere so it no longer slows down
 editing in any buffer.  Returns MARKER.  */)
   (Lisp_Object marker, Lisp_Object position, Lisp_Object buffer)
 {