From: rearman <rearman@r717.net>
Date: Wed, 16 Apr 2025 15:30:25 +0000 (-0400)
Subject: Add defun and binding to open multiple files in dired
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=56115cef667e238552f1b0b429040a271ee3c6e1;p=emacsinit.git

Add defun and binding to open multiple files in dired
---

diff --git a/init.el b/init.el
index e7ea4ce..3a470af 100644
--- a/init.el
+++ b/init.el
@@ -70,10 +70,16 @@
       dired-auto-revert-buffer t
       dired-hide-details-hide-symlink-targets nil)
 
+(defun re/dired-find-marked-files (&optional arg)
+  "Open each of the marked files, or the file under the point, or when prefix arg, the next N files."
+  (interactive "P")
+  (mapc 'find-file (dired-get-marked-files nil arg)))
+
 (add-hook 'dired-mode-hook
 	  (lambda nil
 	    (dired-hide-details-mode t)
-	    (keymap-set dired-mode-map "RET" #'dired-find-alternate-file)))
+	    (keymap-set dired-mode-map "RET" #'dired-find-alternate-file)
+	    (keymap-set dired-mode-map "f" #'re/dired-find-marked-files)))
 
 ;; Bookmarks
 (setq bookmark-save-flag 1)