Skip to content

Instantly share code, notes, and snippets.

@blue0513

blue0513/finder-open.el

Created December 9, 2018 07:24
Show Gist options
  • Save blue0513/0c9da46f17e4931c1b1069df46981cd3 to your computer and use it in GitHub Desktop.
Save blue0513/0c9da46f17e4931c1b1069df46981cd3 to your computer and use it in GitHub Desktop.
Download ZIP
Open finder with Emacs !
Raw
finder-open.el
;; open current directory
(defun finder-current-dir-open()
(interactive)
(shell-command "open ."))
;; open selected directory
(defun finder-open(dirname)
(interactive "DDirectoryName:")
(shell-command (concat "open " dirname)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment