Hello frogs (although I am French, I won't eat you) !

First of all, a huge thanks to the team for allowing us to freely use the
overall best music engraving software :p

I would like to report a tiny weakness I noticed.
It seems to me that LilyPond's standard fingerings for organ pedalboard are
incorrect.

Instead of this :

{ \clef F a4\ltoe a\lheel a\rtoe a\rheel }

We should have this:

{ \clef F a4_\rtoe a\lheel a\rtoe a^\lheel }

These fingerings are schematic representation of a foot. That's why they
shouldn't be directed according to their position (above or below the
staff). Fixed and opposite directions can also avoid any mistake when
reading quickly handwritten fingerings.
Especially since most publishers, I think, uses this behavior.
On the web I only found these examples, but I can assure you I saw this
notation in many other scores :

http://www.bodensee-musikversand.de/notenbeispiele/108056.jpg
http://www.bodensee-musikversand.de/notenbeispiele/108452.jpg
http://www.bodensee-musikversand.de/notenbeispiele/108452_midi.gif

I made a patch that removes the 2 useless definitions in
mf/feta-scripts.mfand update
scm/script.scm.

Regards,
Bertrand Bordage.
diff --git a/mf/feta-scripts.mf b/mf/feta-scripts.mf
index 35d09b9..5e94ed9 100644
--- a/mf/feta-scripts.mf
+++ b/mf/feta-scripts.mf
@@ -953,7 +953,7 @@ fet_beginchar ("Trill (`tr')", "trill");
 fet_endchar;
 
 
-def draw_heel =
+fet_beginchar ("heel", "pedalheel");
 	save radius, thickness;
 	save pat;
 	path pat;
@@ -986,22 +986,11 @@ def draw_heel =
 	       -- reverse pat xscaled -1 shifted (-feta_eps, 0)
 	       -- cycle;
 	fill pat;
-enddef;
-
-
-fet_beginchar ("left heel", "upedalheel");
-	draw_heel;
 	labels (1, 2, 3);
 fet_endchar;
 
 
-fet_beginchar ("right heel", "dpedalheel");
-	draw_heel;
-	y_mirror_char;
-fet_endchar;
-
-
-def draw_toe =
+fet_beginchar ("toe", "pedaltoe");
 	save ht, wd, thickness;
 
 	thickness := 1.5 linethickness;
@@ -1012,16 +1001,6 @@ def draw_toe =
 	set_char_box (wd#, wd#, 0, ht#);
 	draw_accent ((-h, -w), (0, w), thickness, 0.9);
 	currentpicture := currentpicture rotated -90;
-enddef;
-
-
-fet_beginchar ("left toe", "upedaltoe");
-	draw_toe;
-fet_endchar;
-
-
-fet_beginchar ("right toe", "dpedaltoe");
-	draw_toe;
 	y_mirror_char;
 fet_endchar;
 
diff --git a/scm/script.scm b/scm/script.scm
index 644c351..31dec42 100644
--- a/scm/script.scm
+++ b/scm/script.scm
@@ -123,7 +123,7 @@
 
     ("lheel"
      . (
-	(script-stencil . (feta . ("upedalheel" . "upedalheel")))
+	(script-stencil . (feta . ("pedalheel" . "pedalheel")))
 	(padding . 0.20)
 	(avoid-slur . around) ;guessing?
 	(direction . ,DOWN)))
@@ -141,7 +141,7 @@
 	(direction . ,UP)))
     ("ltoe"
      . (
-	(script-stencil . (feta . ("upedaltoe" . "upedaltoe")))
+	(script-stencil . (feta . ("pedaltoe" . "pedaltoe")))
 	(padding . 0.20)
 	(avoid-slur . around) ;guessing?
 	(direction . ,DOWN)))
@@ -218,13 +218,13 @@
 	(direction . ,UP)))
     ("rheel"
      . (
-	(script-stencil . (feta . ("dpedalheel" . "dpedalheel")))
+	(script-stencil . (feta . ("pedalheel" . "pedalheel")))
 	(padding . 0.20)
 	(avoid-slur . around) ;guessing?
 	(direction . ,UP)))
     ("rtoe"
      . (
-	(script-stencil . (feta . ("dpedaltoe" . "dpedaltoe")))
+	(script-stencil . (feta . ("pedaltoe" . "pedaltoe")))
 	(padding . 0.20)
 	(avoid-slur . around) ;guessing?
 	(direction . ,UP)))
_______________________________________________
lilypond-devel mailing list
lilypond-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to