From 6aae2daaecd2f19d67b006b141822ad9013fd303 Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Fri, 10 Nov 2006 16:36:54 +0100 Subject: [PATCH] nitpicks. --- scm/framework-ps.scm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm index f06424d72c..e17c3d4780 100644 --- a/scm/framework-ps.scm +++ b/scm/framework-ps.scm @@ -482,8 +482,8 @@ (ly:output-formats)))) (define-public (dump-stencil-as-EPS paper dump-me filename - load-fonts - ) + load-fonts) + (let* ((xext (ly:stencil-extent dump-me X)) (yext (ly:stencil-extent dump-me Y)) @@ -537,8 +537,6 @@ "ps")) (port (ly:outputter-port outputter)) - - (rounded-bbox (to-bp-box bbox)) (port (ly:outputter-port outputter)) (header (eps-header paper rounded-bbox load-fonts))) -- 2.39.5