1 (defun dired-up-directory-in-same-buffer ()
2 ;; Open the parent directory, but do it in the current buffer.
4 (find-alternate-file "..")
8 ;; Redefine some functions so that dired will re-use the current
9 ;; buffer whenever possible.
11 ;; Was dired-advertised-find-file.
12 (define-key dired-mode-map (kbd "<return>") 'dired-find-alternate-file)
14 ;; Was dired-up-directory.
15 (define-key dired-mode-map (kbd "^") 'dired-up-directory-in-same-buffer)
18 (add-hook 'dired-mode-hook (function dm-hook))