From d227e322293aef0d6b6a1702ee9dd4c2b22558eb Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Sat, 22 Dec 2012 14:04:09 -0800
Subject: [PATCH] * doc/misc/widget.texi (Programming Example): Break some long
 lines.

---
 doc/misc/ChangeLog   |  2 ++
 doc/misc/widget.texi | 21 ++++++++++++---------
 2 files changed, 14 insertions(+), 9 deletions(-)

diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index 83e91e55a36..f15dedb2b9f 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -1,5 +1,7 @@
 2012-12-22  Glenn Morris  <rgm@gnu.org>
 
+	* widget.texi (Programming Example): Break some long lines.
+
 	* wisent.texi (Wisent Overview): Fix xref.
 	(Grammar format, Understanding the automaton): Avoid overfill.
 
diff --git a/doc/misc/widget.texi b/doc/misc/widget.texi
index d5514fc936c..182dbb430ac 100644
--- a/doc/misc/widget.texi
+++ b/doc/misc/widget.texi
@@ -364,13 +364,14 @@ Interface}).
   (setq widget-example-repeat
         (widget-create 'editable-list
                        :entry-format "%i %d %v"
-                       :notify (lambda (widget &rest ignore)
-                                 (let ((old (widget-get widget
-                                                        ':example-length))
-                                       (new (length (widget-value widget))))
-                                   (unless (eq old new)
-                                     (widget-put widget ':example-length new)
-                                     (message "You can count to %d." new))))
+                       :notify
+                       (lambda (widget &rest ignore)
+                         (let ((old (widget-get widget
+                                                ':example-length))
+                               (new (length (widget-value widget))))
+                           (unless (eq old new)
+                             (widget-put widget ':example-length new)
+                             (message "You can count to %d." new))))
                        :value '("One" "Eh, two?" "Five!")
                        '(editable-field :value "three")))
   (widget-insert "\n\nSelect multiple:\n\n")
@@ -387,11 +388,13 @@ Interface}).
                  :notify (lambda (widget &rest ignore)
                            (message "You selected %s"
                                     (widget-value widget)))
-                 '(item "One") '(item "Another One.") '(item "A Final One."))
+                 '(item "One") '(item "Another One.")
+                 '(item "A Final One."))
   (widget-insert "\n")
   (widget-create 'push-button
                  :notify (lambda (&rest ignore)
-                           (if (= (length (widget-value widget-example-repeat))
+                           (if (= (length
+                                   (widget-value widget-example-repeat))
                                   3)
                                (message "Congratulation!")
                              (error "Three was the count!")))
-- 
2.39.5