diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-05-05 01:11:30 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-05-05 01:11:30 +0000 |
commit | c851eedc82ef414eac8303b43963e28042a0ffbc (patch) | |
tree | b264a9aa81e64b9d0ce3f37b2c4b02dd2e914a1a | |
parent | 59cb77af0397ae3be8d123bd7c7888bfec2a6646 (diff) | |
download | emacs-c851eedc82ef414eac8303b43963e28042a0ffbc.tar.gz |
(occur-mode): Add a mode-class property.
(occur): Doc fix.
-rw-r--r-- | lisp/replace.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 30109b87ba7..d1acbc6309b 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -252,6 +252,8 @@ Applies to lines after point." (defvar occur-command-arguments nil "Arguments that were given to `occur' when it made this buffer.") +(put 'occur-mode 'mode-class 'special) + (defun occur-mode () "Major mode for output from \\[occur]. \\<occur-mode-map>Move point to one of the items in this buffer, then use @@ -348,10 +350,10 @@ Interactively it is the prefix arg. The lines are shown in a buffer named `*Occur*'. It serves as a menu to find any of the occurrences in this buffer. -\\[describe-mode] in that buffer will explain how. +\\<occur-mode-map>\\[describe-mode] in that buffer will explain how. -If REGEXP contains upper case characters (excluding those preceded by -\\), the matching is case-sensitive." +If REGEXP contains upper case characters (excluding those preceded by `\\'), +the matching is case-sensitive." (interactive (list (let* ((default (car regexp-history)) (input |