summaryrefslogtreecommitdiff
path: root/guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el
diff options
context:
space:
mode:
Diffstat (limited to 'guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el')
-rw-r--r--guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el65
1 files changed, 0 insertions, 65 deletions
diff --git a/guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el b/guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el
deleted file mode 100644
index 8482ec9..0000000
--- a/guix/kolwynia/home/bdunahu/files/.config/emacs/gnus.el
+++ /dev/null
@@ -1,65 +0,0 @@
-;;; -*- lexical-binding: t; -*-
-;;; Commentary:
-;;; Code:
-
-
-(require 'pgg)
-(require 'gnus)
-(require 'gnus-util)
-
-(keymap-set gnus-article-mode-map "r" #'gnus-summary-very-wide-reply)
-(keymap-set gnus-summary-mode-map "r" #'gnus-summary-very-wide-reply)
-(keymap-set gnus-article-mode-map "R" #'gnus-summary-very-wide-reply-with-original)
-(keymap-set gnus-summary-mode-map "R" #'gnus-summary-very-wide-reply-with-original)
-
-(setopt gnus-dbus-close-on-sleep t
- gnus-interactive-exit nil
-
- gnus-check-new-newsgroups nil
- gnus-large-newsgroup 200
-
- message-kill-buffer-on-exit t
- message-interactive t
-
- message-directory "/home/bdunahu/.ml/"
-
- message-send-mail-function 'message-send-mail-with-sendmail
- message-sendmail-f-is-evil 't
- sendmail-program "/home/bdunahu/.guix-home/profile/bin/msmtp"
- message-sendmail-extra-arguments '("--read-envelope-from"))
-
-(setopt gnus-select-method '(nnnil ""))
-(setopt gnus-secondary-select-methods
- '((nntp "news.gwene.org")
- (nnmaildir "admin"
- (directory "~/.ml/admin"))
- (nnmaildir "personal"
- (directory "~/.ml/personal"))
- (nnmaildir "rss"
- (directory "~/.ml/rss"))
- (nnmaildir "umass"
- (directory "~/.ml/umass"))))
-
-
-(setopt gnus-face-3 'calendar-today
- gnus-face-4 'calendar-weekend-header
- gnus-face-5 'calendar-weekday-header)
-
-(setopt gnus-summary-line-format
- (concat
- "%0{%U%R%z%}"
- "%4{%-11,11&user-date;%}"
- " "
- "%2{%-20,20n%}" ;; name
- " "
- " "
- "%5{%B%}"
- "%s\n"))
-
-(setopt message-from-style 'angles
- mml-secure-openpgp-encrypt-to-self t
- mml-secure-openpgp-sign-with-sender t)
-(add-hook 'gnus-message-setup-hook 'mml-secure-message-sign-pgpmime)
-
-
-;;; gnus.el ends here