diff options
| -rw-r--r-- | lisp/init-dired.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/init-dired.el b/lisp/init-dired.el index 7c40a06..cbded0f 100644 --- a/lisp/init-dired.el +++ b/lisp/init-dired.el @@ -58,9 +58,16 @@ (yes-or-no-p (format "Open %s files?" num-files))) (--each files (org-open-file it in-emacs))))) +(defun km/dired-view-file-other-window () + "In Dired, view this file in another window." + (interactive) + (view-file-other-window (dired-get-file-for-visit))) + ;; This overrides the binding for `list-directory'. (define-key dired-mode-map (kbd "C-c C-b") 'dired-up-directory) (global-set-key (kbd "C-x C-d") 'km/dired-switch-to-buffer) +;; This overrides `dired-do-run-mail'. +(define-key dired-mode-map "V" 'km/dired-view-file-other-window) (define-key ctl-x-4-map "D" 'km/dired-switch-to-buffer-other-window) |