diff --git a/lang/m2/comp/enter.c b/lang/m2/comp/enter.c
index d1c29d42d..c93a8ef13 100644
--- a/lang/m2/comp/enter.c
+++ b/lang/m2/comp/enter.c
@@ -444,6 +444,7 @@ EnterFromImportList(idlist, FromDef, FromId)
 		break;
 	case D_FORWMODULE:
 		vis = FromDef->for_vis;
+		forwflag = 1;
 		break;
 	case D_MODULE:
 		vis = FromDef->mod_vis;