Function: custom-variable-prompt
custom-variable-prompt is a byte-compiled function defined in
cus-edit.el.gz.
Signature
(custom-variable-prompt)
Documentation
Prompt for a custom variable, defaulting to the variable at point.
Return a list suitable for use in interactive.
Source Code
;; Defined in /usr/src/emacs/lisp/cus-edit.el.gz
(defun custom-variable-prompt ()
"Prompt for a custom variable, defaulting to the variable at point.
Return a list suitable for use in `interactive'."
(let* ((v (variable-at-point))
(default (and (symbolp v) (custom-variable-p v) (symbol-name v)))
(enable-recursive-minibuffers t)
val)
(setq val (completing-read (format-prompt "Customize variable" default)
obarray 'custom-variable-p t nil nil default))
(list (if (equal val "")
(if (symbolp v) v nil)
(intern val)))))