mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

(occur): Set buffer-read-only.

Browse Source
This commit is contained in:
Karl Heuer 1998-06-20 22:25:31 +00:00
parent 01c752b506
commit 5ddf4bdac0
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/replace.el
View File

@ -622,7 +622,8 @@ the matching is case-sensitive."
(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.