$shibayu36->blog;

クラスター株式会社のソフトウェアエンジニアです。エンジニアリングや読書などについて書いています。

emacsで編集しているファイルのディレクトリをFinderで開く

 なんかいろいろあるかもしれないけど、とりあえずやってみた。

最初に

(defun open-current-dir-with-finder ()
  (interactive)
  (shell-command (concat "open " (file-name-directory (buffer-file-name)))))
  • buffer-file-nameで現在のbufferのfilepathが取れる
  • file-name-directoryでそのファイルのディレクトリ名が取れる
  • shell-commandでコマンド実行できる

次に

こんな事しなくても下のようにしたらできてた。

(defun open-current-dir-with-finder ()
  (interactive)
  (shell-command (concat "open .")))

もちろんM-! open .ってしてもできる

とりあえずバッファ名取るのとかの勉強になったので良かった。