diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2007-02-10 11:21:30 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2007-02-10 11:21:30 +0000 |
| commit | d9f114a3de88526b4776e3bc2ac9dc04f641afae (patch) | |
| tree | 958d76e9541e5ccc12e0d291423fe2303c701d19 /man/widget.texi | |
| parent | 493cf720aa12a23a2b266f75d959ba2239da2c5f (diff) | |
| download | emacs-d9f114a3de88526b4776e3bc2ac9dc04f641afae.tar.gz emacs-d9f114a3de88526b4776e3bc2ac9dc04f641afae.tar.bz2 emacs-d9f114a3de88526b4776e3bc2ac9dc04f641afae.zip | |
(Programming Example): Put constant strings in :format.
Diffstat (limited to 'man/widget.texi')
| -rw-r--r-- | man/widget.texi | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/man/widget.texi b/man/widget.texi index a55c2d529d3..22e5ce13631 100644 --- a/man/widget.texi +++ b/man/widget.texi @@ -349,10 +349,10 @@ Interface}). (let ((inhibit-read-only t)) (erase-buffer)) (remove-overlays) - (widget-insert "Here is some documentation.\n\nName: ") + (widget-insert "Here is some documentation.\n\n") (widget-create 'editable-field :size 13 - :format "%v " ; Text after the field! + :format "Name: %v " ; Text after the field! "My Name") (widget-create 'menu-choice :tag "Choose" @@ -364,8 +364,8 @@ Interface}). '(item :tag "This option" :value "This") '(choice-item "That option") '(editable-field :menu-tag "No option" "Thus option")) - (widget-insert "Address: ") (widget-create 'editable-field + :format "Address: %v" "Some Place\nIn some City\nSome country.") (widget-insert "\nSee also ") (widget-create 'link |