Platform-independent reveal-in-finder

This commit is contained in:
2020-05-20 11:46:40 -07:00
parent a924f32df9
commit 8c65ad1edd

View File

@@ -44,10 +44,15 @@
:desc "M-x"
"SPC" #'counsel-M-x)
(defun first-executable (candidates)
(seq-find #'executable-find candidates))
;; Reveal in finder/nautilus/whatever
(defun reveal-in-file-browser ()
(interactive)
(call-process "open" nil nil nil "."))
(call-process
(first-executable '("xdg-open" "open"))
nil nil nil "."))
(map! :leader
:desc "Reveal"