Re: Ne fonctionne plus sous lilypond 2.21

[Pierre Perol-Schneider]

Oui Valentin, ils fonctionnent mais :

1. Quelle est la raison de spécifier '(style . default) ? Pour moi c'est redondant ;

2. Quelle est la raison de spécifier un baseline-skip à 0.5 alors qu'on souhaite ne pas mettre d'espace entre numérateur et dénominateur ?

D'autant plus qu'un (une?) tel(le) espace n'est visible qu'à partir d'une taille de... -13 !

Ex. :

\markup\number\fontsize #-13 {
  \override #'(baseline-skip . 0)
  \center-column { 0 0 }
  \override #'(baseline-skip . .5)
  \center-column { 0 0 }
  \override #'(baseline-skip . 1)
  \center-column { 0 0 }
  \override #'(baseline-skip . 1.5)
  \center-column { 0 0 }
}

Le jeu. 28 mai 2020 à 11:38, Valentin Villenave <valentin@villenave.net> a écrit :

On 5/28/20, Pierre Perol-Schneider <pierre.schneider.paris@gmail.com> wrote:
> Ben non justement, 0,5 d'écartement ici n'a aucun sens.
> Quant-aux têtes de notes, ça n'a aucun effet (malheureusement ai-je envie
> d'ajouter...) :

Euh Pierre, on parle bien de 2.21 ? Avec la nouvelle syntaxe ? Pour
autant que je puisse voir, 'baseline-skip et 'style fonctionnent comme
ils le devraient :

\version "2.21.0"
#(define-public (format-time-sig-note grob)
   (let* ((frac (ly:grob-property grob 'fraction))
          (num (if (pair? frac) (car frac) 4))
          (den (if (pair? frac) (cdr frac) 4))
          (m (markup ;#:override '(baseline-skip . 0.5)
                     #:center-column
                     (#:number (number->string num)
                               #:override '(style . cross)
                               #:note (ly:make-duration (ly:intlog2
den)) DOWN))))
     (display frac)
     (grob-interpret-markup grob m)))

\new Staff {
  \override Staff.TimeSignature.stencil = #format-time-sig-note
  \time 3/8
  \relative c'' { c8 c c }
}

V.