From bb9bee5f7d675167cba262cbfb27a7f4e1e5bcfb Mon Sep 17 00:00:00 2001 From: =?utf8?q?Janek=20Warcho=C5=82?= Date: Fri, 13 Dec 2013 18:28:42 +0100 Subject: [PATCH] factor out autometric_parameter declarations --- mf/declare-autometric-parameters.mf | 9 +++++++++ mf/feta-flags-generic.mf | 9 +-------- mf/feta-noteheads-generic.mf | 9 +-------- mf/feta-other-generic.mf | 8 +------- 4 files changed, 12 insertions(+), 23 deletions(-) create mode 100644 mf/declare-autometric-parameters.mf diff --git a/mf/declare-autometric-parameters.mf b/mf/declare-autometric-parameters.mf new file mode 100644 index 0000000000..89bf9212fe --- /dev/null +++ b/mf/declare-autometric-parameters.mf @@ -0,0 +1,9 @@ +% TODO: i'm not sure if the name is right - is this declaring or something else? + +autometric_parameter ("staffsize", staffsize#); +autometric_parameter ("stafflinethickness", stafflinethickness#); +autometric_parameter ("staff_space", staff_space#); +autometric_parameter ("linethickness", linethickness#); +autometric_parameter ("black_notehead_width", black_notehead_width#); +autometric_parameter ("ledgerlinethickness", ledgerlinethickness#); +autometric_parameter ("blot_diameter", blot_diameter#); diff --git a/mf/feta-flags-generic.mf b/mf/feta-flags-generic.mf index 64042220f4..7b41062bd6 100644 --- a/mf/feta-flags-generic.mf +++ b/mf/feta-flags-generic.mf @@ -31,12 +31,5 @@ fet_beginfont ("feta", design_size, "fetaMusic"); input feta-flags; -autometric_parameter ("staffsize", staffsize#); -autometric_parameter ("stafflinethickness", stafflinethickness#); -autometric_parameter ("staff_space", staff_space#); -autometric_parameter ("linethickness", linethickness#); -autometric_parameter ("black_notehead_width", black_notehead_width#); -autometric_parameter ("ledgerlinethickness", ledgerlinethickness#); -autometric_parameter ("blot_diameter", blot_diameter#); - + input declare-autometric-parameters; fet_endfont; diff --git a/mf/feta-noteheads-generic.mf b/mf/feta-noteheads-generic.mf index 47293eb13c..c7da14daa6 100644 --- a/mf/feta-noteheads-generic.mf +++ b/mf/feta-noteheads-generic.mf @@ -31,12 +31,5 @@ fet_beginfont ("feta", design_size, "fetaMusic"); input feta-noteheads; -autometric_parameter ("staffsize", staffsize#); -autometric_parameter ("stafflinethickness", stafflinethickness#); -autometric_parameter ("staff_space", staff_space#); -autometric_parameter ("linethickness", linethickness#); -autometric_parameter ("black_notehead_width", black_notehead_width#); -autometric_parameter ("ledgerlinethickness", ledgerlinethickness#); -autometric_parameter ("blot_diameter", blot_diameter#); - + input declare-autometric-parameters; fet_endfont; diff --git a/mf/feta-other-generic.mf b/mf/feta-other-generic.mf index 6012e2adee..4058b91a79 100644 --- a/mf/feta-other-generic.mf +++ b/mf/feta-other-generic.mf @@ -43,12 +43,6 @@ if test = 0: input feta-ties; fi -autometric_parameter ("staffsize", staffsize#); -autometric_parameter ("stafflinethickness", stafflinethickness#); -autometric_parameter ("staff_space", staff_space#); -autometric_parameter ("linethickness", linethickness#); -autometric_parameter ("black_notehead_width", black_notehead_width#); -autometric_parameter ("ledgerlinethickness", ledgerlinethickness#); -autometric_parameter ("blot_diameter", blot_diameter#); + input declare-autometric-parameters; fet_endfont; -- 2.39.5