mode-hooks/dired-mode-hooks.el

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