From 59b391358db7f668f0887943cde339fa1152b081 Mon Sep 17 00:00:00 2001
From: Marius <mariausol@gmail.com>
Date: Fri, 4 Nov 2011 01:20:13 +0200
Subject: beta 2011.11.03 23:27

---
 metapost/context/base/mp-mlib.mpiv | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'metapost')

diff --git a/metapost/context/base/mp-mlib.mpiv b/metapost/context/base/mp-mlib.mpiv
index eaef033a9..0d4285005 100644
--- a/metapost/context/base/mp-mlib.mpiv
+++ b/metapost/context/base/mp-mlib.mpiv
@@ -156,9 +156,9 @@ enddef ;
 
 defaultfont := "Mono" ; % was cmr10, could be lmmono10-regular, but is fed into context anyway
 
-vardef fontsize expr str =
+vardef fontsize expr name =
     save size ; numeric size ;
-    size := bbwidth(textext("\MPfontsizehskip{" & defaultfont & "}")) ;
+    size := bbwidth(textext("\MPfontsizehskip{" & name & "}")) ;
     if size = 0 :
         12pt
     else :
-- 
cgit v1.2.3