]> code.delx.au - gnu-emacs/commitdiff
* doc/misc/widget.texi (Programming Example): Break some long lines.
authorGlenn Morris <rgm@gnu.org>
Sat, 22 Dec 2012 22:04:09 +0000 (14:04 -0800)
committerGlenn Morris <rgm@gnu.org>
Sat, 22 Dec 2012 22:04:09 +0000 (14:04 -0800)
doc/misc/ChangeLog
doc/misc/widget.texi

index 83e91e55a3674cd7330f04ef2f94d0c020cc6198..f15dedb2b9f8eaaa8e43564f5c8c7684bafb52fa 100644 (file)
@@ -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.
 
index d5514fc936c969d0065492aef3f7889e9acd1f3e..182dbb430aceaedd0fc032764976d7d33d3f46e3 100644 (file)
@@ -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!")))