655 |
(occur-1 regexp nlines bufs)) |
(occur-1 regexp nlines bufs)) |
656 |
|
|
657 |
(defun multi-occur-by-filename-regexp (bufregexp regexp &optional nlines) |
(defun multi-occur-by-filename-regexp (bufregexp regexp &optional nlines) |
658 |
"Show all lines in buffers containing REGEXP, named by BUFREGEXP. |
"Show all lines matching REGEXP in buffers named by BUFREGEXP. |
659 |
See also `multi-occur'." |
See also `multi-occur'." |
660 |
(interactive |
(interactive |
661 |
(cons |
(cons |
701 |
(if (> count 0) |
(if (> count 0) |
702 |
(display-buffer occur-buf) |
(display-buffer occur-buf) |
703 |
(kill-buffer occur-buf))) |
(kill-buffer occur-buf))) |
|
(goto-char (point-min)) |
|
704 |
(setq occur-revert-properties (list regexp nlines bufs) |
(setq occur-revert-properties (list regexp nlines bufs) |
705 |
buffer-read-only t)))) |
buffer-read-only t)))) |
706 |
|
|
817 |
(when title-face |
(when title-face |
818 |
`(face ,title-face)) |
`(face ,title-face)) |
819 |
`(occur-title ,buf)))) |
`(occur-title ,buf)))) |
820 |
(goto-char (point-max))))))) |
(goto-char (point-min))))))) |
821 |
;; Return the number of matches |
;; Return the number of matches |
822 |
globalcount)))) |
globalcount)))) |
823 |
|
|