あるディレクトリ以下のファイルを全てフォーマットし直したい - (define -ayalog '())
僕は普段 Emacs を使っている。しかし、最近 Cursive*1 を使うこともある。 それで何が困るかというと Cursive はちょっとイケてないので、ちゃんと Clojure(Script)? をフォーマットすることができない*2。 Clojure のスタイルガイドだと例えば with-* マクロのときは 2 スペース分インデントするとかあるんだけど、それを Cursive でよしなにするの結構めんどくさいというか、独自で with-* を定義してもそれをデフォルトで綺麗にインデントしてくれない。だからそのままコミットすると困ったことになるわけですね。 じゃあコミット前に自動でどうにかしたい、と思うわけです。賢明な読者なら既に気付いていると思うけど、そう Emacs Lisp を使えばいいんです。 スクリプト言語としてのEmacs Lisp ということでこんな感じのスクリプトを書い
Emacs の上の方にファイルのパスを表示したかった - (define -ayalog '())
ずっと前からしたいなーって思ってたけど、思いの外簡単に出来たので満足している。 (setq-default header-line-format '("" (:propertize (:eval (shorten-directory default-directory 30)) face mode-line-folder-face) (:propertize "%b" face mode-line-filename-face))) (defun shorten-directory (dir max-length) "Show up to `max-length' characters of a directory name `dir'." (let ((path (reverse (split-string (abbreviate-file-name dir) "/"))) (output
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Read from a file into a Emacs lisp list
Welcome | Sebastian Wiesner
