diff --git a/thoom-emacs/modules/thoom-tweaks.el b/thoom-emacs/modules/thoom-tweaks.el index e0dfb63..283337e 100644 --- a/thoom-emacs/modules/thoom-tweaks.el +++ b/thoom-emacs/modules/thoom-tweaks.el @@ -24,7 +24,8 @@ (delete-other-windows))) (use-package emacs - :bind (("C-o" . nil) + :bind (("C-c o b" . reveal-in-file-browser) + ("C-o" . nil) ("C-o C-o" . other-window) ("C-o o" . other-window) ("C-o b" . consult-buffer-other-window-no-focus) @@ -151,3 +152,13 @@ (use-package explain-pause-mode :ensure (:host github :repo "lastquestion/explain-pause-mode")) + +(defun first-executable (candidates) + (seq-find #'executable-find candidates)) + +;; Reveal in finder/nautilus/whatever +(defun reveal-in-file-browser () + (interactive) + (call-process + (first-executable '("xdg-open" "open")) + nil nil nil "."))