From: Werner Lemberg <wl@gnu.org>
Date: Thu, 29 Mar 2007 08:52:25 +0000 (+0200)
Subject: formatting nits
X-Git-Tag: release/2.11.22-1~17^2~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=3d17d722356a0190c43c17fbf4ad3f1c4b4f66d5;p=lilypond.git

formatting nits
---

diff --git a/mf/feta-bolletjes.mf b/mf/feta-bolletjes.mf
index 36abfcf1a8..b45222e4cc 100644
--- a/mf/feta-bolletjes.mf
+++ b/mf/feta-bolletjes.mf
@@ -286,8 +286,6 @@ if test > 0:
 fi;
 
 
-
-
 fet_beginchar ("Half notehead", "s1");
 	draw_outside_ellipse (1.53 - puff_up_factor / 3.0, 34, 0.66, 0.17);
 	undraw_inside_ellipse (3.25, 33, 0.81, 2.5 stafflinethickness#);
@@ -318,6 +316,7 @@ fet_beginchar ("Quart notehead", "s2");
 	draw_staff (-2, 2, 0);
 fet_endchar;
 
+
 if test > 0:
 	fet_beginchar ("Quart notehead", "s2");
 		draw_outside_ellipse (1.49 - puff_up_factor / 3.0, 31,
@@ -408,8 +407,7 @@ enddef;
 
 
 %
-%
-% UGH : xs not declared as argument.
+% UGH: xs not declared as argument.
 %
 def define_triangle_shape (expr stemdir) =
 	save triangle_a, triangle_b, triangle_c;
@@ -447,7 +445,7 @@ def define_triangle_shape (expr stemdir) =
 	set_char_box (0, width#, depth#, height#);
 
 	% Formerly, the shape has simply been drawn with an elliptical pen
-	% (`scaled pen_thick xsaled xs'), but the envelope of such a curve
+	% (`scaled pen_thick xscaled xs'), but the envelope of such a curve
 	% is of 6th degree.  For the sake of mf2pt1, we approximate it.
 
 	pickup pencircle scaled pen_thick xscaled xs;
@@ -514,7 +512,6 @@ def define_triangle_shape (expr stemdir) =
 		       & {direction infinity of triangle_out_c}z1'l
 		       .. cycle;
 
-
 	labels (0, 10, 20, 30);
 	penlabels (1, 1', 2, 2', 3, 3', 12, 23, 31);
 
@@ -524,7 +521,7 @@ def define_triangle_shape (expr stemdir) =
 		charwx := xpart exact_right_point + .5 pen_thick# * xs;
 	else:
 		charwy := -ypart exact_down_point;
-		charwx := (width# - (xpart exact_down_point - 0.5 * xs * pen_thick#));
+		charwx := width# - (xpart exact_down_point - .5 pen_thick# * xs);
 	fi
 enddef;