Add basic mutt account management

.muttrc now selects an account configuration file to use via the ACCOUNT
environment variable. To accomplish this, mutt sources
.mutt/util/load-account on startup which loads .mutt/accounts/${ACCOUNT}
(or ${ACCOUNT}.asc using GnuPG if encrypted). Each account file may
contain arbitrary mutt configuration.

Per-provider settings are stored in ~/.mutt/providers. Account
configuration files may simply source the relevant provider
configuration they wish to use to load provider-common settings. This
commit adds a provider configuration file for Gmail.

For easy account selection, an executable called ml (shortened "mail")
is added to .dotfiles/bin. ml accepts a full or partial account
configuration file name as the first argument and launches mutt with
that account. For example, to launch mutt with an account located in
~/.mutt/accounts/[email protected], ml may be invoked as one of:

    $ ml [email protected]
    $ ml example

ml exits without launching mutt if no accounts or multiple accounts
match the specified argument.

If ACCOUNT is unset, mutt will start with the default configuration
(opening the current user's local mailbox).

Author: smkent

.dotfiles/bin/ml

@@ -0,0 +1,34 @@
+#!/bin/sh
+
+d=~/.mutt/accounts
+config=$(find "${d}" -type f -iname "*${1}*" -printf "%f\n" 2>/dev/null)
+
+if [ "${#}" -lt 1 ] || [ "${1}" = "-h" ] || [ "${1}" = "--help" ]; then
+    bn=$(basename "${0}")
+    {
+        echo "${bn}: Launch mutt with the specified account configuration file"
+        echo "Usage: ${bn} account"
+        if [ -n "${config}" ]; then
+            echo
+            echo "Available accounts:"
+            echo "${config}" | sort
+        else
+            echo "No accounts are available."
+            echo "Place account configuration files in ${d}."
+        fi
+    } >&2
+    exit 1
+fi
+
+if [ "$(echo "${config}" | wc -l)" -gt 1 ]; then
+    {
+        echo "Multiple accounts found for \"${1}\":"
+        echo "${config}" | sort
+    } >&2
+    exit 1
+elif [ -z "${config}" ]; then
+    echo "No accounts found for \"${1}.\"" >&2
+    exit 1
+fi
+
+ACCOUNT="$(basename "${config}" .asc)" mutt

.gitignore

@@ -26,6 +26,7 @@
 !.mailcap
 !.mutt/
 .mutt/cache
+.mutt/accounts
 !.muttrc
 !.screenrc
 !.tmux.conf

.mutt/providers/gmail.rc

@@ -0,0 +1,35 @@
+# Much of this configuration is from:
+# https://dev.mutt.org/trac/wiki/UseCases/Gmail
+#
+# Before sourcing this file, set the following mutt configuration values:
+# $from, $realname, $imap_pass, and $smtp_pass
+
+set imap_user = $from
+set smtp_url = "smtp://[email protected]:587/"
+
+set folder = "imaps://imap.gmail.com:993"
+set spoolfile = "+INBOX"
+set postponed = "+[Gmail]/Drafts"
+set record = ""
+
+# Check for new mail in subscribed IMAP folders on initial connection
+set imap_check_subscribed
+
+# Use goobook for address book queries
+set query_command = "goobook query %s"
+bind editor <Tab> complete-query
+bind editor ^T complete
+
+set trash = "imaps://imap.gmail.com/[Gmail]/Trash"
+
+# Accept IMAP folder names containing spaces in the line editor
+bind editor <space> noop
+macro index,pager y "<save-message>=[Gmail]/All Mail<enter><enter>" "Archive"
+macro index,pager d "<save-message>=[Gmail]/Trash<enter><enter>" "Trash"
+macro index gi "<change-folder>=INBOX<enter>" "Go to inbox"
+macro index ga "<change-folder>=[Gmail]/All Mail<enter>" "Go to all mail"
+macro index gs "<change-folder>=[Gmail]/Sent Mail<enter>" "Go to sent mail"
+macro index gS "<change-folder>=[Gmail]/Starred<enter>" "Go to starred messages"
+macro index gd "<change-folder>=[Gmail]/Drafts<enter>" "Go to drafts"
+
+# vim: set ft=muttrc fdls=0 fdm=marker:

.mutt/util/load-account

@@ -0,0 +1,11 @@
+#!/bin/sh
+
+set -e
+
+a=~/.mutt/accounts/"${ACCOUNT}"
+
+if [ -r "${a}.asc" ]; then
+    gpg -d "${a}.asc"
+elif [ -f "${a}" ] && [ -r "${a}" ]; then
+    cat "${a}"
+fi

.muttrc

@@ -194,4 +194,10 @@ source ~/.mutt/gpg.rc
 
 # }}}
 
+# Account selection {{{
+
+source "~/.mutt/util/load-account |"
+
+# }}}
+
 # vim: set fdls=0 fdm=marker: