summaryrefslogtreecommitdiff
path: root/init.el
diff options
context:
space:
mode:
Diffstat (limited to 'init.el')
-rw-r--r--init.el23
1 files changed, 23 insertions, 0 deletions
diff --git a/init.el b/init.el
index 525158b..1f23cb9 100644
--- a/init.el
+++ b/init.el
@@ -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")