Re: boxed measures

[Mark Polesky]

Mark Polesky wrote:

> A while back, I did exactly that. I'll look for it and 
> get back to you...

Ugh. Kludge-o-rama. Ghost voices, hidden notes, clashing
note-columns, spacing nightmares... I'll see if someone
has a better idea on -devel, but in the meantime, this is
an option.

Let me know if you have any questions.
- Mark

\version "2.13.4"

\score {
  \new Staff <<
    \new Voice \relative c''' {
      \once \override HorizontalBracket #'direction = #UP
      \override HorizontalBracket #'Y-offset = #5.5
      \override HorizontalBracket #'shorten-pair = #'(-1 . -0.75)
      c\startGroup a f d\stopGroup
    }
    \new Voice \relative c''' {
      \override HorizontalBracket #'direction = #DOWN
      \override HorizontalBracket #'Y-offset = #-3.5
      \override HorizontalBracket #'shorten-pair = #'(-1 . -0.75)
      \hideNotes c\startGroup a f d\stopGroup \unHideNotes
    }
  >>
  \layout {
    \context {
      \Voice
      \override NoteColumn #'ignore-collision = ##t
      \consists "Horizontal_bracket_engraver"
      \override HorizontalBracket #'thickness = #4
      \override HorizontalBracket #'bracket-flare = #'(0 . 0)
      \override HorizontalBracket #'Y-extent = #'(0 . 0)
      % always overlap bracket edges (just past middle line)
      \override HorizontalBracket #'edge-height =
        #(lambda (grob)
           (let* ((Y-offset (ly:grob-property grob 'Y-offset))
                  (height (abs (+ 0.5 (abs Y-offset)))))
             (cons height height)))
    }
  }
}