Você poderia modificar a variável interprogram-cut-function
para ter um valor que é uma função que você escreve que empurra todo o texto morto para a área de transferência da tela (e provavelmente também a área de transferência do seu sistema de janelas via x-select-text
, que é o valor padrão). Então você acabaria adicionando código semelhante ao seguinte ao seu arquivo ~/.emacs
:
(setq interprogram-cut-function 'my-interprogram-cut-function)
(defun my-interprogram-cut-function (text)
"... docstring here ..."
;; First, do the default action.
(x-select-text text)
;; Next, push the killed text into screen (somehow).
...)
A parte no final provavelmente envolverá a execução de um processo com start-process
.