diff options
| author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-07-12 19:42:48 +0200 |
|---|---|---|
| committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-07-12 19:59:40 +0200 |
| commit | ec9e9e47bbf62fbe5566ef0eb78d114df95630c7 (patch) | |
| tree | baae14da628b98bf6892c54dcb691477d067acda /suweren/home | |
| parent | e8fa675c649f70e95e43a668ad2fac2bc69757c1 (diff) | |
implement IMAP as the primary Gnus group
Diffstat (limited to 'suweren/home')
| -rw-r--r-- | suweren/home/emacs-configuration.el | 17 | ||||
| -rw-r--r-- | suweren/home/emacs-gnus.el | 2 | ||||
| -rw-r--r-- | suweren/home/emacs-init.el | 3 | ||||
| -rw-r--r-- | suweren/home/services.scm | 4 |
4 files changed, 8 insertions, 18 deletions
diff --git a/suweren/home/emacs-configuration.el b/suweren/home/emacs-configuration.el index d810d72..27ef693 100644 --- a/suweren/home/emacs-configuration.el +++ b/suweren/home/emacs-configuration.el @@ -74,23 +74,6 @@ ;; Disable Toolbar (tool-bar-mode -1) -;; GNUS Configuration -;; (setq-default gnus-auto-select-first nil -;; gnus-select-method '(nnnil "") -;; gnus-secondary-select-methods '((nnimap "outlook" -;; (nnimap-address "outlook.office365.com") -;; (nnimap-server-port 993) -;; (nnimap-stream ssl) -;; (nnimap-authinfo-file "~/.authinfo")) -;; (nnimap "home" -;; (nnimap-address "serwer1930490.home.pl") -;; (nnimap-server-port 993) -;; (nnimap-stream ssl) -;; (nnimap-authinfo-file "~/.authinfo"))) -;; nnmail-split-method 'nnmail-split-fancy -;; nnmail-split-fancy '(| "normal")) -;; (add-hook 'gnus-group-mode-hook 'gnus-topic-mode) - ;; ORG-FC Configuration (setq-default org-fc-algorithm 'tn diff --git a/suweren/home/emacs-gnus.el b/suweren/home/emacs-gnus.el new file mode 100644 index 0000000..1df7ec5 --- /dev/null +++ b/suweren/home/emacs-gnus.el @@ -0,0 +1,2 @@ +(setq gnus-select-method + '(nnimap "marekpasnikowski.pl")) diff --git a/suweren/home/emacs-init.el b/suweren/home/emacs-init.el index c9080f0..30cd244 100644 --- a/suweren/home/emacs-init.el +++ b/suweren/home/emacs-init.el @@ -2,4 +2,5 @@ (mapcar (lambda (file-name) (let ((file-path (concat "$XDG_CONFIG_HOME/emacs/" file-name))) (load-file file-path))) - (list "configuration.el")) + (list "configuration.el" + "gnus.el")) diff --git a/suweren/home/services.scm b/suweren/home/services.scm index 0bd92b1..1742b91 100644 --- a/suweren/home/services.scm +++ b/suweren/home/services.scm @@ -14,14 +14,18 @@ (define-public suweren-home-xdg-configuration-files-extension (let* ((emacs-configuration-file (local-file "emacs-configuration.el")) + (emacs-gnus-file (local-file "emacs-gnus.el")) (emacs-init-file (local-file "emacs-init.el")) (emacs-configuration (list "emacs/configuration.el" emacs-configuration-file)) + (emacs-gnus (list "emacs/gnus.el" + emacs-gnus-file)) (emacs-init (list "emacs/init.el" emacs-init-file)) (value (list emacs-configuration + emacs-gnus emacs-init))) (simple-service 'suweren-home-xdg-configuration-files home-xdg-configuration-files-service-type |