;; the left-overshoot is to make sure that
;; bar numbers stick out of margin uniformly.
;;
- (list
-
- (if (ly:get-option 'eps-pad-boxes)
- (min left-overshoot (car xext))
- (car xext))
- (car yext) (cdr xext) (cdr yext))))
-
+ (list (min left-overshoot (car xext))
+ (car yext) (cdr xext) (cdr yext))))
(rounded-bbox (to-bp-box bbox))
(port (ly:outputter-port outputter))
(header (eps-header paper rounded-bbox load-fonts?)))
;; skip booktitles.
(if (and
- (not (ly:get-option 'include-book-title-preview))
+ (not (ly:get-option 'preview-include-book-title))
(pair? systems)
(ly:prob-property (car systems) 'is-book-title #f))