X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fmf2pt1.mp;h=bb6ceda5dc32e7e5b5b26f6f2857b273b01a0690;hb=4d405ef96a8a62771d7d9a283ff5369a772e89d8;hp=a8b45aad07cde7041d0f505663619db4f4d4bb4a;hpb=a79fc3d9b2088e9be334df8cc99b34f444ddfa90;p=lilypond.git

diff --git a/mf/mf2pt1.mp b/mf/mf2pt1.mp
index a8b45aad07..bb6ceda5dc 100644
--- a/mf/mf2pt1.mp
+++ b/mf/mf2pt1.mp
@@ -10,7 +10,7 @@
 
 %%%% ==================================================================== %%%%
 %%%% mf2pt1                                                               %%%%
-%%%% Copyright (C) 2008 Scott Pakin                                       %%%%
+%%%% Copyright (C) 2012 Scott Pakin                                       %%%%
 %%%%                                                                      %%%%
 %%%% This program may be distributed and/or modified under the conditions %%%%
 %%%% of the LaTeX Project Public License, either version 1.3c of this     %%%%
@@ -58,7 +58,7 @@ def beginchar(expr c,w_sharp,h_sharp,d_sharp) =
     w:=charwd*pt; h:=charht*pt; d:=chardp*pt;
     charic:=0; clearxy; clearit; clearpen; scantokens extra_beginchar;
 
-    def to_bp (expr num) = decimal (ceiling (num*bp_per_pixel)) enddef;
+    def to_bp (expr num) = decimal (round (num*bp_per_pixel)) enddef;
     special "% MF2PT1: glyph_dimensions 0 " & to_bp (-d) & " " & to_bp(w) & " " & to_bp(h);
     special "% MF2PT1: font_size " & decimal designsize;
     special "% MF2PT1: font_slant " & decimal font_slant_;