#(define-markup-command (strikethrough layout props arg) (markup?) #:category font #:properties ((thickness 2)) " @cindex strikethrough, text … …car xextent) y-pos (cdr xextent) y-pos)))) \header { title = \markup { The \strikethrough Well- Tempered Clavier } } \markup { by \strikethrough J.S. P.D.Q. Bach. }