Mercurial > emacs
comparison lisp/replace.el @ 17655:8e35bb3ec2e2
(occur-mode): Add a mode-class property.
(occur): Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 05 May 1997 01:11:30 +0000 |
| parents | 9ece72836276 |
| children | d8cb277f0ce8 |
comparison
equal
deleted
inserted
replaced
| 17654:9005c1013176 | 17655:8e35bb3ec2e2 |
|---|---|
| 250 (defvar occur-nlines nil) | 250 (defvar occur-nlines nil) |
| 251 (defvar occur-pos-list nil) | 251 (defvar occur-pos-list nil) |
| 252 (defvar occur-command-arguments nil | 252 (defvar occur-command-arguments nil |
| 253 "Arguments that were given to `occur' when it made this buffer.") | 253 "Arguments that were given to `occur' when it made this buffer.") |
| 254 | 254 |
| 255 (put 'occur-mode 'mode-class 'special) | |
| 256 | |
| 255 (defun occur-mode () | 257 (defun occur-mode () |
| 256 "Major mode for output from \\[occur]. | 258 "Major mode for output from \\[occur]. |
| 257 \\<occur-mode-map>Move point to one of the items in this buffer, then use | 259 \\<occur-mode-map>Move point to one of the items in this buffer, then use |
| 258 \\[occur-mode-goto-occurrence] to go to the occurrence that the item refers to. | 260 \\[occur-mode-goto-occurrence] to go to the occurrence that the item refers to. |
| 259 Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it. | 261 Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it. |
| 346 NLINES defaults to `list-matching-lines-default-context-lines'. | 348 NLINES defaults to `list-matching-lines-default-context-lines'. |
| 347 Interactively it is the prefix arg. | 349 Interactively it is the prefix arg. |
| 348 | 350 |
| 349 The lines are shown in a buffer named `*Occur*'. | 351 The lines are shown in a buffer named `*Occur*'. |
| 350 It serves as a menu to find any of the occurrences in this buffer. | 352 It serves as a menu to find any of the occurrences in this buffer. |
| 351 \\[describe-mode] in that buffer will explain how. | 353 \\<occur-mode-map>\\[describe-mode] in that buffer will explain how. |
| 352 | 354 |
| 353 If REGEXP contains upper case characters (excluding those preceded by | 355 If REGEXP contains upper case characters (excluding those preceded by `\\'), |
| 354 \\), the matching is case-sensitive." | 356 the matching is case-sensitive." |
| 355 (interactive | 357 (interactive |
| 356 (list (let* ((default (car regexp-history)) | 358 (list (let* ((default (car regexp-history)) |
| 357 (input | 359 (input |
| 358 (read-from-minibuffer | 360 (read-from-minibuffer |
| 359 (if default | 361 (if default |