diff options
| -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 30109b87ba..d1acbc6309 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 |