summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorThien-Thi Nguyen <ttn@gnuvola.org>2007-06-23 12:19:38 +0000
committerThien-Thi Nguyen <ttn@gnuvola.org>2007-06-23 12:19:38 +0000
commit28adf31caa5f571d30c028a63563db94a548f164 (patch)
treefc1c0fe900a43bb48f29c3a78550df7d4a9b2637 /lisp
parent56fbb895add1b5ced98534e448980797112bdbae (diff)
downloademacs-28adf31caa5f571d30c028a63563db94a548f164.tar.gz
(next-error-recenter): Accept `(4)' as well;
also, specify `integer' instead of `number'.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/simple.el7
2 files changed, 9 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8f687cfdd15..9b00e749452 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-23 Thien-Thi Nguyen <ttn@gnuvola.org>
+
+ * simple.el (next-error-recenter): Accept `(4)' as well;
+ also, specify `integer' instead of `number'.
+
2007-06-23 Eli Zaretskii <eliz@gnu.org>
* ls-lisp.el (insert-directory): If an invalid regexp error is
diff --git a/lisp/simple.el b/lisp/simple.el
index 765032f9f8d..b6b55a5f2eb 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -157,9 +157,10 @@ If `fringe-arrow', indicate the locus by the fringe arrow."
:version "22.1")
(defcustom next-error-recenter nil
- "*Display the line in the visited source file recentered to this number.
-If nil, don't do any recentering. See `recenter'."
- :type '(choice (number :tag "Argument for `recenter'")
+ "*Display the line in the visited source file recentered as specified.
+If non-nil, the value is passed directly to `recenter'."
+ :type '(choice (integer :tag "Line to recenter to")
+ (const :tag "Center of window" (4))
(const :tag "No recentering" nil))
:group 'next-error
:version "23.1")