(defun custom-variable-prompt () "Prompt for a custom variable, defaulting to the variable at point. + If that variable is an alias, the default is the actual custom variable + at the end of the chain of aliases. Return a list suitable for use in `interactive'." ! (let ((v (indirect-variable (variable-at-point))) (enable-recursive-minibuffers t) val)
The default that the user sees should be what's in the buffer. Otherwise it will be mysterious. The conversion of aliases to their real names should happen only on the user's input. If you just leave this function unchanged and install the rest, it should work. However, it would be good to make one additional change: the same commands should display a message of the form `%s' is an alias for `%s' in the echo area. _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel