From 44c4d3ae99531a0c145ed1ffbdfd9a9a5b31f9e8 Mon Sep 17 00:00:00 2001
From: Eric Teunis de Boone <ericteunis@gmail.com>
Date: Tue, 27 Feb 2018 23:18:16 +0100
Subject: [PATCH] Shortened actual duration of drumgracing, so they appear as
 one 32 note to lilypond This way, flams and drags will not occupy twice the
 space needed for piping embellishments if they occur at the same time step

---
 lib/embellishments.ily | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/embellishments.ily b/lib/embellishments.ily
index 8e441b5..8762614 100644
--- a/lib/embellishments.ily
+++ b/lib/embellishments.ily
@@ -11,7 +11,7 @@ drumgrace = #(define-music-function (parser location notes ) ( ly:music? ) #{
 	\override Score.Stem #'beamlet-max-length-proportion = #'(0.5 . 0.5)
 
 	% Print notes
-	\small \grace $notes
+	\small \times 1/4 { \grace $notes }
 
 	% Revert back
 	\revert Score.Stem #'beamlet-default-length