カレントディレクトリが変になったときに戻す
毎日いっぱいEmacsを使ってると非常にまれに、なにかのコマンドが悪さをして現在のディレクトリ(default-directory
)が変になることがある。C-x C-fとかM-x find-fileとかでファイルを開こうとするけど、現在編集中のファイルがある場所とは全然別のディレクトリが選択されてめんどくさいことになってる状態。厄介なので直したい。
わざわざパッケージにするほどでもないかなって気がするので、init.el
とかに書く。
(defun my/reset-default-directory-by-buffer-file-name ()
"Set default-directory by `buffer-file-name'."
(interactive)
(require 'f)
(when buffer-file-name
(setq default-directory (f-dirname buffer-file-name))))
セットアップ
f.el
があるとファイルの操作とかファイルパスの操作がラクなので入れる。MELPAのセットアップをして、M-x ielmとか起動して、以下のようなコードを打ち込む。
(package-install 'f)
下記のような表示なら、特に何もしなくていい。
動かしかた
おっ壊れやがったな、と思ったらM-x my/reset-default-directory-by-buffer-file-nameを起動する。
ただし人類はそんなに長いコマンド名を覚えられないので、君は誰とEmacsる? (補完インターフェイス紹介篇)を読んで、部分一致でコマンド呼び出しできるようにすると良い。
(写真はhelm-smexのもの)
りくつ
カレントディレクトリはdefault-directory
って変数に文字列が入ってるだけなので、これをsetq
してやるだけ。buffer-file-name
を見てるので、実ファイルを編集してるとき以外は特に何もしない。
あとがき
てきとーにEmacs Lispのコードを書きながら動かしてるときが一番壊れる。
Author And Source
この問題について(カレントディレクトリが変になったときに戻す), 我々は、より多くの情報をここで見つけました https://qiita.com/tadsan/items/2a0e141a7c0d5fad987f著者帰属:元の著者の情報は、元のURLに含まれています。著作権は原作者に属する。
Content is automatically searched and collected through network algorithms . If there is a violation . Please contact us . We will adjust (correct author information ,or delete content ) as soon as possible .