===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/mg/word.c,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- src/usr.bin/mg/word.c	2008/09/15 16:11:35	1.15
+++ src/usr.bin/mg/word.c	2014/03/20 07:47:29	1.16
@@ -1,4 +1,4 @@
-/*	$OpenBSD: word.c,v 1.15 2008/09/15 16:11:35 kjell Exp $	*/
+/*	$OpenBSD: word.c,v 1.16 2014/03/20 07:47:29 lum Exp $	*/
 
 /* This file is in the public domain. */
 
@@ -74,6 +74,7 @@
 	if ((s = checkdirty(curbp)) != TRUE)
 		return (s);
 	if (curbp->b_flag & BFREADONLY) {
+		dobeep();
 		ewprintf("Buffer is read-only");
 		return (FALSE);
 	}
@@ -116,6 +117,7 @@
 	if ((s = checkdirty(curbp)) != TRUE)
 		return (s);
 	if (curbp->b_flag & BFREADONLY) {
+		dobeep();
 		ewprintf("Buffer is read-only");
 		return (FALSE);
 	}
@@ -159,6 +161,7 @@
 	if ((s = checkdirty(curbp)) != TRUE)
 		return (s);
 	if (curbp->b_flag & BFREADONLY) {
+		dobeep();
 		ewprintf("Buffer is read-only");
 		return (FALSE);
 	}
@@ -239,6 +242,7 @@
 	if ((s = checkdirty(curbp)) != TRUE)
 		return (s);
 	if (curbp->b_flag & BFREADONLY) {
+		dobeep();
 		ewprintf("Buffer is read-only");
 		return (FALSE);
 	}
@@ -293,6 +297,7 @@
 	if ((s = checkdirty(curbp)) != TRUE)
 		return (s);
 	if (curbp->b_flag & BFREADONLY) {
+		dobeep();
 		ewprintf("Buffer is read-only");
 		return (FALSE);
 	}