]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-scripts.mf
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / mf / feta-scripts.mf
index 396565439b3fc86fd97de34104a23bbfc6eeaa36..e27974b955040ccea88c9a0f77aa88149aaf6c4e 100644 (file)
@@ -1,14 +1,14 @@
 % Feta (not the Font-En-Tja) music font --  implement scripts
 % This file is part of LilyPond, the GNU music typesetter.
 %
-% Copyright (C) 1997--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+% Copyright (C) 1997--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 %      Jan Nieuwenhuizen <janneke@gnu.org>
 %
 %
-% LilyPond is free software: you can redistribute it and/or modify
+% The LilyPond font is free software: you can redistribute it and/or modify
 % it under the terms of the GNU General Public License as published by
 % the Free Software Foundation, either version 3 of the License, or
-% (at your option) any later version.
+% (at your option) any later version, or under the SIL Open Font License.
 %
 % LilyPond is distributed in the hope that it will be useful,
 % but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -1277,7 +1277,6 @@ fet_beginchar ("Varied Segno", "varsegno");
        addto currentpicture also currentpicture scaled -1;
 
        penlabels (1, 1', 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12);
-       % draw_staff (-2, 2, 0);
 fet_endchar;
 
 
@@ -1495,7 +1494,7 @@ fet_beginchar ("Arpeggio", "arpeggio");
        draw_arpeggio;
        penlabels (range 1 thru 9);
 
-       draw_staff (-2, 2, 0.0);
+       draw_staff_if_debugging (-2, 2);
        endgroup;
 fet_endchar;
 
@@ -1780,7 +1779,7 @@ fet_beginchar ("Tick mark", "tickmark");
              .. {z4 - z3}z3l
              .. {z2 - (z3 - (0.6 staff_space, 0))}rt z2r
              .. {z1 - z2}lft z2r{z1 - z2}
-             ..cycle;
+             .. cycle;
        fill pat;
 
        set_char_box (x_centre#, x_extent# - x_centre#, 0, x_extent#);