Commit cf36c821 authored by Glenn Morris's avatar Glenn Morris

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.
parent b07b56a3
......@@ -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
......
......@@ -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
......
......@@ -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
......
......@@ -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))
......
......@@ -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
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment