Re: creating chords like F/A(D/F#) with \chordmode { }

[Eby Mani]

Thanks, works like charm. I think this should be on snippets. 
Also how do i get to print D7 or Dmin7 without the triangle symbol and 
superscript ?.

Eby
--------------------------------------------
On Tue, 15/3/16, Thomas Morley <address@hidden> wrote:
 >
 > altChords =
 > #(define-music-function (m1 m2)(ly:music?
 ly:music?)
 >
 > has to
 be
 >
 > altChords =
 > #(define-music-function (parser location
 m1 m2)(ly:music? ly:music?)
 >
 > in 2.18 instead.
 >
 > --
 > David Kastrup
 
 The arguments of applyOutput
 should be changed as well.
 Complete
 2.18.-code of the final function:
 
 altChords =
 #(define-music-function (parser location m1
 m2)(ly:music? ly:music?)
 "Return the
 default ChordName of @var{m1}, with an added parenthesized
 ChordName
 derived from @var{m2}"
 #{
    \applyOutput
 ChordNames %.ChordName
  
    #(lambda (g ctx p)
        
 (let ((main-text (ly:grob-property g 'text))
               (alt-text
                 (apply
                  
 ignatzek-chord-names
                
   (pitches-bass-inversion-context-list m2 ctx))))
          (ly:grob-set-property! g
 'text
            #{
              \markup
                { $main-text
 \hspace #0.4 \fontsize #-3 \parenthesize $alt-text }
    
        #})))
    $m1
 #})
 
 
 Cheers,
   Harm