Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Adjust grace note slash and dot handling #8

Merged
merged 4 commits into from
Jul 17, 2024
Merged

Adjust grace note slash and dot handling #8

Changes from all commits
Commits
Show all changes
4 commits
Select commit Hold shift + click to select a range
0f94519
Use dot-stencil to let LilyPond position the SMUFL font's dots
dbenjaminmiller Jul 12, 2024
4202588
Fix size of grace note slash to match SMUFL fonts
dbenjaminmiller Jul 12, 2024
1bf371d
Merge branch 'tr-igem:main' into main
dbenjaminmiller Jul 17, 2024
e1d85a3
Update to match https://github.com/tr-igem/esmuflily/commit/10233dde6…
dbenjaminmiller Jul 17, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
16 changes: 8 additions & 8 deletions ly/esmufl.ily
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1175,11 +1175,11 @@ ekmMakeClusters =
(let cat ((c (max count 0))
(r (if pad point-stencil empty-stencil)))
(if (zero? c) r
(cat (1- c) (ly:stencil-stack r X RIGHT dot ext))))))
(cat (1- c) (ly:stencil-stack r X RIGHT dot 0))))))

#(define (ekm-dots grob)
(ekm-cat-dots
(ly:grob-property grob 'dot-count)
1
(ekm-cchar grob 0 #xE1E7)
#t))

Expand Down Expand Up @@ -1252,10 +1252,10 @@ ekmMakeClusters =
flg
(grob-interpret-markup grob
(make-translate-scaled-markup
(cons -0.55 (* -2.5 dir))
(make-fontsize-markup 3
(make-ekm-char-markup
(if (positive? dir) #xE564 #xE565))))))
(if (= UP dir)
(cons -0.644 -2.456)
(cons -0.596 2.168))
(make-ekm-char-markup (if (= UP dir) #xE564 #xE565)))))
flg)
(cons
(- (* (ly:grob-property stm 'thickness) (ly:staff-symbol-line-thickness grob)))
Expand Down Expand Up @@ -3418,7 +3418,7 @@ ekmSmuflOn =
\override NoteHead.stencil = #ekm-notehead
#})
(on 'dot #{
\override Dots.stencil = #ekm-dots
\override Dots.dot-stencil = #ekm-dots
#})
(on 'flag #{
\override Stem.details.lengths = #(ekm-stemlength 'default)
Expand Down Expand Up @@ -3507,7 +3507,7 @@ ekmSmuflOff =
\revert NoteHead.stencil
#})
(on 'dot #{
\revert Dots.stencil
\revert Dots.dot-stencil
#})
(on 'flag #{
\revert Stem.details.lengths
Expand Down