diff options
author | rekado <rekado@elephly.net> | 2014-09-02 13:42:48 +0200 |
---|---|---|
committer | rekado <rekado@elephly.net> | 2014-09-02 13:42:48 +0200 |
commit | f32d8f87d64caa604653ba8ab93ad28e8c3d44ed (patch) | |
tree | 03c79d03bc839949f92ccdca0f086851894c5a5f /init.el | |
parent | cf049406c9a0de1ef121568dd987bc9695c6f85f (diff) |
customise behaviour in dired
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 23 |
1 files changed, 23 insertions, 0 deletions
@@ -66,6 +66,29 @@ (turn-on-haskell-indentation) (turn-on-haskell-doc))) +;; jump to first or last file in dired, not to the very top or bottom +(require 'dired) +(defun dired-back-to-top () + (interactive) + (beginning-of-buffer) + (dired-next-line 4)) + +(define-key dired-mode-map + (vector 'remap 'beginning-of-buffer) 'dired-back-to-top) + +(defun dired-jump-to-bottom () + (interactive) + (end-of-buffer) + (dired-next-line -1)) + +(define-key dired-mode-map + (vector 'remap 'end-of-buffer) 'dired-jump-to-bottom) +(define-key dired-mode-map + (kbd "<return>") 'dired-find-alternate-file) ; was dired-advertised-find-file +(define-key dired-mode-map + (kbd "^") (lambda () (interactive) (find-alternate-file ".."))) ; was dired-up-directory + + (require 'tramp) (setq tramp-default-method "ssh") |