Berikut adalah beberapa kemungkinan yang tidak terlalu apik, yang memiliki keuntungan bekerja dengan saham Emacs.
Jika Anda menekan M-s o
( isearch-occur
) selama pencarian tambahan, sebuah Terjadi penyangga muncul dengan ekspresi pencarian saat ini. Di bagian atas *Occur*
buffer adalah jumlah garis yang cocok.
Perintah how-many
menampilkan jumlah kemunculan regexp (termasuk kejadian berulang). Sayangnya itu tidak terintegrasi dengan pencarian tambahan. Berikut adalah integrasi isearch proof-of-concept: tekan M-s #
selama isearch untuk menunjukkan jumlah kecocokan.
(defun isearch-how-many (regexp)
"Run `how-many' using the last search string as the regexp.
Interactively, REGEXP is constructed as with `isearch-occur'."
(interactive
(list (cond
((functionp isearch-word)
(funcall isearch-word isearch-string))
(isearch-word (word-search-regexp isearch-string))
(isearch-regexp isearch-string)
(t (regexp-quote isearch-string)))))
(how-many regexp nil nil (interactive-p)))
(define-key isearch-mode-map [?\M-s ?#] 'isearch-how-many)