Mercurial > emacs

changeset 730:2e4dd37cf7b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Fri, 26 Jun 1992 04:13:37 +0000
parents 5d684b81ac6b
children 5c6db33a9ef6
files lisp/textmodes/ooutline.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/ooutline.el	Wed Jun 24 22:42:10 1992 +0000
+++ b/lisp/textmodes/ooutline.el	Fri Jun 26 04:13:37 1992 +0000
@@ -200,7 +200,8 @@
   "Hides or shows lines from FROM to TO, according to FLAG.
 If FLAG is `\\n' (newline character) then text is shown,
 while if FLAG is `\\^M' (control-M) the text is hidden."
-  (let ((modp (buffer-modified-p)))
+  (let (buffer-read-only
+	(modp (buffer-modified-p)))
     (unwind-protect
         (subst-char-in-region from to
 			      (if (= flag ?\n) ?\^M ?\n)