Re: Combining custom bar line with standard elements

[Fr. Samuel Springuel]

> On 6 Dec, 2020, at 6:39 AM, Thomas Morley <thomasmorley65@gmail.com> wrote:
> 
> \layout {
>  \context {
>    \Staff
>    \override BarLine.before-line-breaking =
>    #(lambda (grob)
>      (let ((glyph (ly:grob-property grob 'glyph)))
>        (if (and (string? glyph)
>                 (or (string-contains glyph "[")
>                     (string-contains glyph "]")))
>            (begin
>             (ly:grob-set-property! grob 'thick-thickness 2)
>             (ly:grob-set-property! grob 'font-size -4)))))
>  }
> }
> 
> \defineBarLine "[" #'("" "[" "")
> \defineBarLine "]" #'("]" "" "")
> \defineBarLine "]." #'("]." "" "")
> 
> global = { \key f \major }
> 
> music = {
>  g' f' e' d' \bar "["
>  f' g' a' g' \bar "|"
>  f' e' c' d' \bar "]."
> }
> 
> \new Staff
> <<
>    \new Voice = "mel" { \global \music }
>>> 
> 

The problem there is that the final bar line (the “.” Element) is also thinned. 
 I want only the “]” element to be thinned.  All other elements of the bar line 
should retain their default thickness.

✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝✝
Fr. Samuel, OSB
(R. Padraic Springuel)
St. Anselm’s Abbey
4501 South Dakota Ave, NE
Washington, DC, 20017
202-269-2300
(c) 202-853-7036

PAX ☧ ΧΡΙΣΤΟΣ