X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-grobs.scm;h=60e4a3e8fb3b4cf4fb72840c9e99f1b908d0b523;hb=5b2bdf8c532aa1b4aa8626f6847938f2ef4ba1be;hp=4009f6ebdf10c208d280d8f6b923a1597e28997a;hpb=7b9d994707d25a7cd10b53519cae1125ef4a64cc;p=lilypond.git

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 4009f6ebdf..60e4a3e8fb 100644
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -1638,11 +1638,13 @@
 	(thickness . 1.3)
 	(cross-staff . ,ly:stem::calc-cross-staff)
 	(flag . ,ly:stem::calc-flag)
+	(beamlet-default-length . (1.1 . 1.1))
+	(beamlet-max-length-proportion . (0.75 . 0.75))
 	(details
 	 . (
 	    ;; 3.5 (or 3 measured from note head) is standard length
-	    ;; 32nd, 64th flagged stems should be longer
-	    (lengths . (3.5 3.5 3.5 4.5 5.0))
+	    ;; 32nd, 64th, 128th flagged stems should be longer
+	    (lengths . (3.5 3.5 3.5 4.5 5.0 6.0))
 
 	    ;; FIXME.  3.5 yields too long beams (according to Ross and
 	    ;; looking at Baerenreiter examples) for a number of common