[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Change in splitting from emacs 22/gnus 5.11 and emacs 23/gnus 5.13?

From: Frank Fredstone
Subject: Re: Change in splitting from emacs 22/gnus 5.11 and emacs 23/gnus 5.13?
Date: Fri, 08 Jan 2010 14:22:29 -0800
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.2 (gnu/linux) (Adam Sjøgren) writes:

> On Fri, 08 Jan 2010 10:57:47 -0800, Frank wrote:
>> Thanks. No, it is not emptied.
> Maybe it's time to share your entire configuration? (Passwords obscured,
> of course).

Ok. Gathering the configuration, I noticed that I'm actually only
using mbox files... Sorry, it's been a while since I set this
up. Dovecot stores my mail in 2 places, this first is the inbox:


Below the later, there is one mbox file per IMAP folder.

My .gnus.el is:

(setq gnus-summary-line-format "%U%R%z%I%(%[%4L: %-20,20n%]%) %d %s\n")
(setq gnus-select-method '(nntp ""))
(setq nnmail-spool-file nil)
(setq nnmail-get-new-mail nil)
(setq imap-debug t)

(setq gnus-secondary-select-methods
          '((nnml "mail")
        (nnimap "asdf"
                                (nnimap-address "localhost")
                                (nnimap-server-port 143)
                                (nnimap-stream network))))

(setq gnus-post-method '(nntp ""))

(setq message-send-mail-function 'smtpmail-send-it
      smtpmail-starttls-credential '(("" 587 nil nil))
      smtpmail-auth-credentials '(("" 587 "asdf" nil))
      smtpmail-default-smtp-server ""
      smtpmail-smtp-server ""
      smtpmail-smtp-service 587
      smtpmail-local-domain "")
(setq smtpmail-local-domain "")
(setq smtpmail-debug-info t)
(load-library "smtpmail")
(setq smtpmail-code-conv-from nil)
(defun smtpmail-fqdn ()

(setq mail-host-address "")
(setq user-mail-address "")
(setq user-full-name "Frank Fredstone")

(setq my-default-headers "Bcc: none@localhost")
(setq message-default-headers my-default-headers)

(require 'sendmail)
(setq mail-from-style 'parens)

(add-hook 'gnus-group-mode-hook 'gnus-topic-mode)
(add-hook 'gnus-topic-mode-hook
       (lambda ()
         (define-key gnus-topic-mode-map " " 'none-select-unread)
         (define-key gnus-topic-mode-map "^M" 'none-select-group))))

(defun none-select-unread ()
  (gnus-topic-select-group nil))

(defun none-select-group ()
  (gnus-topic-select-group t))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]