Question

I know about M-x dire, but would like to customize it. I would like to hit one key (for example F2) and get dire buffer open. When I navigate across the directory hierarchy it shouldn’t open new buffers.

And when I finally open the file it also shouldn’t open new buffer for it (not strictly necessary, but strongly preferred).

Of course this behavior can be global, i.e. for all dire buffers/invocations.

Answer 1

Here’s what I finally used:

(require 'dired) (global-set-key [(f2)] 'my-dired) (defun my-dired ()   (interactive)   (dired (file-name-directory (buffer-file-name)))) (defadvice dired-advertised-find-file (around dired-subst-directory activate)   'Replace current buffer if file is a directory.'   (interactive)   (let ((orig (current-buffer)) (filename (dired-get-filename :no-error-if-not-filep t)))   ad-do-it   (when (not (eq (current-buffer) orig)) (kill-buffer orig))))