Recarregando aplicações em awful através do Emacs

Abaixo está um hackzinho para recarregar aplicações em awful através do Emacs, o qual pode ser bem útil quando usando awful no modo desenvolvimento (--development-mode). No modo de desenvolvimento, awful automaticamente define o caminho /reload, o qual, quando requisitado, recarrega as aplicações.

(defun awful-reload ()
  (interactive)
  (shell-command "lynx -dump http://localhost:8080/reload"))

(add-hook 'scheme-mode-hook
   #'(lambda ()
       (local-set-key "\C-cR" 'awful-reload)))

O código acima define uma função interativa (awful-reload) que pode ser invocada no Emacs através de C-cR estando-se no modo Scheme.

O cliente HTTP pode ser qualquer um de linha de comando. O lynx serve bem a este propósito por fornecer a opção -dump, que gera a saída sem formatação, a qual pode ser exibida com facilidade no buffer do Emacs.

Abaixo está um screenshot do Emacs logo após a execução de awful-reload através de C-cR.