diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-09-09 00:21:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-09-09 00:21:07 +0000 |
| commit | a1c46b4dc9894c23d0aafeca9d987d00a6354fd9 (patch) | |
| tree | 0bb12a3c7cd0bcfe39e74a1f497571eea35ef85a | |
| parent | e963ef1ed065c8e6650fa1716b8ab99f7581781c (diff) | |
| download | emacs-a1c46b4dc9894c23d0aafeca9d987d00a6354fd9.tar.gz | |
(custom-variable-save): Fixed doc string.
(custom-variable-menu): Make it clear that `Lisp
mode' edit the initial lisp expression.
| -rw-r--r-- | lisp/cus-edit.el | 4 |
1 files changed, 2 insertions, 2 deletions
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))) |