From: Richard M. Stallman Date: Tue, 9 Sep 1997 00:21:07 +0000 (+0000) Subject: (custom-variable-save): Fixed doc string. X-Git-Tag: emacs-20.1~125 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0db1ff2312c3b7cc3e252f1991121aa833d95501;p=emacs.git (custom-variable-save): Fixed doc string. (custom-variable-menu): Make it clear that `Lisp mode' edit the initial lisp expression. --- diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index c08c41eb428..d65dd8ae8be 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -1960,7 +1960,7 @@ Otherwise, look up symbol in `custom-guess-type-alist'." ("Don't show as Lisp expression" custom-variable-edit (lambda (widget) (eq (widget-get widget :custom-form) 'lisp))) - ("Show as Lisp expression" custom-variable-edit-lisp + ("Show initial Lisp expression" custom-variable-edit-lisp (lambda (widget) (eq (widget-get widget :custom-form) 'edit)))) "Alist of actions for the `custom-variable' widget. @@ -2023,7 +2023,7 @@ Optional EVENT is the location for the menu." (custom-redraw-magic widget))) (defun custom-variable-save (widget) - "Set the default value for the variable being edited by WIDGET." + "Set and save the value for the variable being edited by WIDGET." (let* ((form (widget-get widget :custom-form)) (state (widget-get widget :custom-state)) (child (car (widget-get widget :children)))