From 2e53f03bb03e663298f1f098b47b75c2ce2ece56 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 3 May 2021 11:45:50 -0500
Subject: Add hooks to download and upload gnus data to the cloud

Gnus Cloud ... sort of works?  I'm honestly not sure about it, lol.
---
 gnus.el | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'gnus.el')

diff --git a/gnus.el b/gnus.el
index 846966d..eacce0f 100644
--- a/gnus.el
+++ b/gnus.el
@@ -139,6 +139,10 @@
       smtpmail-smtp-user "acdw@fastmail.com"
       message-kill-buffer-on-exit t)
 
+;;; Hooks
+(add-hook 'gnus-started-hook #'gnus-cloud-download-all-data)
+(add-hook 'gnus-exit-gnus-hook #'gnus-cloud-upload-all-data)
+
 ;;; Packages
 
 ;; searching (?)
-- 
cgit 1.4.1-21-gabe81


From eaf4eb54085fbe5134663e6f2413c700328ae0b3 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 3 May 2021 15:10:45 -0500
Subject: Add Gwene

I still need to import my OPML using one of these:

- https://wpc.io/blog/posts/bulk-import-rss-feeds-to-gnus-via-gwene.html
- http://gwene.org/opml.php

... when I get home.
---
 gnus.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'gnus.el')

diff --git a/gnus.el b/gnus.el
index eacce0f..e3a0f49 100644
--- a/gnus.el
+++ b/gnus.el
@@ -25,7 +25,8 @@
                 (nnimap-server-port 993)
                 (nnimap-stream ssl)
                 (nnir-search-engine imap))
-        (nntp "news.tilde.club")))
+        (nntp "news.tilde.club")
+        (nntp "news.gwene.org")))
 
 ;;; Gnus cloud
 (setq gnus-cloud-method "nnimap:fastmail.com"
-- 
cgit 1.4.1-21-gabe81


From 47868840de23c85d89e171565b89c3c84dca03dd Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 3 May 2021 17:11:59 -0500
Subject: Move hooks to a better spot for Gnus Cloud

---
 gnus.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'gnus.el')

diff --git a/gnus.el b/gnus.el
index e3a0f49..59275fd 100644
--- a/gnus.el
+++ b/gnus.el
@@ -32,6 +32,8 @@
 (setq gnus-cloud-method "nnimap:fastmail.com"
       gnus-cloud-storage-method 'base64 ; Don't always have GPG or gzip
       )
+(add-hook 'gnus-started-hook #'gnus-cloud-download-all-data)
+(add-hook 'gnus-exit-gnus-hook #'gnus-cloud-upload-all-data)
 
 ;;; Gnus subscriptions
 (setq gnus-options-subscribe (rx (or ;; all alternatives go under this
@@ -140,10 +142,6 @@
       smtpmail-smtp-user "acdw@fastmail.com"
       message-kill-buffer-on-exit t)
 
-;;; Hooks
-(add-hook 'gnus-started-hook #'gnus-cloud-download-all-data)
-(add-hook 'gnus-exit-gnus-hook #'gnus-cloud-upload-all-data)
-
 ;;; Packages
 
 ;; searching (?)
-- 
cgit 1.4.1-21-gabe81


From e4439dad96c9425d6c5713c5076d7c1963e47d11 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 3 May 2021 17:12:24 -0500
Subject: Add hook to message mode

---
 gnus.el | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'gnus.el')

diff --git a/gnus.el b/gnus.el
index 59275fd..540fed4 100644
--- a/gnus.el
+++ b/gnus.el
@@ -132,6 +132,11 @@
 (setq mm-discouraged-alternatives '("text/html"
                                     "text/richtext"))
 
+;;; Composing mail
+(hook-defun setup-message-mode message-mode-hook
+  (flyspell-mode +1)
+  (local-set-key (kbd "TAB") #'bbdb-complete-mail))
+
 ;;; Sending mail
 (setq send-mail-function #'smtpmail-send-it
       message-send-mail-function #'smtpmail-send-it
-- 
cgit 1.4.1-21-gabe81


From 30f9b880a58a44976b6f30b871d61dd543e9f0ea Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 3 May 2021 17:12:53 -0500
Subject: Stop asking to exit Gnus

---
 gnus.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'gnus.el')

diff --git a/gnus.el b/gnus.el
index 540fed4..db7b0c9 100644
--- a/gnus.el
+++ b/gnus.el
@@ -86,7 +86,8 @@
       message-signature (or (file-exists-p message-signature-file)
                             "~ acdw")
       gnus-save-newsrc-file nil
-      gnus-read-newsrc-file nil)
+      gnus-read-newsrc-file nil
+      gnus-interactive-exit nil)
 
 ;;; Other parameters
 (setq gnus-parameters
-- 
cgit 1.4.1-21-gabe81