Update 'init.el'
This commit is contained in:
parent
3efea4f2ac
commit
11f4d41ad3
94
init.el
94
init.el
|
@ -33,7 +33,6 @@
|
|||
;; Widgets
|
||||
(setq dashboard-items 'nil)
|
||||
|
||||
(set-face-attribute 'default nil :font "Cascadia Code" :height 100)
|
||||
|
||||
|
||||
;; Make ESC quit prompts
|
||||
|
@ -49,7 +48,10 @@
|
|||
(package-initialize)
|
||||
(unless package-archive-contents
|
||||
(package-refresh-contents))
|
||||
|
||||
(use-package dashboard
|
||||
:ensure t
|
||||
:config
|
||||
(dashboard-setup-startup-hook))
|
||||
;; Initialize use-package on non-Linux platforms
|
||||
(unless (package-installed-p 'use-package)
|
||||
(package-install 'use-package))
|
||||
|
@ -158,94 +160,6 @@
|
|||
|
||||
;; IRC client ERC config
|
||||
|
||||
(require 'erc)
|
||||
|
||||
(setq
|
||||
erc-autojoin-timing 'ident
|
||||
erc-fill-function 'erc-fill-static
|
||||
erc-join-channel 'general
|
||||
erc-hide-list '("JOIN" "PART" "QUIT")
|
||||
erc-fill-static-center 10
|
||||
erc-server-reconnect-attempts 5
|
||||
erc-server-reconnect-timeout 3)
|
||||
|
||||
(global-set-key "\C-ch"
|
||||
(lambda ()
|
||||
(interactive)
|
||||
(erc :server "rnbunker.ydns.eu"
|
||||
:port "6667"
|
||||
:nick "ahmd"
|
||||
:full-name "Am")))
|
||||
|
||||
;; Email configuration
|
||||
|
||||
(use-package mu4e
|
||||
:ensure nil
|
||||
:config
|
||||
|
||||
;; This is set to 't' to avoid mail syncing issues when using mbsync
|
||||
(setq mu4e-change-filenames-when-moving t)
|
||||
|
||||
;; Refresh mail using isync every 10 minutes
|
||||
(setq mu4e-update-interval (* 10 60))
|
||||
(setq mu4e-get-mail-command "mbsync -a")
|
||||
(setq mu4e-maildir "~/Mail")
|
||||
|
||||
;; Make sure plain text mails flow correctly for recipients
|
||||
(setq mu4e-compose-format-flowed t)
|
||||
|
||||
;; Configure the function to use for sending mail
|
||||
(setq message-send-mail-function 'smtpmail-send-it)
|
||||
|
||||
;; NOTE: Only use this if you have set up a GPG key!
|
||||
;; Automatically sign all outgoing mails
|
||||
;; (add-hook 'message-send-hook 'mml-secure-message-sign-pgpmime)
|
||||
|
||||
(setq mu4e-contexts
|
||||
(list
|
||||
;; Work account
|
||||
(make-mu4e-context
|
||||
:name "Work"
|
||||
:match-func
|
||||
(lambda (msg)
|
||||
(when msg
|
||||
(string-prefix-p "/Riseup" (mu4e-message-field msg :maildir))))
|
||||
:vars '((user-mail-address . "syedahmed@riseup.net")
|
||||
(user-full-name . "Syed Ahmed Hussain")
|
||||
(smtpmail-smtp-server . "mail.riseup.net")
|
||||
(smtpmail-smtp-service . 465)
|
||||
(smtpmail-stream-type . tls)
|
||||
(mu4e-compose-signature . "Ahmed via Emacs")
|
||||
(mu4e-drafts-folder . "/Riseup/[Riseup]/Drafts")
|
||||
(mu4e-sent-folder . "/Riseup/[Riseup]/Sent Mail")
|
||||
(mu4e-refile-folder . "/Riseup/[Riseup]/All Mail")
|
||||
(mu4e-trash-folder . "/Riseup/[Riseup]/Trash")))
|
||||
|
||||
;; Personal account
|
||||
(make-mu4e-context
|
||||
:name "Personal"
|
||||
:match-func
|
||||
(lambda (msg)
|
||||
(when msg
|
||||
(string-prefix-p "/Disroot" (mu4e-message-field msg :maildir))))
|
||||
:vars '((user-mail-address . "9ahmed@disroot.org")
|
||||
(user-full-name . "ahmd")
|
||||
(smtpmail-smtp-server . "disroot.org")
|
||||
(smtpmail-smtp-service . 465)
|
||||
(smtpmail-stream-type . ssl)
|
||||
(mu4e-compose-signature . "ahmd via Emacs")
|
||||
(mu4e-drafts-folder . "/Disroot/Drafts")
|
||||
(mu4e-sent-folder . "/Disroot/Sent")
|
||||
(mu4e-refile-folder . "/Disroot/Archive")
|
||||
(mu4e-trash-folder . "/Disroot/Trash")))))
|
||||
|
||||
(setq mu4e-maildir-shortcuts
|
||||
'(("/Inbox" . ?i)
|
||||
("/[Riseup]/Sent Mail" . ?s)
|
||||
("/[Riseup]/Trash" . ?t)
|
||||
("/[Riseup]/Drafts" . ?d)
|
||||
("/[Riseup]/All Mail" . ?a))))
|
||||
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue