如何在特定位置使用緩衝區文件清除所有緩衝區？

Question

如何在特定位置使用緩衝區文件清除所有緩衝區？

例如，我要殺死緩衝文件在C的所有緩衝區：... \ dev的所有dired緩衝子目錄到c：\ dev的

，還是別人的話，如何去雖然emacs中所有緩衝區的文件或目錄？

謝謝@David @phils。我結合elisp的代碼和功能ibuffer

(mapc (lambda (buffer) 
    (let ((file-name 
      (or (buffer-file-name buffer) 
       (with-current-buffer buffer 
       (and 
        (boundp 'dired-directory) 
        (stringp dired-directory) 
        dired-directory)) 
       ))) 
     (when (and file-name 
       (string-match "^c:.*?\\\\dev" file-name)) 
     (kill-buffer buffer)))) 
    (buffer-list)) 

Answer 1

從elisp的使用：

(mapc (lambda (buffer) 
     (let ((file-name 
       (or (buffer-file-name buffer) 
        ;; In dired-mode we need `dired-directory' which 
        ;; might be a list and may not be fully expanded. 
        (with-current-buffer buffer 
        (and (eq major-mode 'dired-mode) 
          (expand-file-name 
          (if (consp dired-directory) 
           (car dired-directory) 
          dired-directory))))))) 
      (when (and file-name 
        (string-match "^c:\\\\.*\\\\dev" file-name)) 
      (kill-buffer buffer)))) 
     (buffer-list))