From 0b6fb72e8c43ef86ff770ecf7c5b046fc005a39a Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Sun, 3 Aug 2008 22:44:17 -0300 Subject: [PATCH] Oops. --- scm/framework-ps.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm index 56507ce0e3..5e26c1d4b7 100644 --- a/scm/framework-ps.scm +++ b/scm/framework-ps.scm @@ -548,9 +548,9 @@ (rounder (/ (* x scale) (ly:bp 1))))))) (list (directed-round (car box) floor) (directed-round (cadr box) floor) - (max (1+ (car box)) (directed-round (caddr box) ceiling) - (max (1+ (cadr box)) (directed-round (cadddr box) ceiling) - ))))) + (max (1+ (car box)) (directed-round (caddr box) ceiling)) + (max (1+ (cadr box)) (directed-round (cadddr box) ceiling)) + ))) (let* ((outputter (ly:make-paper-outputter ;; FIXME: better wrap open/open-file, -- 2.39.2