Oops! Wrong minimal example!

#(define enh-acc
  (lambda (grob)
    (let* ((stencil (ly:accidental-interface::print grob))
           (new-stil 
             (grob-interpret-markup grob 
               (markup 
                    #:hspace 1
                    #:musicglyph "accidentals.flat"
                    #:hspace -2
                    #:transparent         
                    #:stencil  
                       stencil))))
    new-stil))) 



\relative c' {
 
  <d \tweak Accidental. stencil #enh-acc eis>1
  <e dis>2
  <eis d>2 

}





--
Sent from: http://lilypond.1069038.n5.nabble.com/User-f3.html

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to