■掲示板に戻る■ 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 最新50



レス数が1000を超えています。残念ながら全部は表示しません。

Emacs

96 :名無しさん@お腹いっぱい。 :2000/12/15(金) 06:34
>>95
こんなの使ってみる?
(defun Buffer-menu-grep (str)
(interactive "sregexp:")
(goto-char (point-min))
(let (lines)
(forward-line 2)
(setq lines (buffer-substring (point-min) (point)))
(while (re-search-forward str nil t)
(let ((bol (progn (beginning-of-line) (point)))
(eol (progn (forward-line) (point))))
(setq lines (concat lines (buffer-substring bol eol)))))
(let ((buffer-read-only nil))
(erase-buffer)
(insert lines))))
(define-key Buffer-menu-mode-map "G" 'Buffer-menu-grep)
buffer-menu で G 押して、dired とか書くと dired-buffer だけ
表示してくれるやつ。


次100 最新50

read.cgi ver5.26+ (01/10/21-)