2018-01-23 22:21:47 +00:00
|
|
|
with import <stockholm/lib>;
|
2016-04-19 11:23:38 +00:00
|
|
|
{ pkgs, ... }:
|
|
|
|
|
|
|
|
let
|
|
|
|
|
|
|
|
msmtprc = pkgs.writeText "msmtprc" ''
|
|
|
|
defaults
|
|
|
|
logfile ~/.msmtp.log
|
|
|
|
account prism
|
|
|
|
host prism.r
|
|
|
|
account default: prism
|
|
|
|
'';
|
|
|
|
|
2016-06-22 17:12:34 +00:00
|
|
|
msmtp = pkgs.writeBashBin "msmtp" ''
|
|
|
|
${pkgs.coreutils}/bin/tee >(${pkgs.notmuch}/bin/notmuch insert +sent) | \
|
2016-11-24 23:22:34 +00:00
|
|
|
${pkgs.msmtp}/bin/msmtp -C ${msmtprc} "$@"
|
2016-04-19 11:23:38 +00:00
|
|
|
'';
|
|
|
|
|
2017-08-01 11:47:10 +00:00
|
|
|
mailcap = pkgs.writeText "mailcap" ''
|
|
|
|
text/html; ${pkgs.elinks}/bin/elinks -dump ; copiousoutput;
|
|
|
|
'';
|
|
|
|
|
2018-01-23 22:41:16 +00:00
|
|
|
mailboxes = {
|
2018-02-13 16:28:25 +00:00
|
|
|
wireguard = [ "to:wireguard@lists.zx2c4" ];
|
|
|
|
c-base = [ "to:c-base.org" ];
|
|
|
|
security = [ "to:seclists.org" "to:security" "to:bugtraq" ];
|
|
|
|
nix-devel = [ "to:nix-devel@googlegroups.com" ];
|
|
|
|
shack = [ "to:shackspace.de" ];
|
2018-01-23 22:41:16 +00:00
|
|
|
};
|
2018-01-23 22:21:47 +00:00
|
|
|
|
2016-04-19 11:23:38 +00:00
|
|
|
muttrc = pkgs.writeText "muttrc" ''
|
2016-04-19 14:57:56 +00:00
|
|
|
# gpg
|
2017-02-06 14:09:10 +00:00
|
|
|
source ${pkgs.neomutt}/share/doc/mutt/samples/gpg.rc
|
2016-04-19 14:57:56 +00:00
|
|
|
set pgp_use_gpg_agent = yes
|
|
|
|
set pgp_sign_as = 0x976A7E4D
|
|
|
|
set crypt_autosign = yes
|
|
|
|
set crypt_replyencrypt = yes
|
2016-05-19 22:16:46 +00:00
|
|
|
set crypt_verify_sig = yes
|
|
|
|
set pgp_verify_command = "gpg --no-verbose --batch --output - --verify %s %f"
|
|
|
|
|
|
|
|
macro index \Cv \
|
|
|
|
"<enter-command> set my_crypt_verify_sig=\$crypt_verify_sig<enter> \
|
|
|
|
<enter-command> set crypt_verify_sig=yes<enter> \
|
|
|
|
<display-message><enter-command> set crypt_verify_sig=\$my_crypt_verify_sig<enter>" \
|
|
|
|
'Verify PGP signature and open the message'
|
|
|
|
|
|
|
|
macro pager \Cv \
|
|
|
|
"<exit><enter-command> set my_crypt_verify_sig=\$crypt_verify_sig<enter> \
|
|
|
|
<enter-command> set crypt_verify_sig=yes<enter> \
|
|
|
|
<display-message><enter-command> set crypt_verify_sig=\$my_crypt_verify_sig<enter>" \
|
|
|
|
'Verify PGP signature'
|
|
|
|
|
2017-08-01 11:47:10 +00:00
|
|
|
# read html mails
|
|
|
|
auto_view text/html
|
|
|
|
set mailcap_path = ${mailcap}
|
2016-04-19 14:57:56 +00:00
|
|
|
|
2016-04-19 11:23:38 +00:00
|
|
|
# notmuch
|
|
|
|
set nm_default_uri="notmuch://$HOME/Maildir" # path to the maildir
|
|
|
|
set nm_record = yes
|
|
|
|
set nm_record_tags = "-inbox me archive"
|
|
|
|
set virtual_spoolfile=yes # enable virtual folders
|
2017-07-10 22:07:22 +00:00
|
|
|
|
|
|
|
|
|
|
|
set sendmail="${msmtp}/bin/msmtp" # enables parsing of outgoing mail
|
2016-08-24 06:40:01 +00:00
|
|
|
set from="lassulus@lassul.us"
|
2017-07-10 22:07:22 +00:00
|
|
|
alternates ^.*@lassul\.us$ ^.*@.*\.r$
|
2016-04-19 11:23:38 +00:00
|
|
|
set use_from=yes
|
|
|
|
set envelope_from=yes
|
2017-07-10 22:07:22 +00:00
|
|
|
set reverse_name
|
2016-04-19 11:23:38 +00:00
|
|
|
|
2017-07-04 14:40:07 +00:00
|
|
|
set sort=threads
|
|
|
|
|
2017-07-10 22:08:05 +00:00
|
|
|
set index_format="${pkgs.writeDash "mutt-index" ''
|
|
|
|
# http://www.mutt.org/doc/manual/#formatstrings
|
2017-07-12 18:10:17 +00:00
|
|
|
recipent="$(echo $1 | sed 's/[^,]*<\([^>]*\)[^,]*/ \1/g')"
|
2017-07-10 22:08:05 +00:00
|
|
|
# output to mutt
|
|
|
|
# V
|
2017-08-01 12:15:45 +00:00
|
|
|
echo "%4C %Z %?GI?%GI& ? %[%y-%m-%d] %-20.20a %?M?(%3M)& ? %s %> $recipent %?g?%g?%"
|
2017-07-10 22:08:05 +00:00
|
|
|
# args to mutt-index dash script
|
|
|
|
# V
|
|
|
|
''} %r |"
|
2016-04-19 11:23:38 +00:00
|
|
|
|
2018-02-13 16:28:25 +00:00
|
|
|
virtual-mailboxes "INBOX" "notmuch://?query=tag:inbox ${concatMapStringsSep " " (f: "and NOT ${f}") (flatten (attrValues mailboxes))}"
|
|
|
|
virtual-mailboxes "Unread" "notmuch://?query=tag:unread"
|
|
|
|
${concatMapStringsSep "\n" (i: ''${" "}virtual-mailboxes "${i.name}" "notmuch://?query=${concatMapStringsSep " or " (f: "${f}") i.value}"'') (mapAttrsToList nameValuePair mailboxes)}
|
|
|
|
virtual-mailboxes "BOX" "notmuch://?query=${concatMapStringsSep " and " (f: "NOT ${f}") (flatten (attrValues mailboxes))}"
|
|
|
|
virtual-mailboxes "TODO" "notmuch://?query=tag:TODO"
|
|
|
|
virtual-mailboxes "Starred" "notmuch://?query=tag:*"
|
|
|
|
virtual-mailboxes "Archive" "notmuch://?query=tag:archive"
|
|
|
|
virtual-mailboxes "Sent" "notmuch://?query=tag:sent"
|
|
|
|
virtual-mailboxes "Junk" "notmuch://?query=tag:junk"
|
|
|
|
virtual-mailboxes "All" "notmuch://?query=*"
|
2016-04-19 11:23:38 +00:00
|
|
|
|
|
|
|
tag-transforms "junk" "k" \
|
|
|
|
"unread" "u" \
|
|
|
|
"replied" "↻" \
|
|
|
|
"TODO" "T" \
|
|
|
|
|
|
|
|
# notmuch bindings
|
|
|
|
macro index \\\\ "<vfolder-from-query>" # looks up a hand made query
|
|
|
|
macro index + "<modify-labels>+*\n<sync-mailbox>" # tag as starred
|
|
|
|
macro index - "<modify-labels>-*\n<sync-mailbox>" # tag as unstarred
|
|
|
|
|
|
|
|
|
|
|
|
#killed
|
|
|
|
bind index d noop
|
|
|
|
bind pager d noop
|
|
|
|
|
2017-03-14 10:17:57 +00:00
|
|
|
bind index S noop
|
|
|
|
bind index s noop
|
2016-04-19 11:23:38 +00:00
|
|
|
bind pager S noop
|
2017-03-14 10:17:57 +00:00
|
|
|
bind pager s noop
|
2016-04-19 11:23:38 +00:00
|
|
|
macro index S "<modify-labels-then-hide>-inbox -unread +junk\n" # tag as Junk mail
|
2017-03-14 10:17:57 +00:00
|
|
|
macro index s "<modify-labels>-junk\n" # tag as Junk mail
|
2016-04-19 11:23:38 +00:00
|
|
|
macro pager S "<modify-labels-then-hide>-inbox -unread +junk\n" # tag as Junk mail
|
2017-03-14 10:17:57 +00:00
|
|
|
macro pager s "<modify-labels>-junk\n" # tag as Junk mail
|
|
|
|
|
|
|
|
|
|
|
|
bind index A noop
|
|
|
|
bind index a noop
|
|
|
|
bind pager A noop
|
|
|
|
bind pager a noop
|
|
|
|
macro index A "<modify-labels>+archive -unread -inbox\n" # tag as Archived
|
|
|
|
macro index a "<modify-labels>-archive\n" # tag as Archived
|
|
|
|
macro pager A "<modify-labels>+archive -unread -inbox\n" # tag as Archived
|
|
|
|
macro pager a "<modify-labels>-archive\n" # tag as Archived
|
|
|
|
|
2016-04-19 11:23:38 +00:00
|
|
|
|
|
|
|
bind index t noop
|
|
|
|
bind pager t noop
|
2017-08-25 21:47:25 +00:00
|
|
|
macro index t "<modify-labels>" # tag as Archived
|
2016-04-19 11:23:38 +00:00
|
|
|
|
2017-08-01 16:06:13 +00:00
|
|
|
# top index bar in email view
|
|
|
|
set pager_index_lines=7
|
2016-04-19 11:23:38 +00:00
|
|
|
|
|
|
|
# sidebar
|
|
|
|
set sidebar_width = 20
|
|
|
|
set sidebar_visible = yes # set to "no" to disable sidebar view at startup
|
|
|
|
color sidebar_new yellow default
|
|
|
|
# sidebar bindings
|
|
|
|
bind index <left> sidebar-prev # got to previous folder in sidebar
|
|
|
|
bind index <right> sidebar-next # got to next folder in sidebar
|
|
|
|
bind index <space> sidebar-open # open selected folder from sidebar
|
|
|
|
# sidebar toggle
|
|
|
|
macro index ,@) "<enter-command> set sidebar_visible=no; macro index ~ ,@( 'Toggle sidebar'<Enter>"
|
|
|
|
macro index ,@( "<enter-command> set sidebar_visible=yes; macro index ~ ,@) 'Toggle sidebar'<Enter>"
|
|
|
|
macro index ~ ,@( 'Toggle sidebar' # toggle the sidebar
|
|
|
|
'';
|
|
|
|
|
2017-06-20 17:30:14 +00:00
|
|
|
mutt = pkgs.symlinkJoin {
|
|
|
|
name = "mutt";
|
|
|
|
paths = [
|
|
|
|
(pkgs.writeDashBin "mutt" ''
|
|
|
|
exec ${pkgs.neomutt}/bin/mutt -F ${muttrc} $@
|
|
|
|
'')
|
2017-06-24 14:40:49 +00:00
|
|
|
pkgs.neomutt
|
2017-06-20 17:30:14 +00:00
|
|
|
];
|
|
|
|
};
|
2016-04-19 11:23:38 +00:00
|
|
|
|
|
|
|
in {
|
|
|
|
environment.systemPackages = [
|
|
|
|
msmtp
|
|
|
|
mutt
|
|
|
|
pkgs.much
|
|
|
|
pkgs.notmuch
|
|
|
|
];
|
|
|
|
}
|