From 13e92a71b3a621afc8f904b89ffc27f474f53a3d Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Wed, 5 Mar 2003 00:03:06 +0000 Subject: [PATCH] (brew-one-figure): bugfix for large bass figures --- ChangeLog | 2 ++ input/regression/figured-bass.ly | 2 -- scm/bass-figure.scm | 7 ++++--- scm/grob-description.scm | 3 +-- 4 files changed, 7 insertions(+), 7 deletions(-) diff --git a/ChangeLog b/ChangeLog index 8448e2ecc3..ea2ce2696f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,7 @@ 2003-03-05 Han-Wen Nienhuys + * scm/bass-figure.scm (brew-one-figure): bugfix for large bass figures + * scm/new-markup.scm (brew-new-markup-molecule): robustness: don't crash when processing '() markup diff --git a/input/regression/figured-bass.ly b/input/regression/figured-bass.ly index 7bfcbd4be6..ddfe89032d 100644 --- a/input/regression/figured-bass.ly +++ b/input/regression/figured-bass.ly @@ -25,5 +25,3 @@ numbers, like @code{<4 6+>}. > } %% new-chords-done %% -%% new-chords-done %% -%% new-chords-done %% diff --git a/scm/bass-figure.scm b/scm/bass-figure.scm index 4c7c969239..90b293f5d0 100644 --- a/scm/bass-figure.scm +++ b/scm/bass-figure.scm @@ -5,12 +5,13 @@ (define (brew-one-figure grob fig-music) "Brew a single column for a music figure" (let* ( + (chain (Font_interface::get_property_alist_chain grob)) (mf (ly:get-font grob (cons '((font-family . music)) - Font_interface::get_property_alist_chain + chain ))) (nf (ly:get-font grob - (cons '((font-family . number)) - Font_interface::get_property_alist_chain))) + (cons '((font-family . number)) + chain))) (mol (ly:make-molecule '() '(0 . 0) '(0 . 1.0))) (fig (ly:get-mus-property fig-music 'figure)) (acc (ly:get-mus-property fig-music 'alteration)) diff --git a/scm/grob-description.scm b/scm/grob-description.scm index c397889c0f..8501bed6ef 100644 --- a/scm/grob-description.scm +++ b/scm/grob-description.scm @@ -119,8 +119,7 @@ (Y-offset-callbacks . (,Self_alignment_interface::aligned_on_self)) (direction . 1) (font-family . number) - (font-magnification . 0.6) - (font-relative-size . -3) + (font-relative-size . -1) (padding . 0.1) (kern . 0.2) (thickness . 1.0) -- 2.39.5