summaryrefslogtreecommitdiff
path: root/init-dired.el
diff options
context:
space:
mode:
Diffstat (limited to 'init-dired.el')
-rw-r--r--init-dired.el23
1 files changed, 23 insertions, 0 deletions
diff --git a/init-dired.el b/init-dired.el
new file mode 100644
index 0000000..b9f54bc
--- /dev/null
+++ b/init-dired.el
@@ -0,0 +1,23 @@
+;; jump to first or last file in dired, not to the very top or bottom
+(require 'dired)
+(require 'dired+)
+(defun my/dired-back-to-top ()
+ (interactive)
+ (beginning-of-buffer)
+ (dired-next-line 4))
+
+(define-key dired-mode-map
+ (vector 'remap 'beginning-of-buffer) 'my/dired-back-to-top)
+
+(defun my/dired-jump-to-bottom ()
+ (interactive)
+ (end-of-buffer)
+ (dired-next-line -1))
+
+(define-key dired-mode-map
+ (vector 'remap 'end-of-buffer) 'my/dired-jump-to-bottom)
+(define-key dired-mode-map
+ (kbd "^") (lambda () (interactive) (find-alternate-file ".."))) ; was dired-up-directory
+
+;; TODO: what does this do?
+(put 'dired-find-alternate-file 'disabled nil)