From 34d3e5e54d8036b99e42cfb6079e1f349eeb801f Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Fri, 10 Feb 2006 12:31:31 +0000 Subject: [PATCH] *** empty log message *** --- Documentation/topdocs/NEWS.tely | 7 ++++--- scm/paper-system.scm | 4 +--- 2 files changed, 5 insertions(+), 6 deletions(-) diff --git a/Documentation/topdocs/NEWS.tely b/Documentation/topdocs/NEWS.tely index db850bdf91..fae437abc0 100644 --- a/Documentation/topdocs/NEWS.tely +++ b/Documentation/topdocs/NEWS.tely @@ -64,7 +64,8 @@ which scares away people. @end ignore - +@item Thicknesses of tie and slurs may be tuned separately for the +endings and the middle part. @item Items directly connected with a music input element may be parenthesized, for example, @@ -144,8 +145,8 @@ This feature was sponsored by Trevor Bača. #(set-default-paper-size "a7" 'landscape) \paper { - headsep = 0.0 - footsep = 0.0 + head-separation = 0.0 + foot-separation = 0.0 } \book { \score { diff --git a/scm/paper-system.scm b/scm/paper-system.scm index eec080e253..70985aae66 100644 --- a/scm/paper-system.scm +++ b/scm/paper-system.scm @@ -48,6 +48,7 @@ (define-public (paper-system-annotate system layout) "Add arrows and texts to indicate which lengths are set." + (let* ((annotations (ly:make-stencil '() (cons 0 2) (cons 0 0))) (append-stencil @@ -69,7 +70,6 @@ (next-padding (ly:prob-property system 'next-padding (ly:output-def-lookup layout 'between-system-padding) )) - ) (if (number-pair? bbox-extent) @@ -89,8 +89,6 @@ (annotate-property "next-space" (interval-translate (cons (- next-space) 0) (car refp-extent)) #t))) - - (set! (ly:prob-property system 'stencil) (ly:stencil-add -- 2.39.2