===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/mg/Attic/mail.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- src/usr.bin/mg/Attic/mail.c	2003/05/05 11:12:07	1.1
+++ src/usr.bin/mg/Attic/mail.c	2004/01/12 22:55:00	1.2
@@ -1,4 +1,4 @@
-/* $OpenBSD: mail.c,v 1.1 2003/05/05 11:12:07 vincent Exp $ */
+/* $OpenBSD: mail.c,v 1.2 2004/01/12 22:55:00 vincent Exp $ */
 /*
  * This file is in the public domain.
  *
@@ -70,6 +70,7 @@
 		curbp->b_modes[1] = name_mode("mail-mode");
 	}
 	curbp->b_nmodes = 1;
+	curwp->w_flag |= WFMODE;
 	return (TRUE);
 }