Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5b5cdd97
Commit
5b5cdd97
authored
Jun 01, 1997
by
Richard M. Stallman
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(custom-variable-prompt): Handle variable-at-point returning 0.
parent
0f337465
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
2 deletions
+3
-2
lisp/cus-edit.el
lisp/cus-edit.el
+3
-2
No files found.
lisp/cus-edit.el
View file @
5b5cdd97
...
...
@@ -362,7 +362,7 @@ Return a list suitable for use in `interactive'."
(
enable-recursive-minibuffers
t
)
val
)
(
setq
val
(
completing-read
(
if
v
(
if
(
symbolp
v
)
(
format
"Customize variable: (default %s) "
v
)
"Customize variable: "
)
obarray
(
lambda
(
symbol
)
...
...
@@ -370,7 +370,8 @@ Return a list suitable for use in `interactive'."
(
or
(
get
symbol
'custom-type
)
(
user-variable-p
symbol
))))))
(
list
(
if
(
equal
val
""
)
v
(
intern
val
)))))
(
if
(
symbolp
v
)
v
nil
)
(
intern
val
)))))
(
defun
custom-menu-filter
(
menu
widget
)
"Convert MENU to the form used by `widget-choose'.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment