Mercurial > emacs
changeset 22531:ab25969db484
(occur): Set buffer-read-only.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sat, 20 Jun 1998 22:25:31 +0000 |
| parents | 6d2e22a16952 |
| children | 5a83f0f3b29d |
| files | lisp/replace.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/replace.el Sat Jun 20 22:17:48 1998 +0000 +++ b/lisp/replace.el Sat Jun 20 22:25:31 1998 +0000 @@ -622,7 +622,8 @@ (format "%d lines" occur-num-matches)))) (insert message-string) (if (interactive-p) - (message "%s matched" message-string))))))))) + (message "%s matched" message-string))) + (setq buffer-read-only t))))))) ;; It would be nice to use \\[...], but there is no reasonable way ;; to make that display both SPC and Y.