From d9f114a3de88526b4776e3bc2ac9dc04f641afae Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 10 Feb 2007 11:21:30 +0000 Subject: [PATCH] (Programming Example): Put constant strings in :format. --- man/widget.texi | 6 +++--- 1 file 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 -- 2.39.2