From cf36c821278414cad8584c690210577ad0a38e70 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Fri, 22 Dec 2017 16:26:08 -0500
Subject: [PATCH] Avoid some overfull lines in PDF lispref

* doc/lispref/commands.texi (Reading One Event):
* doc/lispref/display.texi (SVG Images):
* doc/lispref/frames.texi (Size Parameters):
* doc/lispref/syntax.texi (Categories):
* doc/lispref/windows.texi (Frame Layouts with Side Windows):
Avoid overfull lines.
---
 doc/lispref/commands.texi |  6 +++---
 doc/lispref/display.texi  |  3 ++-
 doc/lispref/frames.texi   |  3 ++-
 doc/lispref/syntax.texi   |  9 +++++----
 doc/lispref/windows.texi  | 12 ++++++++----
 5 files changed, 20 insertions(+), 13 deletions(-)

diff --git a/doc/lispref/commands.texi b/doc/lispref/commands.texi
index 16b58d3d3c8..a958cfdcad2 100644
--- a/doc/lispref/commands.texi
+++ b/doc/lispref/commands.texi
@@ -2634,9 +2634,9 @@ The return value is the matching value from @var{choices}.
 @lisp
 (read-multiple-choice
  "Continue connecting?"
- '((?a "always" "Accept this certificate this session and for all future sessions.")
-   (?s "session only" "Accept this certificate this session only.")
-   (?n "no" "Refuse to use this certificate, and close the connection.")))
+ '((?a "always" "Accept certificate for this and future sessions.")
+   (?s "session only" "Accept certificate this session only.")
+   (?n "no" "Refuse to use certificate, close connection.")))
 @end lisp
 
 The @code{read-multiple-choice-face} face is used to highlight the
diff --git a/doc/lispref/display.texi b/doc/lispref/display.texi
index 53c2014de05..bf70717e05e 100644
--- a/doc/lispref/display.texi
+++ b/doc/lispref/display.texi
@@ -5543,7 +5543,8 @@ inserts an image with a circle:
 @lisp
 (let ((svg (svg-create 400 400 :stroke-width 10)))
   (svg-gradient svg "gradient1" 'linear '((0 . "red") (100 . "blue")))
-  (svg-circle svg 200 200 100 :gradient "gradient1" :stroke-color "green")
+  (svg-circle svg 200 200 100 :gradient "gradient1"
+                  :stroke-color "green")
   (insert-image (svg-image svg)))
 @end lisp
 
diff --git a/doc/lispref/frames.texi b/doc/lispref/frames.texi
index edddbddfbf3..1d4671b7e00 100644
--- a/doc/lispref/frames.texi
+++ b/doc/lispref/frames.texi
@@ -1716,7 +1716,8 @@ file as, for example
 
 @example
 (setq default-frame-alist
-    '((fullscreen . fullboth) (fullscreen-restore . fullheight)))
+    '((fullscreen . fullboth)
+      (fullscreen-restore . fullheight)))
 @end example
 
 This will give a new frame full height after typing in it @key{F11} for
diff --git a/doc/lispref/syntax.texi b/doc/lispref/syntax.texi
index b37f2b22b82..566270fb52b 100644
--- a/doc/lispref/syntax.texi
+++ b/doc/lispref/syntax.texi
@@ -1099,12 +1099,13 @@ bidi-class}).
   (let ((category-table (make-category-table))
         ;; Create a char-table which gives the 'bidi-class' Unicode
         ;; property for each character.
-        (uniprop-table (unicode-property-table-internal 'bidi-class)))
+        (uniprop-table
+         (unicode-property-table-internal 'bidi-class)))
     (define-category ?R "Characters of bidi-class R, AL, or RLO"
                      category-table)
-    ;; Modify the category entry of each character whose 'bidi-class'
-    ;; Unicode property is R, AL, or RLO -- these have a
-    ;; right-to-left directionality.
+    ;; Modify the category entry of each character whose
+    ;; 'bidi-class' Unicode property is R, AL, or RLO --
+    ;; these have a right-to-left directionality.
     (map-char-table
      #'(lambda (key val)
          (if (memq val '(R AL RLO))
diff --git a/doc/lispref/windows.texi b/doc/lispref/windows.texi
index d73b410f977..30a3c4a6eb2 100644
--- a/doc/lispref/windows.texi
+++ b/doc/lispref/windows.texi
@@ -3391,7 +3391,8 @@ producing the frame layout sketched above.
 @example
 @group
 (defvar parameters
-  '(window-parameters . ((no-other-window . t) (no-delete-other-windows . t))))
+  '(window-parameters . ((no-other-window . t)
+                         (no-delete-other-windows . t))))
 
 (setq fit-window-to-buffer-horizontally t)
 (setq window-resize-pixelwise t)
@@ -3404,10 +3405,13 @@ producing the frame layout sketched above.
    ("\\*Tags List\\*" display-buffer-in-side-window
     (side . right) (slot . 0) (window-width . fit-window-to-buffer)
     (preserve-size . (t . nil)) ,parameters)
-   ("\\*\\(?:help\\|grep\\|Completions\\)\\*" display-buffer-in-side-window
-    (side . bottom) (slot . -1) (preserve-size . (nil . t)) ,parameters)
+   ("\\*\\(?:help\\|grep\\|Completions\\)\\*"
+    display-buffer-in-side-window
+    (side . bottom) (slot . -1) (preserve-size . (nil . t))
+    ,parameters)
    ("\\*\\(?:shell\\|compilation\\)\\*" display-buffer-in-side-window
-    (side . bottom) (slot . 1) (preserve-size . (nil . t)) ,parameters)))
+    (side . bottom) (slot . 1) (preserve-size . (nil . t))
+    ,parameters)))
 @end group
 @end example
 
-- 
2.39.2