From f29646813e28eb8a2a7f5a763f4dc0e9219ebb85 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Fri, 24 Dec 2021 22:17:31 +0000 Subject: mpxout.w: sync with the upstream git-svn-id: svn://tug.org/texlive/trunk@61400 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/mplibdir/mpxout.w | 2 ++ 1 file changed, 2 insertions(+) (limited to 'Build/source/texk/web2c/mplibdir/mpxout.w') diff --git a/Build/source/texk/web2c/mplibdir/mpxout.w b/Build/source/texk/web2c/mplibdir/mpxout.w index a54c3d8b6b5..3fb484887bf 100644 --- a/Build/source/texk/web2c/mplibdir/mpxout.w +++ b/Build/source/texk/web2c/mplibdir/mpxout.w @@ -798,6 +798,8 @@ It's ok if the \.{VF} file doesn't exist. @c static web_boolean mpx_open_vf_file (MPX mpx) { + if (mpx->vf_file) + fclose(mpx->vf_file); /* Ugly... */ mpx->vf_file = mpx_fsearch(mpx, mpx->cur_name, mpx_vf_format); if (mpx->vf_file) { free (mpx->cur_name); -- cgit v1.2.3