Browse Source

no mu4e package and ubuntu version

no-mu4e
parent
commit
ce0c898a4e
1 changed files with 9 additions and 125 deletions
  1. +9
    -125
      .emacs

+ 9
- 125
.emacs View File

@ -188,7 +188,7 @@
:after org :after org
:bind ("C-x p" . org-pomodoro)) :bind ("C-x p" . org-pomodoro))
;; org configuration: ;; org configuration:
(setq org-agenda-files '("~/beorg/phd.org" "~/beorg/students.org" "~/beorg/inbox.org" "~/beorg/academia.org"))
;;(setq org-agenda-files '("~/beorg/phd.org" "~/beorg/students.org" "~/beorg/inbox.org" "~/beorg/academia.org"))
(add-hook 'org-mode-hook (add-hook 'org-mode-hook
(lambda() (lambda()
;; dictionary ;; dictionary
@ -209,7 +209,7 @@
(dolist (hook '(org-mode-hook latex-mode-hook tex-mode-hook git-commit-mode-hook)) (dolist (hook '(org-mode-hook latex-mode-hook tex-mode-hook git-commit-mode-hook))
(add-hook hook (lambda () (flyspell-mode 1)))) (add-hook hook (lambda () (flyspell-mode 1))))
;;(setq ispell-dictionary "en") ;;(setq ispell-dictionary "en")
(setq ispell-program-name "/usr/local/bin/aspell")
(setq ispell-program-name "/usr/bin/aspell")
;; Set default font: ;; Set default font:
(add-to-list 'default-frame-alist (add-to-list 'default-frame-alist
'(font . "Source Code Pro-14")) '(font . "Source Code Pro-14"))
@ -279,129 +279,13 @@
:config :config
(setq python-shell-interpreter "python3") (setq python-shell-interpreter "python3")
(setq venv-location "~/.virtualenvs")) (setq venv-location "~/.virtualenvs"))
;;mu4e
;; (use-package mu4e
;; :commands (mu4e)
;; :init
;; ;;(progn (require 'helm-mu))
;; :config
;; (add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu/mu4e")
;; (setq mu4e-mu-binary "/usr/local/bin/mu"))
;;-+-+-+-+-+-+-+-+-+-+-+-+
;; "default" parameters from Gmail
(setq user-full-name "Gerardo Marx Chávez-Campos") ;;user
(setq mu4e-compose-signature t) ;; signature in file ~/.signature
(add-hook 'mu4e-compose-mode-hook 'flyspell-mode(setq ispell-local-dictionary "castellano")) ;; spell check
;; attempt to show images when viewing messages
(setq mu4e-view-show-images t)
(setq mu4e-sent-folder "/Gmail/sent"
;; mu4e-sent-messages-behavior 'delete ;; Unsure how this should be configured
mu4e-drafts-folder "/Gmail/drafts"
user-mail-address "gmarx_cc@itmorelia.edu.mx"
smtpmail-local-domain "gmail.com"
smtpmail-default-smtp-server "smtp.gmail.com"
smtpmail-stream-type 'starttls
smtpmail-smtp-server "smtp.gmail.com"
smtpmail-smtp-service 587)
;; ---
;; Now I set a list of
(defvar my-mu4e-account-alist
'(("Gmail"
(mu4e-sent-folder "/Gmail/sent")
(mu4e-drafts-folder "/Gmail/drafts")
(user-mail-address "gmarx_cc@itmorelia.edu.mx")
(smtpmail-smtp-user "gmarx_cc@itmorelia.edu.mx")
(smtpmail-local-domain "gmail.com")
(smtpmail-default-smtp-server "smtp.gmail.com")
(smtpmail-stream-type starttls)
(smtpmail-smtp-server "smtp.gmail.com")
(smtpmail-smtp-service 587)
)
;; Include any other accounts here ...
("Exchange"
(mu4e-sent-folder "/Exchange/sent")
(mu4e-drafts-folder "/Exchange/drafts")
(user-mail-address "gerardo.cc@morelia.tecnm.mx")
(smtpmail-smtp-user "gerardo.cc@morelia.tecnm.mx")
(smtpmail-local-domain "office365.com")
(smtpmail-default-smtp-server "smtp.office365.com")
(smtpmail-stream-type starttls)
(smtpmail-smtp-server "smtp.office365.com")
(smtpmail-smtp-service 587)
)
;;
;; hotmail
("Hotmail"
(mu4e-sent-folder "/Hotmail/sent")
(mu4e-drafts-folder "/Hotmail/drafts")
(user-mail-address "gmarx_cc@hotmail.com")
(smtpmail-smtp-user "gmarx_cc@hotmail.com")
(smtpmail-local-domain "office365.com")
(smtpmail-default-smtp-server "smtp.office365.com")
(smtpmail-stream-type starttls)
(smtpmail-smtp-server "smtp.office365.com")
(smtpmail-smtp-service 25)
)
))
;; ---
(defun my-mu4e-set-account ()
"Set the account for composing a message.
This function is taken from:
https://www.djcbsoftware.nl/code/mu/mu4e/Multiple-accounts.html"
(let* ((account
(if mu4e-compose-parent-message
(let ((maildir (mu4e-message-field mu4e-compose-parent-message :maildir)))
(string-match "/\\(.*?\\)/" maildir)
(match-string 1 maildir))
(completing-read (format "Compose with account: (%s) "
(mapconcat #'(lambda (var) (car var))
my-mu4e-account-alist "/"))
(mapcar #'(lambda (var) (car var)) my-mu4e-account-alist)
nil t nil nil (caar my-mu4e-account-alist))))
(account-vars (cdr (assoc account my-mu4e-account-alist))))
(if account-vars
(mapc #'(lambda (var)
(set (car var) (cadr var)))
account-vars)
(error "No email account found"))))
(add-hook 'mu4e-compose-pre-hook 'my-mu4e-set-account)
;;-+-+-+-+-+-+-+-+-+-+-+-+
;;---------
;; mu4e-maildirs-extension
;; (use-package mu4e-maildirs-extension
;; :ensure t
;; :init
;; (mu4e-maildirs-extension)
;; :custom
;; (mu4e-maildirs-extension-custom-list '("/Gmail/INBOX" "/Exchange/INBOX" "/Hotmail/INBOX"))
;; )
;; mu4e-alert
(use-package mu4e-alert
;; pyenv:
(use-package pyvenv
:ensure t :ensure t
:after mu4e
:init
(setq mu4e-alert-interesting-mail-query
(concat
"flag:unread maildir:/Exchange/INBOX "
"OR "
"flag:unread maildir:/Gmail/INBOX"
))
(mu4e-alert-enable-mode-line-display)
(defun gjstein-refresh-mu4e-alert-mode-line ()
(interactive)
(mu4e~proc-kill)
(mu4e-alert-enable-mode-line-display)
)
(run-with-timer 0 60 'gjstein-refresh-mu4e-alert-mode-line))
;; helm
;; (use-package helm-mu
;; :ensure t
;; :config
;; ;;(define-key mu4e-main-mode-map "s" 'helm-mu)
;; ;;(define-key mu4e-headers-mode-map "s" 'helm-mu)
;; ;;(define-key mu4e-view-mode-map "s" 'helm-mu)
;; )
:config
(pyvenv-mode 1))
(custom-set-variables (custom-set-variables
;; custom-set-variables was added by Custom. ;; custom-set-variables was added by Custom.
@ -410,10 +294,10 @@
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(custom-safe-themes '(custom-safe-themes
(quote (quote
("99ea831ca79a916f1bd789de366b639d09811501e8c092c85b2cb7d697777f93" "bf387180109d222aee6bb089db48ed38403a1e330c9ec69fe1f52460a8936b66" default)))
("71e5acf6053215f553036482f3340a5445aee364fb2e292c70d9175fb0cc8af7" "99ea831ca79a916f1bd789de366b639d09811501e8c092c85b2cb7d697777f93" "bf387180109d222aee6bb089db48ed38403a1e330c9ec69fe1f52460a8936b66" default)))
'(package-selected-packages '(package-selected-packages
(quote (quote
(latex-preview-pane org-pomodoro which-key virtualenvwrapper use-package treemacs-projectile pdf-tools org-bullets mu4e-maildirs-extension mu4e-alert magit helm-projectile helm-mu flycheck expand-region doom-themes doom-modeline dashboard company auctex)))
(pyvenv latex-preview-pane org-pomodoro which-key virtualenvwrapper use-package treemacs-projectile pdf-tools org-bullets mu4e-maildirs-extension mu4e-alert magit helm-projectile helm-mu flycheck expand-region doom-themes doom-modeline dashboard company auctex)))
'(pdf-tools-handle-upgrades nil) '(pdf-tools-handle-upgrades nil)
'(safe-local-variable-values '(safe-local-variable-values
(quote (quote


Loading…
Cancel
Save