]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-beugel.mf
release: 1.3.113
[lilypond.git] / mf / feta-beugel.mf
index 1461401cb9d0f216df8bb8ae93374551e06b3cfe..db3c642752f366d7be326a52f61b607f9c6bd231 100644 (file)
@@ -40,8 +40,8 @@ endchar;
 enddef;
 
 
-for h :=  2 staffsize#  step 1 pt# until (7 * staffsize#):
+for x :=  1 step 1 until 160:
        % note: define_pixels (x) multiplies x by hppp,
        %       we must never get bigger than infinity
-       draw_brace (min (h, infinity/hppp - 1), staff_space#);
+       draw_brace (min (x * pt#, infinity/hppp - 1), staff_space#);
 endfor