From 7acc66afd78ea08798c7347f36bb7d2270a5ed87 Mon Sep 17 00:00:00 2001
From: Daniel Borchmann <daniel@algebra20.de>
Date: Tue, 14 Nov 2017 16:04:49 +0100
Subject: [PATCH] =?UTF-8?q?[Misc]=20Moving=20mail-related=20customization?=
 =?UTF-8?q?=20to=20gnus=E2=80=99=20configuration=20file?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 gnus    | 29 +++++++++++++++++++++++++++++
 init.el | 27 ---------------------------
 2 files changed, 29 insertions(+), 27 deletions(-)

diff --git a/gnus b/gnus
index f379906..77922d3 100644
--- a/gnus
+++ b/gnus
@@ -13,6 +13,35 @@
 
 ;;; General
 
+;; Customization
+
+(defcustom db/jabber-id ""
+  "Personal XMPP ID."
+  :group 'personal-settings
+  :type 'string)
+
+(defcustom db/smtp-accounts nil
+  "Configuration for sending mail as used by `db/set-smtp-server-from-header’, which see.
+This is a list of lists, where each such list specifies the SMTP
+parameters for one particular email address.  This specification
+consists of the mail address, the address of the mail server, the
+stream type (e.g. `starttls’), the SMTP service port, and the
+SMTP user."
+  :group 'personal-settings
+  :type '(repeat
+          (list
+           (string :tag "EMail Address")
+           (string :tag "SMTP Server Address")
+           (choice :tag "SMTP Stream Type"
+            (const nil) (const starttls) (const plain) (const ssl))
+           (integer :tag "SMTP Service Port")
+           (string :tag "SMTP Login  Name"))))
+
+(defcustom db/personal-gnus-filter-rules nil
+  "Default filter rules as used by Gnus for `db/personal-mail-address’."
+  :group 'personal-settings
+  :type 'sexp)
+
 ;; Requires
 
 (require 'gnus)
diff --git a/init.el b/init.el
index b8368e0..babfc7f 100644
--- a/init.el
+++ b/init.el
@@ -346,33 +346,6 @@ _h_   _l_   _o_k        _y_ank
   :group 'personal-settings
   :type 'string)
 
-(defcustom db/jabber-id ""
-  "Personal XMPP ID."
-  :group 'personal-settings
-  :type 'string)
-
-(defcustom db/smtp-accounts nil
-  "Configuration for sending mail as used by `db/set-smtp-server-from-header’, which see.
-This is a list of lists, where each such list specifies the SMTP
-parameters for one particular email address.  This specification
-consists of the mail address, the address of the mail server, the
-stream type (e.g. `starttls’), the SMTP service port, and the
-SMTP user."
-  :group 'personal-settings
-  :type '(repeat
-          (list
-           (string :tag "EMail Address")
-           (string :tag "SMTP Server Address")
-           (choice :tag "SMTP Stream Type"
-            (const nil) (const starttls) (const plain) (const ssl))
-           (integer :tag "SMTP Service Port")
-           (string :tag "SMTP Login  Name"))))
-
-(defcustom db/personal-gnus-filter-rules nil
-  "Default filter rules as used by Gnus for `db/personal-mail-address’."
-  :group 'personal-settings
-  :type 'sexp)
-
 
 ;; * Builtin Variables