Lendo e enviando e-mails com Gnus

O Gnus (http://www.gnus.org) é um leitor de news e e-mails para o Emacs. Ele é parte do GNU Emacs, não sendo necessário instalá-lo separadamente, porém o grupo de desenvolvedores do Gnus é mais acelerado liberando novas versões que podem ser instaladas independendetemente do Emacs.

Figura: Visualizando os grupos

Os e-mails no Gnus podem ser separados automaticamente e organizados na forma de mailboxes, ou grupos como é chamado no Gnus. O padrão do Gnus é criar um diretório para cada grupo e um arquivo para cada mensagem, ele cria também um arquivo escondido para acelerar a geração do sumário das mensagens. A figura  apresenta a tela inicial do Gnus, que indica quantos emails não lidos existem em cada um dos grupos. A figura  mostra a tela que é apresentada ao usuário assim que ele entra em um dos grupos.

Figura: Visualizando os grupos

A seguir pode ser vista uma configuração mínima do Gnus, com alguns exemplos de filtros para separação automática das mensagens. Para que os grupos criados sejam visualizados pelo usuário é necessário fazer a assinatura dos mesmos. Para isto, basta teclar U seguido do nome do grupo (por exemplo, list.tex-br).

;;; Configuracoes GNUS
(setq nnml-directory "~/e-mail/" ;;; Diretorio onde sao guardados os arquivos.
      nntp-directory "~/e-mail/"
      nndraft-directory "~/e-mail/"
      message-directory "~/e-mail/"
      message-autosave-directory "~/e-mail/"
      gnus-select-method '(nnml "")
;; Baixando emails do spool local
      mail-sources '((file :path "/var/spool/mail/rreal"))
      nnmail-crosspost nil
;; Alguns exemplos de filtros que podem ser empregados
      nnmail-split-methods '(
                             ("spam"                          "^\\(X-Bogosity\\|X-Spam-Status\\): Yes")
                             
                             ("list.\\1"                      "^X-Mailing-List: \<\\(.*\\)@lists.debian.org\>")

                             ("list.tex-br"                   "^\\(To\\|Cc\\):.*tex-br@listas.furg.br")
                             ("newsletter"                    "^From:.*\\(dicas-l-owner@unicamp.br\\|newsletter@www.underlinux.com.br\\|nytdirect@nytimes.com\\)")
                             ("pessoal.Mario"                    "^From:.*mario@\\(inf.ufrgs.br\\|proxy.furg.br\\)")
                             ("mail.undelivered"                     "^Subject:.*Undelivered Mail.*")
                             ("mail.Admin_Request"                     "^\\(To\\|From\\|Cc\\):.*\\(l\-admin\\|mailman\-owner\\|\-bounces\\)@.*")
                             ("mail.other"                    "")
                             )
;; definindo a mailbox de emails enviados
      gnus-outgoing-message-group "nnml:outgoing-mail"
;; definindo as mailboxes que possuem mensagens que podem ser apagadas automaticamente
      gnus-auto-expirable-newsgroups "spam\\|newsletter"
)