1 files changed, 24 insertions, 19 deletions
diff --git a/tex/context/base/font-ini.mkiv b/tex/context/base/font-ini.mkiv
index 6a8c9594f..25ed87eaa 100644
--- a/tex/context/base/font-ini.mkiv
+++ b/tex/context/base/font-ini.mkiv
@@ -2093,11 +2093,6 @@
    \ctxlua{fonts.definers.resetnullfont()}% in luatex 0.70 this will also do the previous
    \globallet\resetnullfont\relax}
 
-% \def\preloaddefaultfonts
-%   {\resetpreloadfonts
-%    \setupbodyfont[modern,\fontstyle,\fontbody]%
-%    \showmessage\m!fonts6{\normalizedbodyfontsize\normalspace\fontstyle}}
-
 \def\preloaddefaultfonts
   {\resetpreloadfonts
    \setupbodyfont[modern,\fontstyle,\fontbody]%
@@ -2114,16 +2109,34 @@
    \showmessage\m!fonts6{fallback modern tt \normalizedbodyfontsize}}
 
 \def\resetpreloadfonts
-  {\global\let\firststagepreloadfonts \relax
-   \global\let\secondstagepreloadfonts\relax
-   \global\let\thirdstagepreloadfonts \relax
-   \global\let\fourthstagepreloadfonts\relax
+  {\glet\preloaddefaultfonts    \relax
+   \glet\preloaddefaultfontstt  \relax
+   \glet\preloaddefaultfontsmm  \relax
+   \glet\zerostagepreloadfonts  \relax
+   \glet\firststagepreloadfonts \relax
+   \glet\secondstagepreloadfonts\relax
+   \glet\thirdstagepreloadfonts \relax
+   \glet\fourthstagepreloadfonts\relax
+   \global\everyhbox\emptytoks
+   \global\everyvbox\emptytoks
    \resetnullfont}
 
+\def\dozerostagepreloadfonts
+  {\definedfont[\s!file:lmmono10-regular sa 1]}
+
+\def\zerostagepreloadfonts
+  {\writestatus\m!fonts{beware: no fonts are loaded yet, using 'lm mono' in box}%
+   \glet\zerostagepreloadfonts\dozerostagepreloadfonts
+   \zerostagepreloadfonts}
+
+\appendtoks
+    \everyhbox{\zerostagepreloadfonts}
+    \everyvbox{\zerostagepreloadfonts}
+\to \everydump
+
 \def\firststagepreloadfonts % see core-def.mkiv
   {\doifmodeelse{*nofonts}
-     {%\resetpreloadfonts
-      \writestatus\m!fonts{latin modern fonts are not preloaded}}
+     {\writestatus\m!fonts{latin modern fonts are not preloaded}}
      {\preloaddefaultfonts
       \writestatus\m!fonts{preloading latin modern fonts (first stage)}}}
 
@@ -2131,14 +2144,6 @@
   {\writestatus\m!fonts{preloading latin modern fonts (second stage)}%
    \preloaddefaultfonts}
 
-% \def\thirdstagepreloadfonts
-%   {\ifx\fontclass\empty
-%      \writestatus\m!fonts{preloading latin modern fonts (third stage)}%
-%      \preloaddefaultfonts
-%    \else
-%      \resetpreloadfonts
-%    \fi}
-
 \def\thirdstagepreloadfonts
   {\ifx\fontclass\empty
      \writestatus\m!fonts{preloading latin modern fonts (third stage)}%