recoll-q というコマンドをつくっている。 中身は recoll についている recollq というコマンドを呼び出して、 それを HTML に整形したものを、 w3m で読み取る、というものだ。
直接emacs で読みとれないので、 emacs に取り込むのに苦労する。
というわけで、 やっつけで rq という elisp 関数をつくった ---
(defun rq () (interactive) (let ((q-string (read-string "Q: "))) (shell-command-to-string (concat "recoll-from-emacs " q-string)) (w3m-find-file "~/tmp.html")))
ここで呼んでいる shell-command である recoll-from-emacs は、 ほとんど recollq と同じだが、 最後に w3m を呼ばずに、 その出力を ~/tmp.html に書き込んでいる。 そして、emacs-w3m の関数で、 そのファイルを呼んでいるだけだ。 世界最高の超やっつけ仕事。 でも、とても役にたつ。