From 64cdf08448ff26b3b038c7e6dd0b142644a6f192 Mon Sep 17 00:00:00 2001 From: Joe Neeman Date: Thu, 22 Feb 2007 08:47:53 +1100 Subject: [PATCH] Rename staff refpoints --- scm/paper-system.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scm/paper-system.scm b/scm/paper-system.scm index 55e48ebed8..6a391a3a0f 100644 --- a/scm/paper-system.scm +++ b/scm/paper-system.scm @@ -32,7 +32,7 @@ (ly:stencil-extent (paper-system-stencil system) axis)) (define-public (paper-system-staff-extents ps) - (ly:prob-property ps 'refpoint-Y-extent '(0 . 0))) + (ly:prob-property ps 'staff-refpoint-extent '(0 . 0))) (define-public (paper-system-annotate-last system layout) (let* @@ -142,7 +142,7 @@ "Y-extent" "next-padding" "space after next-padding") (annotate-extent-and-space paper-system-staff-extents (+ next-space next-padding) - "refpoint-Y-extent" "next-space+padding" + "staff-refpoint-extent" "next-space+padding" "space after next-space+padding")) (if estimate-extent (set! annotations -- 2.39.2