diff --git a/source/texk/web2c/luatexdir/luatex_svnversion.h b/source/texk/web2c/luatexdir/luatex_svnversion.h
index 0f1c3154a0a8c43048dd0126142edfde6afcb41b..685c1af6250bde0980d347274cebb9790314d27a 100644
--- a/source/texk/web2c/luatexdir/luatex_svnversion.h
+++ b/source/texk/web2c/luatexdir/luatex_svnversion.h
@@ -1,4 +1,4 @@
 #ifndef luatex_svn_revision_h
 #define luatex_svn_revision_h
-#define luatex_svn_revision 7532
+#define luatex_svn_revision 7534
 #endif
diff --git a/source/texk/web2c/mplibdir/ChangeLog b/source/texk/web2c/mplibdir/ChangeLog
index f45e58b1876f866185cda461cc76e36d14fa5e3a..55ab2c8571e8de9d2f8e258f7b74459595fc3876 100644
--- a/source/texk/web2c/mplibdir/ChangeLog
+++ b/source/texk/web2c/mplibdir/ChangeLog
@@ -1,3 +1,6 @@
+2022-07-31 Luigi Scarso <luigi.scarso@gmail.com>
+    * MetaPost: Working on the file extension (work in progress).
+
 2022-05-28  Akira Kakuto  <kakuto@jcom.zaq.ne.jp>
 
         * mp.w: Typo.
diff --git a/source/texk/web2c/mplibdir/mp.w b/source/texk/web2c/mplibdir/mp.w
index f6d8b8415f9225154439a4d207da32587305614e..96d7390dcf5edc32d4bf2cd2e2561d9d4988d418 100644
--- a/source/texk/web2c/mplibdir/mp.w
+++ b/source/texk/web2c/mplibdir/mp.w
@@ -34815,9 +34815,9 @@ extreme cases so it may have to be shortened on some systems.
 
 @<Use |c| to compute the file extension |s|@>=
 {
-  s = xmalloc (12, 1);
-  mp_snprintf (s, 12, ".%i", (int) c);
-  s[7]='\0';
+  s = xmalloc (13, 1);
+  mp_snprintf (s, 13, ".%i", (int) c);
+  s[13]='\0';
 }