diff --git a/src/mred/wxs/wxscheme.cxx b/src/mred/wxs/wxscheme.cxx
index 0010c35993..4525a0bb40 100644
--- a/src/mred/wxs/wxscheme.cxx
+++ b/src/mred/wxs/wxscheme.cxx
@@ -904,7 +904,7 @@ static Scheme_Object *wxSchemeGetFontFromUser(int argc, Scheme_Object **argv)
 	lf->lfPitchAndFamily |= FF_DECORATIVE;
 	break;
       case wxMODERN:
-	Lf->lfPitchAndFamily = FIXED_PITCH | FF_MODERN;
+	lf->lfPitchAndFamily = FIXED_PITCH | FF_MODERN;
 	break;
       case wxROMAN:
 	lf->lfPitchAndFamily |= FF_ROMAN;