From: Werner Lemberg <wl@gnu.org>
Date: Thu, 10 May 2007 05:30:44 +0000 (+0200)
Subject: Low-resolution fixes.
X-Git-Tag: release/2.11.24-1~11^2~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=d7eb0d2c4f9659a868c1bbd9f56646d9ab9f8bd4;p=lilypond.git

Low-resolution fixes.
---

diff --git a/mf/feta-schrift.mf b/mf/feta-schrift.mf
index ed0f359a89..7b2cdd932b 100644
--- a/mf/feta-schrift.mf
+++ b/mf/feta-schrift.mf
@@ -115,6 +115,7 @@ def draw_short_fermata =
 	pickup pencircle scaled dot_size;
 
 	x1 - 2 x6 = x2;
+	x6 := vround (x6);
 	bot y6 = -d;
 
 	drawdot z6;
@@ -1385,8 +1386,8 @@ def draw_arpeggio_arrow =
 	pickup pencircle scaled vround (0.5 rthin);
 
 	bot z10 = (0.5 w, 0);
-	lft z11 = (-0.3 w, 0.8 h);
-	rt z12 = (1.3 w, 0.8 h);
+	lft z11 = (0.5 w - hround (0.8 w), 0.8 h);
+	rt z12 = (0.5 w + hround (0.8 w), 0.8 h);
 
 	before_left := z1l
 		       -- z6{z6 - z1l}