Đã cài đặt sẵn multi-occur-in-matching-buffers
. Tôi sử dụng một phiên bản sửa đổi này (vì tôi luôn luôn muốn tìm kiếm tất cả các bộ đệm, và xác định một mẫu tên đệm mỗi lần là gây phiền nhiễu).
(defun my-multi-occur-in-matching-buffers (regexp &optional allbufs)
"Show lines matching REGEXP in all file-visiting buffers.
Given a prefix argument, search in ALL buffers."
(interactive (occur-read-primary-args))
(multi-occur-in-matching-buffers "." regexp allbufs))
(global-set-key (kbd "M-s /") 'my-multi-occur-in-matching-buffers)
Để đảo ngược hành vi của các đối số tiền tố để các hành vi mặc định là để tìm kiếm tất cả đệm, thay đổi cuộc gọi đến:
(multi-occur-in-matching-buffers "." regexp (not allbufs))
(và, tất nhiên, cập nhật docstring phù hợp .)
Thx sử dụng nó ngay bây giờ – iobelix
Nên có một '(yêu cầu 'cl)' trước khi điều này? Tôi không biết tại sao, nhưng điều đó đã sửa lỗi tôi nhận được. NB: Tôi là một noob lisp. – cammil
cammil: Tôi nghĩ bạn đúng; "remove-if" và "remove-if-not" nằm trong thư viện "cl". – offby1