diff --git a/win32ss/gdi/ntgdi/freetype.c b/win32ss/gdi/ntgdi/freetype.c
index eef7cb3e5c..8abff99c29 100644
--- a/win32ss/gdi/ntgdi/freetype.c
+++ b/win32ss/gdi/ntgdi/freetype.c
@@ -4987,6 +4987,9 @@ TextIntRealizeFont(HFONT FontHandle, PTEXTOBJ pTextObj)
 
     ASSERT((NT_SUCCESS(Status) ^ (NULL == TextObj->Font)) != 0);
 
+    DPRINT1("Font '%S' is substituted by '%s'.\n", pLogFont->lfFaceName,
+             Face->family_name ? Face->family_name : "<NULL>");
+
     return Status;
 }