mew.el file.

.mew.el

(add-to-list 'load-path "~/Dropbox/Mew")
(autoload 'mew "mew" nil t)
(autoload 'mew-send "mew" nil t)

;; Optional setup (Read Mail menu for Emacs 21):
(if (boundp 'read-mail-command)
    (setq read-mail-command 'mew))
;; Optional setup (e.g. C-xm for sending a message):
(autoload 'mew-user-agent-compose "mew" nil t)
(if (boundp 'mail-user-agent)
    (setq mail-user-agent 'mew-user-agent))
(if (fboundp 'define-mail-user-agent)
    (define-mail-user-agent
      'mew-user-agent
      'mew-user-agent-compose
      'mew-draft-send-message
      'mew-draft-kill
      'mew-send-hook))

(setq mew-config-alist
      '(("default"
         ("mailbox-type" . imap)
         ("proto" . "%")
         ("imap-server" . "imap.gmail.com")
         ("imap-ssl" . t)
         ("imap-user" . "[email protected]") ;; to be completed
         ("prog-ssl" . "/use/local/bin/stunnel")
         ("user" . "ykabhinav")
         ("mail-domain" . "gmail.com")
         ("name" . "Abhi Yerra")
         ("imap-delete" . nil)
         ("imap-size" . 0)
         ("smtp-ssl"    . t)
         ("smtp-ssl-port". "465")
         ("smtp-auth-list" . ("PLAIN" "LOGIN" "CRAM-MD5"))
         ("smtp-user"   . "[email protected]")
         ("smtp-server" . "smtp.gmail.com")
         ("inbox-folder" . "%INBOX")
         ("imap-friend-folder" . "%from")
         ("imap-trash-folder" . "%[Gmail]/All Mail"))))

(setq mew-use-unread-mark t)
(setq mew-delete-unread-mark-by-mark nil)