foo.el

;; Basic VM setup
(autoload 'vm "vm" "Start VM on your primary inbox." t)
(autoload 'vm-visit-folder "vm" "Start VM on an arbitrary folder." t)
(autoload 'vm-visit-virtual-folder "vm" "Visit a VM virtual folder." t)
(autoload 'vm-mail "vm" "Send a mail message using VM." t)

(setq vm-toolbar-pixmap-directory (concat (expand-file-name "~") "/usr/local/lib/emacs/etc/vm"))
(setq vm-image-directory (concat (expand-file-name "~")  "/usr/local/lib/emacs/etc/vm"))

(setenv "PATH" (concat (concat (expand-file-name "~") "/usr/local/bin") ":" (getenv "PATH")))

(setq send-mail-function 'smtpmail-send-it) ; send mails using smtpmail

(setq user-full-name "Federico Builes")
(setq user-mail-address "federico.builes@gmail.com")

;; Configure inbound mail (POP)
(setq vm-spool-files '(("~/INBOX"      "/var/mail/federico"      "~/INBOX.CRASH")))

(require 'smtpmail)
 (setq starttls-use-gnutls t 
        starttls-gnutls-program "gnutls-cli" 
        starttls-extra-arguments nil) 

;; Configure outbound mail (SMTP)
(setq smtpmail-starttls-credentials '(("smtp.gmail.com" 587 nil nil))
      smtpmail-smtp-server "smtp.gmail.com"
      smtpmail-default-smtp-server "smtp.gmail.com"
      send-mail-function 'smtpmail-send-it
      message-send-mail-function 'smtpmail-send-it
      smtpmail-smtp-service 587
      smtpmail-auth-credentials '(("smtp.gmail.com"
				   587
				   "federico.builes@gmail.com"
				   "your_password")))

(setq-default vm-summary-show-threads t)
(setq vm-mutable-frames nil)
(setq move-after-deleting t)
;;(setq vm-mutable-windows nil)