diff options
| author | Glenn Morris <rgm@gnu.org> | 2012-12-22 14:04:09 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2012-12-22 14:04:09 -0800 |
| commit | d227e322293aef0d6b6a1702ee9dd4c2b22558eb (patch) | |
| tree | 7bcbd777e9ba6c8096607d3236661f861a13a449 | |
| parent | 2ecfdaa6a9a2c14364f714b138c72e50f1ad30c8 (diff) | |
| download | emacs-d227e322293aef0d6b6a1702ee9dd4c2b22558eb.tar.gz | |
* doc/misc/widget.texi (Programming Example): Break some long lines.
| -rw-r--r-- | doc/misc/ChangeLog | 2 | ||||
| -rw-r--r-- | 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!"))) |