私はemacsでidoモードを使用し、ido-list-directoryを実行するCxCdでディレクトリを一覧表示するのが好きです。ido-mode操作を有効にするコマンドがありますが、現在のポイントではdired-at-pointのようになります。私はこれをかなり頻繁に使用しますが、ido-dired-at-pointのようなものを使用したいと思います。
これがすでに実装されているのか、ドキュメントで見つからなかったのか、それとも簡単に実装できるのかわかりませんでした。
ido-list-directory
のインタラクティブな補完に使用されるように見えlist-directory
ます。そのため、ポイントにあるものがファイル名である場合は、ido を使用するのではなく、list-directory
直接使用しても同じ結果が得られます。
このようなものはどうですか:
(defun ido-ffap-list-directory ()
(interactive)
(let ((fap (ffap-guess-file-name-at-point)))
(if fap
(list-directory (file-name-directory fap))
(ido-list-directory))))
編集:
または、ディレクトリ @ ポイント (接頭辞のみ) の確認が必要な場合は、上記の SEP を次のようにC-u
置き換えます。list-directory
(defun ido-ffap-list-directory (&optional arg)
(interactive "P")
(let ((fap (ffap-guess-file-name-at-point)))
(if (null fap)
(ido-list-directory)
(if arg
(list-directory
(ido-read-directory-name "Directory: "
(file-name-directory fap)))
(list-directory (file-name-directory fap))))))
(setq ido-use-filename-at-point 'guess)