2 files changed, 12 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/mpdir/mapfile.c b/Build/source/texk/web2c/mpdir/mapfile.c
index 25d5818f5c0..1893b55bfd7 100644
--- a/Build/source/texk/web2c/mpdir/mapfile.c
+++ b/Build/source/texk/web2c/mpdir/mapfile.c
@@ -941,7 +941,7 @@ void mpmapline (strnumber t)
     xfree (s);
 }
 
-void mpinitmapfile (void)
+void mpinitmapfile (int is_troff)
 {
     assert (mitem == NULL);
     mitem = xtalloc (1, mapitem);
@@ -949,8 +949,13 @@ void mpinitmapfile (void)
     mitem->type = MAPFILE;
     if (kpse_find_file("mpost.map", kpse_fontmap_format,0))
       mitem->line = xstrdup ("mpost.map");
-    else
-      mitem->line = xstrdup ("pdftex.map");
+    else {
+      if (is_troff) {
+	mitem->line = xstrdup ("troff.map");
+      } else {
+	mitem->line = xstrdup ("pdftex.map");
+      }
+    }
 }
 
 /**********************************************************************/
diff --git a/Build/source/texk/web2c/mpdir/mp.defines b/Build/source/texk/web2c/mpdir/mp.defines
index bdd51f83332..90f196b1ff5 100644
--- a/Build/source/texk/web2c/mpdir/mp.defines
+++ b/Build/source/texk/web2c/mpdir/mp.defines
@@ -30,7 +30,7 @@ $Id$
 @define function tfmoffm();
 @define procedure mpmapfile();
 @define procedure mpmapline();
-@define procedure mpinitmapfile;
+@define procedure mpinitmapfile();
 
 { functions from writefont.c }
 
@@ -52,3 +52,6 @@ $Id$
 
 @define procedure setjobid();
 
+{ function from turningnumber.c }
+
+@define function bezierslope();
+\ No newline at end of file