Rename new user variable next-error-verbosity' to next-error-verbose'

* etc/NEWS: Update entry to match renaming.

* lisp/simple.el (next-error-verbose): Rename.
(next-error, next-error-internal): Match rename.
This commit is contained in:
Stephen Leake 2019-04-14 09:23:24 -07:00
parent 7ba7def5ca
commit ca449fb1c1
2 changed files with 6 additions and 6 deletions

View file

@ -309,7 +309,7 @@ and directory-local variables.
longer.
---
** next-error-verbosity controls when `next-error' outputs a message
** next-error-verbose controls when `next-error' outputs a message
about the error locus.

View file

@ -110,9 +110,9 @@ If non-nil, the value is passed directly to `recenter'."
:type 'hook
:group 'next-error)
(defcustom next-error-verbosity nil
"If nil, `next-error' always outputs the current error buffer.
If non-nil, the message is output only when the error buffer
(defcustom next-error-verbose t
"If non-nil, `next-error' always outputs the current error buffer.
If nil, the message is output only when the error buffer
changes."
:group 'next-error
:type 'boolean
@ -323,7 +323,7 @@ To control which errors are matched, customize the variable
(funcall next-error-function (prefix-numeric-value arg) reset)
(let ((prev next-error-last-buffer))
(next-error-found buffer (current-buffer))
(when (or (not next-error-verbosity)
(when (or next-error-verbose
(not (eq prev next-error-last-buffer)))
(message "%s locus from %s"
(cond (reset "First")
@ -339,7 +339,7 @@ To control which errors are matched, customize the variable
(funcall next-error-function 0 nil)
(let ((prev next-error-last-buffer))
(next-error-found buffer (current-buffer))
(when (or (not next-error-verbosity)
(when (or next-error-verbose
(not (eq prev next-error-last-buffer)))
(message "Current locus from %s" next-error-last-buffer)))))