|  |  | @ -188,7 +188,7 @@ | 
			
		
	
		
			
				
					|  |  |  | :after org | 
			
		
	
		
			
				
					|  |  |  | :bind ("C-x p" . org-pomodoro)) | 
			
		
	
		
			
				
					|  |  |  | ;; 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 | 
			
		
	
		
			
				
					|  |  |  | (lambda() | 
			
		
	
		
			
				
					|  |  |  | ;; dictionary | 
			
		
	
	
		
			
				
					|  |  | @ -209,7 +209,7 @@ | 
			
		
	
		
			
				
					|  |  |  | (dolist (hook '(org-mode-hook latex-mode-hook tex-mode-hook git-commit-mode-hook)) | 
			
		
	
		
			
				
					|  |  |  | (add-hook hook (lambda () (flyspell-mode 1)))) | 
			
		
	
		
			
				
					|  |  |  | ;;(setq ispell-dictionary "en") | 
			
		
	
		
			
				
					|  |  |  | (setq ispell-program-name "/usr/local/bin/aspell") | 
			
		
	
		
			
				
					|  |  |  | (setq ispell-program-name "/usr/bin/aspell") | 
			
		
	
		
			
				
					|  |  |  | ;; Set default font: | 
			
		
	
		
			
				
					|  |  |  | (add-to-list 'default-frame-alist | 
			
		
	
		
			
				
					|  |  |  | '(font . "Source Code Pro-14")) | 
			
		
	
	
		
			
				
					|  |  | @ -279,129 +279,13 @@ | 
			
		
	
		
			
				
					|  |  |  | :config | 
			
		
	
		
			
				
					|  |  |  | (setq python-shell-interpreter "python3") | 
			
		
	
		
			
				
					|  |  |  | (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 | 
			
		
	
		
			
				
					|  |  |  | :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 was added by Custom. | 
			
		
	
	
		
			
				
					|  |  | @ -410,10 +294,10 @@ | 
			
		
	
		
			
				
					|  |  |  | ;; If there is more than one, they won't work right. | 
			
		
	
		
			
				
					|  |  |  | '(custom-safe-themes | 
			
		
	
		
			
				
					|  |  |  | (quote | 
			
		
	
		
			
				
					|  |  |  | ("99ea831ca79a916f1bd789de366b639d09811501e8c092c85b2cb7d697777f93" "bf387180109d222aee6bb089db48ed38403a1e330c9ec69fe1f52460a8936b66" default))) | 
			
		
	
		
			
				
					|  |  |  | ("71e5acf6053215f553036482f3340a5445aee364fb2e292c70d9175fb0cc8af7" "99ea831ca79a916f1bd789de366b639d09811501e8c092c85b2cb7d697777f93" "bf387180109d222aee6bb089db48ed38403a1e330c9ec69fe1f52460a8936b66" default))) | 
			
		
	
		
			
				
					|  |  |  | '(package-selected-packages | 
			
		
	
		
			
				
					|  |  |  | (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) | 
			
		
	
		
			
				
					|  |  |  | '(safe-local-variable-values | 
			
		
	
		
			
				
					|  |  |  | (quote | 
			
		
	
	
		
			
				
					|  |  | 
 |