[Emacs-diffs] trunk r116181: Some doc related to tab-stops

[Glenn Morris]

------------------------------------------------------------
revno: 116181
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Mon 2014-01-27 20:49:02 -0500
message:
  Some doc related to tab-stops
  
  * doc/lispref/text.texi (Indent Tabs): Update related to tab-stops.
  
  * lisp/indent.el (tab-stop-list): Doc fix.  Add :version.
modified:
  doc/lispref/ChangeLog          changelog-20091113204419-o5vbwnq5f7feedwu-6155
  doc/lispref/text.texi          text.texi-20091113204419-o5vbwnq5f7feedwu-6215
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/indent.el                 indent.el-20091113204419-o5vbwnq5f7feedwu-230

=== modified file 'doc/lispref/ChangeLog'
--- a/doc/lispref/ChangeLog     2014-01-24 04:11:48 +0000
+++ b/doc/lispref/ChangeLog     2014-01-28 01:49:02 +0000
@@ -1,3 +1,7 @@
+2014-01-28  Glenn Morris  <address@hidden>
+
+       * text.texi (Indent Tabs): Update related to tab-stops.
+
 2014-01-24  Glenn Morris  <address@hidden>
 
        * control.texi (Handling Errors): Update with-demoted-errors.

=== modified file 'doc/lispref/text.texi'
--- a/doc/lispref/text.texi     2014-01-09 23:21:56 +0000
+++ b/doc/lispref/text.texi     2014-01-28 01:49:02 +0000
@@ -2460,19 +2460,19 @@
 
 @deffn Command tab-to-tab-stop
 This command inserts spaces or tabs before point, up to the next tab
-stop column defined by @code{tab-stop-list}.  It searches the list for
-an element greater than the current column number, and uses that element
-as the column to indent to.  It does nothing if no such element is
-found.
+stop column defined by @code{tab-stop-list}.
 @end deffn
 
 @defopt tab-stop-list
-This variable is the list of tab stop columns used by
address@hidden  The elements should be integers in increasing
-order.  The tab stop columns need not be evenly spaced.
+This variable defines the tab stop columns used by @code{tab-to-tab-stop}.
+It should be either @code{nil}, or a list of increasing integers,
+which need not be evenly spaced.  The list is implicitly
+extended to infinity through repetition of the interval between the
+last and penultimate elements (or @code{tab-width} if the list has
+fewer than two elements).  A value of @code{nil} means a tab stop
+every @code{tab-width} columns.
 
-Use @kbd{M-x edit-tab-stops} to edit the location of tab stops
-interactively.
+Use @kbd{M-x edit-tab-stops} to edit the location of tab stops interactively.
 @end defopt
 
 @node Motion by Indent

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-01-28 00:39:50 +0000
+++ b/lisp/ChangeLog    2014-01-28 01:49:02 +0000
@@ -1,5 +1,7 @@
 2014-01-28  Glenn Morris  <address@hidden>
 
+       * indent.el (tab-stop-list): Doc fix.  Add :version.
+
        * vc/pcvs.el (vc-editable-p, vc-checkout): Remove unused declarations.
        (cvs-append-to-ignore): Add compatibility alias.
 

=== modified file 'lisp/indent.el'
--- a/lisp/indent.el    2014-01-20 08:45:56 +0000
+++ b/lisp/indent.el    2014-01-28 01:49:02 +0000
@@ -586,16 +586,17 @@
          (move-marker opoint nil))
       (tab-to-tab-stop))))
 
-(defcustom tab-stop-list
-  nil
+(defcustom tab-stop-list nil
   "List of tab stop positions used by `tab-to-tab-stop'.
-This should be a list of integers, ordered from smallest to largest.
-It implicitly extends to infinity by repeating the last step (e.g. '(1 2 5)
-is equivalent to '(1 2 5 8 11)).
-If the list has less than 2 elements, `tab-width' is used as the \"last 
step\"."
+This should be nil, or a list of integers, ordered from smallest to largest.
+It implicitly extends to infinity through repetition of the last step.
+For example, '(1 2 5) is equivalent to '(1 2 5 8 11 ...).  If the list has
+fewer than 2 elements, `tab-width' is used as the \"last step\".
+A value of nil means a tab stop every `tab-width' columns."
   :group 'indent
+  :version "24.4"                       ; from explicit list to nil
+  :safe 'listp
   :type '(repeat integer))
-(put 'tab-stop-list 'safe-local-variable 'listp)
 
 (defvar edit-tab-stops-map
   (let ((map (make-sparse-keymap)))