Hi Werner,

> Please provide a MWE.

Well… um… at the moment I can’t seem to.  :\

I’m in the process of updating my scores for a musical I’m taking into the 
recording studio, and when I generated them, this accidental problem emerges. 
But the snippet below (which is as minimal an MWE as I have put together so 
far, trying to involve/include the many things in my real-world music that 
might be causing the problem) doesn’t show the issue.

If I can figure out what the problem is, I’ll get back to the list.
In the meantime, apologies for the noise.

— Kieren


%%%  BEGIN SNIPPET
\version "2.27.0"

allowGrobCallback =
#(define-scheme-function (parser location syms) (symbol-list?)
   (let ((interface (car syms))
         (sym (cadr syms)))
     #{
       \with {
         \consists #(lambda (context)
                      `((acknowledgers .
                          ((,interface . ,(lambda (engraver grob 
source-engraver)
                                            (let ((prop (ly:grob-property grob 
sym)))
                                              (if (procedure? prop) 
(ly:grob-set-property! grob sym (prop grob)))
                                              ))))
                          ))
                      )
       }
     #}))

absFontSize =
#(define-scheme-function (parser location pt)(number?)
   (lambda (grob)
     (let* ((layout (ly:grob-layout grob))
            (ref-size (ly:output-def-lookup (ly:grob-layout grob) 
'text-font-size 12)))
       (magnification->font-size (/ pt ref-size))
       )))

\layout {
  \context {
    \Score
    \allowGrobCallback font-interface.font-size
  }
}

customChordExceptions = {
    <c d e>-\markup { \hspace #0.1 "(add2)" }
}

newChordExceptionList = #(append
    (sequential-music-to-chord-exceptions customChordExceptions #t)
    ignatzekExceptions)

\layout {
  \context {
    \ChordNames
    \override ChordName.font-name = #"Myriad Pro"
    \override ChordName.font-size = \absFontSize #10
  }
  \context {
    \Score
    chordNameExceptions = #newChordExceptionList
  }
}

theChords = \chordmode {
  d1:3.2/fis
}

\new ChordNames \theChords
%%%  END SNIPPET

__________________________________________________

My work day may look different than your work day. Please do not feel obligated 
to read or respond to this email outside of your normal working hours.


Reply via email to