Musical stave characters should join to the left

diff --git a/bedstead.c b/bedstead.c
index 9984adb43cc314ca63af51ea81054d43d1d81656..5d793bd6fffd27e4f972aa74b3af15162a3d5d38 100644 (file)
--- a/bedstead.c
+++ b/bedstead.c
@@ -2470,11 +2470,11 @@ static struct glyph {
  {"\10\24\21\12\04\12\21\05\02", U(1D10B) }, /* segno */
  {"\16\21\25\00\00\00\00\00\00", U(1D110) }, /* fermata */
  {"\00\00\00\00\00\00\25\21\16", U(1D111) }, /* fermata below */
- {"\00\00\00\00\37\00\00\00\00", U(1D116) }, /* 1-line stave */
- {"\00\00\00\37\00\37\00\00\00", U(1D117) }, /* 2-line stave */
- {"\00\00\37\00\37\00\37\00\00", U(1D118) }, /* 3-line stave */
- {"\00\37\00\37\00\37\00\37\00", U(1D119) }, /* 4-line stave */
- {"\37\00\37\00\37\00\37\00\37", U(1D11A) }, /* 5-line stave */
+ {"\00\00\00\00\37\00\00\00\00", U(1D116), JOIN_L }, /* 1-line stave */
+ {"\00\00\00\37\00\37\00\00\00", U(1D117), JOIN_L }, /* 2-line stave */
+ {"\00\00\37\00\37\00\37\00\00", U(1D118), JOIN_L }, /* 3-line stave */
+ {"\00\37\00\37\00\37\00\37\00", U(1D119), JOIN_L }, /* 4-line stave */
+ {"\37\00\37\00\37\00\37\00\37", U(1D11A), JOIN_L }, /* 5-line stave */
  {"\04\12\12\12\14\26\25\16\04", U(1D11E) }, /* G clef */
  {"\25\25\25\26\24\26\25\25\25", U(1D121) }, /* C clef */
  {"\10\25\04\05\10\20\00\00\00", U(1D122) }, /* F clef */