Mercurial > emacs
changeset 17276:fc3829279a06
(set-variable): Suggest only valid user variable.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 01 Apr 1997 22:09:02 +0000 |
parents | 03f89f7e614e |
children | 6ee6f94817dc |
files | lisp/simple.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Tue Apr 01 22:04:58 1997 +0000 +++ b/lisp/simple.el Tue Apr 01 22:09:02 1997 +0000 @@ -2982,7 +2982,7 @@ (let* ((v (variable-at-point)) (enable-recursive-minibuffers t) (val (completing-read - (if v + (if (user-variable-p v) (format "Set variable (default %s): " v) "Set variable: ") obarray 'user-variable-p t))