Chord letters from lilyjazz-text and symbols from lilyjazz-chord

[baloe]

Thank you for resolving the Major7 triangle issue. I took some time off but would like to now finally finalize setting up my lilypond jazz environment. I'm not a fan of the Chord font though, and I would like to reproduce the look in this demo.

My idea ist to set the chordname font to lilyjazz-text (instead of lilyjazz-chord) and then use lilyjazz-chord only for the special symbols (flat, sharp, triangle, etc.). One can easily switch fonts in markup with \override #'(font-name . "lilyjazz-chord){some text}, but I can't quite figure out how to make this work in the definition of JazzChordNames below.

I tried to replace the line (markup ">") with (markup \override #'(font-name . "lilyjazz-chord){">"} but that throws an error. Do you have any ideo on how to make this work?

My backup strategy is to create an entirely new font file where I would combine the letters from lilyjazz-text with the musical symbols in lilyjazz-chord

#(define (JazzChordNames pitch majmin)  ;majmin is a required argument for "chordNamer", but not used here
  (let* ((alt (ly:pitch-alteration pitch)))
    (make-line-markup
      (list
    (make-simple-markup
      (vector-ref #("C" "D" "E" "F" "G" "A" "B")
        (ly:pitch-notename pitch)))
    (if (= alt 0)           ; alteration ?
      (markup "")       ; do nothing
      (if (= alt FLAT)  ; flat or sharp
        (markup ">")
        (markup "<")
      )
    )
      )
    )
  )
)
...
% modify the default ChordNames context
\layout {
  \context {
    \ChordNames
    chordRootNamer = #JazzChordNames    % update the chord names
    chordNameExceptions = #JazzChords   % update the chord exceptions
    \override ChordName.font-name = #"lilyjazz-text"  % use the custom font for displaying the chords
  }
}

[microtherion]

I'll have to experiment a bit myself. The interaction between lilypond and scheme and the names used is a bit of a black art…

I'd also recommend testing your formatting at a number of different font sizes, to make sure it's scale independent.

[baloe]

I attempted the following after stumbling upon this. It compiles fine, but the #:override '(font-family . "lilyjazz-chord") has no impact either.

#(define (JazzChordNames pitch majmin)  ;majmin is a required argument for "chordNamer", but not used here
  (let* ((alt (ly:pitch-alteration pitch)))
    (make-line-markup
      (list
    (make-simple-markup
      (vector-ref #("C" "D" "E" "F" "G" "A" "B")
        (ly:pitch-notename pitch)))
    (if (= alt 0)           ; alteration ?
      (markup "")       ; do nothing
      (if (= alt FLAT)  ; flat or sharp
        (markup #:override '(font-family . "lilyjazz-chord") ">")
        (markup #:override '(font-family . "lilyjazz-chord") "<")
      )
    )
      )
    )
  )
)