input/tricks/move-specific-text.ly

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