EmacsからGuake Terminalにコマンドを送る

EmacsからiTermにコマンドを送る - $shibayu36->blog;のGuake Terminal版です。

execute-on-guakeでコマンドを送り、toggle-guakeでGuake Terminalの表示をトグルします。

(defun execute-on-guake (command)
  "Execute `command' on Guake Terminal."
  (interactive "MCommand: ")
  (start-process-shell-command "guake" nil (format "guake -e '%s'" command)))

(defun toggle-guake ()
  "Toggle visibility of Guake Terminal."
  (interactive)
  (start-process-shell-command "guake" nil "guake -t"))

Guake Terminalが起動していないと一回のコマンドではうまく行かないので、Guake Terminalをスタートアップ時に起動させておくといいと思います。

現在Emacsで開いているファイルのディレクトリに移動するのは、cd-on-guakeでできます。

(defun cd-on-guake ()
  "Move to current directory in Guake Terminal, then show Guake Terminal."
  (interactive)
  (execute-on-guake (format "cd %s" default-directory))
  (toggle-guake))