notmuch-emacs-mua: add --hello parameter

If the --hello parameter is given, display the notmuch hello buffer
instead of the message composition buffer if no message composition
parameters are given.

Signed-off-by: Jani Nikula <jani@nikula.org>
This commit is contained in:
Jani Nikula 2016-11-21 23:13:36 +02:00 committed by David Bremner
parent 04174cdfad
commit a5df39c276
2 changed files with 11 additions and 1 deletions

View file

@ -33,6 +33,10 @@ Supported options for **emacs-mua** include
``-i, --body=``\ <file>
Specify a file to include into the body of the message.
``--hello``
Go to the Notmuch hello screen instead of the message composition
window if no message composition parameters are given.
``--no-window-system``
Even if a window system is available, use the current terminal.

View file

@ -40,6 +40,7 @@ AUTO_DAEMON=
CREATE_FRAME=
ELISP=
MAILTO=
HELLO=
# Short options compatible with mutt(1).
while getopts :s:c:b:i:h opt; do
@ -63,7 +64,7 @@ while getopts :s:c:b:i:h opt; do
opt=${opt%%=*}
;;
# Long options without arguments.
--help|--print|--no-window-system|--client|--auto-daemon|--create-frame)
--help|--print|--no-window-system|--client|--auto-daemon|--create-frame|--hello)
;;
*)
echo "$0: unknown long option ${opt}, or argument mismatch." >&2
@ -112,6 +113,9 @@ while getopts :s:c:b:i:h opt; do
--create-frame)
CREATE_FRAME="-c"
;;
--hello)
HELLO=1
;;
*)
# We should never end up here.
echo "$0: internal error (option ${opt})." >&2
@ -146,6 +150,8 @@ if [ -n "${MAILTO}" ]; then
exit 1
fi
ELISP="(browse-url-mail \"${MAILTO}\")"
elif [ -z "${ELISP}" -a -n "${HELLO}" ]; then
ELISP="(notmuch)"
else
ELISP="(notmuch-mua-new-mail) ${ELISP}"
fi