Hatena::Groupemacs

Emacs/Lisp/Drill

 | 

2009-06-02

shell-pop.elが便利

12:03 | はてなブックマーク - shell-pop.elが便利 - Emacs/Lisp/Drill

MacにはVisorというのがあって、会社のメンバーが使っているのをみて羨ましい操作感だなーと思っていたのだけれども、EmacserはEmacsからterminalを使うべきとか思っているし、Ubuntuerなので残念ながら使ってなかった。

ちなみにansi-termが好き。

そしたら最近d:id:kyagiさんがshell-pop.elなるナイスインターフェースを作成していて、d:id:tomoyaさんやEmacsWikiの人の要望のおかげかわからないけれどもansi-termに対応してくれた。

実際に導入してみたら実に使いやすい。

ansi-termはM-xを打たせてくれない(はずな)のでちょっとだけ設定に工夫がいる。

自分の設定は以下のような感じ。

(require 'shell-pop)
(shell-pop-set-internal-mode "ansi-term")
(shell-pop-set-internal-mode-shell "/bin/bash")

(defvar ansi-term-after-hook nil)
(add-hook 'ansi-term-after-hook
          (function
           (lambda ()
             (define-key term-raw-map "\C-t" 'shell-pop))))
(defadvice ansi-term (after ansi-term-after-advice (arg))
  "run hook as after advice"
  (run-hooks 'ansi-term-after-hook))
(ad-activate 'ansi-term)

(global-set-key "\C-t" 'shell-pop)

これでいつでもC-tでshell-popができる。

 |