input/tricks/move-specific-text.ly

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