mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-21 13:31:37 -07:00
Code Issues Projects Releases Wiki Activity

(widget-default-get): Doc fix.

Browse source 
(widget-editable-list-entry-create): Apply :value-to-external to
the value returned from wiget-default-get.
This commit is contained in:
Richard M. Stallman 1998-06-15 22:07:42 +00:00
parent e548a4f766
commit 416cd771be
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/wid-edit.el
View file

@ -490,7 +490,7 @@ Otherwise, just return the value."
:value-to-internal value)))
(defun widget-default-get (widget)
"Extract the defaylt value of WIDGET."
"Extract the default value of WIDGET."
(or (widget-get widget :value)
(widget-apply widget :default-get)))
@ -2657,7 +2657,9 @@ when he invoked the menu."
(setq child (widget-create-child-value
widget type value))
(setq child (widget-create-child-value
widget type (widget-default-get type)))))
widget type
(widget-apply type :value-to-external
(widget-default-get type))))))
(t
(error "Unknown escape `%c'" escape)))))
(widget-put widget