Emacs: каков обычный способ получения вывода от процесса?
Моя цель - получить результаты процесса в Emacs.
Например, M-x run-python
дает мне оболочку Python *Python*
что я могу отправить код Python. Если я отправлю print "hello world"
в *Python*
Я надеюсь, что Emacs сможет узнать результат после завершения выполнения и отобразить его в мини-буфере.
Можно ли добавить что-то вроде обратного вызова?
1 ответ
Решение
Благодаря комментариям @lawlist я решил свою проблему, создав следующую функцию фильтра и назначив ее процессу (*MozRepl*
в моем случае) с (set-process-filter (get-buffer-process "*MozRepl*") 'moz-controller-repl-filter)
(defun moz-controller-repl-filter (proc string)
"Filter function of *MozRepl*.
It gets the useful output of *MozRepl*, store it in `moz-controller-repl-output` and `kill-ring`"
(when (buffer-live-p (process-buffer proc))
(unless (string= string "repl> ") ; ignore empty output (page up, page down, etc)
(setq moz-controller-repl-output
(replace-regexp-in-string "\"\\(.+\\)\"\nrepl> " "\\1" string))
(kill-new moz-controller-repl-output) ; append to kill-ring
(message moz-controller-repl-output) ; show the copied content in echo area
)
(with-current-buffer (process-buffer proc)
(let ((moving (= (point) (process-mark proc))))
(save-excursion
;; Insert the text, advancing the process marker.
(goto-char (process-mark proc))
(insert string)
(set-marker (process-mark proc) (point)))
(if moving (goto-char (process-mark proc)))))))