From 7d47a8c122fedb39f65c6b5e9a16b2065e2d734b Mon Sep 17 00:00:00 2001 From: Patrick McCarty Date: Sun, 24 Oct 2010 22:11:34 -0700 Subject: [PATCH] annotate-spacing: Add condition for 'last-bottom-spacing. --- scm/paper-system.scm | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) diff --git a/scm/paper-system.scm b/scm/paper-system.scm index 4ddcd89..5e6d2e0 100644 --- a/scm/paper-system.scm +++ b/scm/paper-system.scm @@ -86,6 +86,8 @@ ((and next-system (paper-system-title? next-system)) (ly:output-def-lookup layout 'score-markup-spacing)) + ((not next-system) + (ly:output-def-lookup layout 'last-bottom-spacing)) (else (ly:output-def-lookup layout 'system-system-spacing)))) (last-staff-Y (car (paper-system-staff-extents system)))) -- 1.7.3.2