input/test/move-specific-text.ly

   1 \version "1.7.6"
   2
   3 #(define (make-text-checker text)
   4    (lambda (grob) (equal? text (ly:get-grob-property grob 'text))))
   5
   6 \score {
   7   \notes\relative c''' {
   8     \property Voice.Stem \set #'direction = #1
   9     \outputproperty #(make-text-checker "m.d.")
  10       #'extra-offset = #'(-3.5 . -4.5)
  11     a^2^"m.d."
  12   }
  13   \paper { linewidth = -1. }
  14 }
  15 %% new-chords-done %%