mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-23 10:34:07 +00:00
Code Issues Releases Activity

(set-variable): Suggest only valid user variable.

Browse Source
This commit is contained in:
Richard M. Stallman 1997-04-01 22:09:02 +00:00
parent 5e78e475d4
commit 2b98929656
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/simple.el
View File

@ -2982,7 +2982,7 @@ it were the arg to `interactive' (which see) to interactively read the value."
(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))