diff --git a/guix/init.org b/guix/init.org index 7b07c8a..f46f1ef 100644 --- a/guix/init.org +++ b/guix/init.org @@ -83,6 +83,7 @@ I don't use straight for much currently, but needed it in order to install beanc (use-package pass) (use-package password-store) (pinentry-start) + (auth-source-pass-enable) #+end_src ** Variables Things referenced throughout the config which are specific to me @@ -318,7 +319,7 @@ Setting this in the :init of evil doesn't work for some reason. It has to be ear ("*scratch*" :align left :select t :size 0.25 :popup t) (treemacs-mode :align left :select t :size 0.40 :popup t) ("*Messages*" :align right :select t :size 0.25 :popup t)) - '(:select t)) ;; Always select newly created windows + default-shackle-rule '(:select t)) ;; Always select newly created windows #+end_src ** Popper #+begin_src emacs-lisp @@ -653,9 +654,9 @@ I know these could be bound on a per-package basis, but since this is my primary ;; Reference buffers "r" '(:ignore t :which-key "reference buffers") - "s" '(scratch-buffer :which-key "Scratch") - "m" '(view-echo-area-messages :which-key "Messages") - "c" '(view-lossage :which-key "Commands History") + "rs" '(scratch-buffer :which-key "Scratch") + "rm" '(view-echo-area-messages :which-key "Messages") + "rc" '(view-lossage :which-key "Commands History") ;; Shell "s" '(:ignore t :which-key "shell") @@ -693,6 +694,9 @@ I know these could be bound on a per-package basis, but since this is my primary )) #+end_src +#+RESULTS: +: t + * Notes #+begin_src emacs-lisp (use-package deft) @@ -1079,6 +1083,70 @@ Uses the external fish program to provide fish-style completions to eshell etc #+end_src +* Email, rss, newsgroups +Oh, boy. Here we go. +[[https://www.gnu.org/software/emacs/manual/html_node/auth][This]] will come in handy. +(=TODO=: smtp header) +#+begin_src emacs-lisp + + (setq user-mail-address "ian@keane.sh" + user-full-name "Ian Keane") + + ;; Assuming your passwords are stored in Password Store with names like: + ;; "email/fastmail" and "email/gmail" + + ;; IMAP configuration for Fastmail + + (setq gnus-select-method + '(nnimap "Fastmail-emacs" + (nnimap-user "ian@keane.sh") + (nnimap-address "imap.fastmail.com") + (nnimap-server-port 993) + (nnimap-stream ssl))) + + + ;; Additional secondary IMAP account for Gmail + ;; (add-to-list 'gnus-secondary-select-methods + ;; '(nnimap "Gmail" + ;; (nnimap-address "imap.gmail.com") + ;; (nnimap-server-port 993) + ;; (nnimap-stream ssl) + ;; (nnimap-authinfo-file nil) ; Not using .authinfo for Gmail + ;; (nnir-search-engine imap) + ;; (nnimap-authenticator login) + ;; (nnimap-login "your-gmail-username") ; Replace with your Gmail username + ;; (nnimap-password (password-store-get "email/gmail")))) + + (setq send-mail-function 'smtpmail-send-it + message-send-mail-function 'smtpmail-send-it + smtpmail-default-smtp-server "smtp.fastmail.com" + smtpmail-smtp-server "smtp.fastmail.com" + smtpmail-smtp-service 587 + smtpmail-stream-type 'starttls + smtpmail-smtp-user "ian@keane.sh" + smtpmail-debug-info t) + + ;; You may also want to add a conditional to choose the SMTP server based on the current 'From' address. + + ;; RSS Feeds + ;; (add-to-list 'gnus-secondary-select-methods '(nnrss "")) + + ;; Configure RSS feed subscriptions + ;; (setq gnus-secondary-sources + ;; '((nnrss "http://example.com/rss") ; replace with actual RSS URL + ;; ;; Add more RSS feeds here + ;; )) + + + ;; Use Gnus for composing email + (setq mail-user-agent 'gnus-user-agent) + + ;; Set up HTML email rendering + (setq mm-text-html-renderer 'shr) + + (require 'all-the-icons-gnus) + (all-the-icons-gnus-setup) +#+end_src * Emacs Meta ** Explain-Pause Scrutinize which processes are gumming up emacs