% Feta (not the Font-En-Tja) music font -- Accidentals
% This file is part of LilyPond, the GNU music typesetter.
%
-% Copyright (C) 1997--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+% Copyright (C) 1997--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
%
% 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
% along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
-%
-% also show in other configuration wrt staff lines.
-%
-def draw_shifted_too =
-if test > 0:
- fet_beginchar ("shifted too", "");
- set_char_box (0, 0, 0, 0);
- currentpicture := remember_pic;
-
- draw_staff (-2, 2, 0.5);
- fet_endchar;
-fi;
-enddef;
-
-
%
% Accidentals from various sources, notably
%
fet_begingroup ("accidentals");
-
-save remember_pic;
-picture remember_pic;
-
-input feta-arrow;
-
-input feta-sharps;
-
-input feta-naturals;
-
-input feta-flats;
-
-input feta-parenthesis;
-
+ input feta-arrow;
+ input feta-sharps;
+ input feta-naturals;
+ input feta-flats;
+ input feta-parenthesis;
fet_endgroup ("accidentals");