define-vstrut-markup ?

[Karol Majewski]

Hi

So far I have this:


#(define-markup-command
  (vstrut layout props)
  ()
  (let
    ((ref-mrkp
        (interpret-markup layout props "█")))
    (ly:make-stencil
      (ly:stencil-expr empty-stencil) empty-interval
      (ly:stencil-extent ref-mrkp Y))))


How can I create 'define-vstrut-markup' using above vstrut definition?

--Karol