- (defun anything-kill-buffers ()
- "Preconfigured `anything' to kill buffer you selected."
- (interactive)
- (anything
- '(((name . "Kill Buffers")
- (type . buffer)
- (candidates . anything-c-buffer-list)
- (action
- ("Kill Buffer" . (lambda (candidate)
- (kill-buffer candidate)
- (anything-kill-buffers)
- )))))
- nil nil))