Skip to content

Instantly share code, notes, and snippets.

@kobapan
Created March 23, 2015 03:58
Show Gist options
  • Save kobapan/eec97d7b753d6ce5648d to your computer and use it in GitHub Desktop.
Save kobapan/eec97d7b753d6ce5648d to your computer and use it in GitHub Desktop.
elisp buffer-listからファイルとディレクトリの一覧をフルパスで取得
(delq nil (mapcar
(lambda (x)
(set-buffer x)
(unless (string= (file-name-nondirectory "README") (buffer-name)) ;exclude README
(or (buffer-file-name) list-buffers-directory)))
(buffer-list)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment