aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2007-02-10 11:21:30 +0000
committerEli Zaretskii2007-02-10 11:21:30 +0000
commitd9f114a3de88526b4776e3bc2ac9dc04f641afae (patch)
tree958d76e9541e5ccc12e0d291423fe2303c701d19
parent493cf720aa12a23a2b266f75d959ba2239da2c5f (diff)
downloademacs-d9f114a3de88526b4776e3bc2ac9dc04f641afae.tar.gz
emacs-d9f114a3de88526b4776e3bc2ac9dc04f641afae.zip
(Programming Example): Put constant strings in :format.
-rw-r--r--man/widget.texi6
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}).
349 (let ((inhibit-read-only t)) 349 (let ((inhibit-read-only t))
350 (erase-buffer)) 350 (erase-buffer))
351 (remove-overlays) 351 (remove-overlays)
352 (widget-insert "Here is some documentation.\n\nName: ") 352 (widget-insert "Here is some documentation.\n\n")
353 (widget-create 'editable-field 353 (widget-create 'editable-field
354 :size 13 354 :size 13
355 :format "%v " ; Text after the field! 355 :format "Name: %v " ; Text after the field!
356 "My Name") 356 "My Name")
357 (widget-create 'menu-choice 357 (widget-create 'menu-choice
358 :tag "Choose" 358 :tag "Choose"
@@ -364,8 +364,8 @@ Interface}).
364 '(item :tag "This option" :value "This") 364 '(item :tag "This option" :value "This")
365 '(choice-item "That option") 365 '(choice-item "That option")
366 '(editable-field :menu-tag "No option" "Thus option")) 366 '(editable-field :menu-tag "No option" "Thus option"))
367 (widget-insert "Address: ")
368 (widget-create 'editable-field 367 (widget-create 'editable-field
368 :format "Address: %v"
369 "Some Place\nIn some City\nSome country.") 369 "Some Place\nIn some City\nSome country.")
370 (widget-insert "\nSee also ") 370 (widget-insert "\nSee also ")
371 (widget-create 'link 371 (widget-create 'link