===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/mg/buffer.c,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- src/usr.bin/mg/buffer.c	2002/03/16 04:17:36	1.27
+++ src/usr.bin/mg/buffer.c	2002/03/16 19:30:29	1.28
@@ -1,4 +1,4 @@
-/*	$OpenBSD: buffer.c,v 1.27 2002/03/16 04:17:36 vincent Exp $	*/
+/*	$OpenBSD: buffer.c,v 1.28 2002/03/16 19:30:29 vincent Exp $	*/
 
 /*
  *		Buffer handling.
@@ -264,6 +264,7 @@
 	if (bclear(blp) != TRUE)
 		return NULL;
 	blp->b_flag &= ~BFCHG;		/* Blow away old.	 */
+	blp->b_flag |= BFREADONLY;
 
 	listbuf_ncol = ncol;		/* cache ncol for listbuf_goto_buffer */