X-Git-Url: https://projects.mako.cc/source/muttjump/blobdiff_plain/2a0aaa28a321c25650d5a34f2a8d458617074452..62fc28127af60bc3c76d210b99bc927e131ba1f6:/muttjump diff --git a/muttjump b/muttjump index f377160..8170f4e 100755 --- a/muttjump +++ b/muttjump @@ -58,6 +58,11 @@ function quote () { echo \'${1//\'/\'\\\'\'}\' } +function is_callable () { + read cmd args <<<$1 + type -p $cmd >/dev/null +} + # Check command-line arguments and STDIN if tty -s || [ $# -ne 0 ] ; then cat >&2 </dev/null ; then +if ! is_callable $MUTT ; then die "$MUTT is not in PATH, set MUTT variable" fi @@ -84,12 +89,12 @@ case $MUTTJUMP_MODE in esac # search for Message-ID in STDIN -if type -p $FORMAIL >/dev/null ; then +if is_callable $FORMAIL ; then msgid=$($FORMAIL -c -z -x Message-ID | head -n1) -elif type -p $REFORMAIL >/dev/null ; then +elif is_callable $REFORMAIL ; then msgid=$($REFORMAIL -c -x Message-ID: | head -n1) else - msgid=$(sed -n 's/^Message-ID: \(.*\)/\1/Ip' | head -n1) + msgid=$(sed -n 's/^Message-ID:[ \t]*\(.*\)/\1/Ip' | head -n1) fi if [ -z "$msgid" ] ; then die "could not find Message-ID header in standard input" @@ -128,27 +133,37 @@ if [ -z "$orig_msgfile" -o ! -e "$orig_msgfile" ] ; then fi # get containing maildir of $orig_msgfile -orig_maildir=$(dirname $(dirname "$orig_msgfile")) +orig_maildir=$(dirname "$(dirname "$orig_msgfile")") if [ ! -d "$orig_maildir/cur" ] ; then die "directory $(quote "$orig_maildir") doesn't exist or is no Maildir" fi -jump_cmd="<$MUTTJUMP_MODE>~i '$msgid'" +jump_expr="~i'$msgid'" if [ "$MUTTJUMP_USE_SCREEN" = no ] ; then + jump_cmd="$jump_expr" + if [ "$MUTTJUMP_MODE" = search ] ; then + jump_cmd="$jump_cmdall" + fi + # Close message-stdin and open terminal-stdin instead. # mutt behaves different if STDIN is no terminal # TODO: Find cleaner solution (e.g. mutt command-line argument?) exec 0<&- - term="/dev/$(ps -p$$ --no-heading | awk '{print $2}')" + term="/dev/$(ps -p$$ -otty=)" exec < $term # start mutt, open original folder and jump to the original message - $MUTT -e "push \"$orig_maildir$jump_cmd\"" + $MUTT -f "$orig_maildir" -e "push \"$jump_cmd\"" else + jump_cmd="l$jump_expr " + if [ "$MUTTJUMP_MODE" = search ] ; then + jump_cmd="${jump_cmd}lall " + fi + screen_window_name=$(MUTTJUMP_SCREEN_WINDOW_NAME_MANGLE "$orig_maildir") declare -a screen_opts if [ -n "$MUTTJUMP_SCREEN_SESSION" ] ; then @@ -156,8 +171,8 @@ else screen_opts_str="-S $(quote "$MUTTJUMP_SCREEN_SESSION")" fi - $SCREEN "${screen_opts[@]}" -p "$screen_window_name" -X select . - $SCREEN "${screen_opts[@]}" -p "$screen_window_name" -X stuff ":push \"$jump_cmd\" " + $SCREEN "${screen_opts[@]}" -p "$screen_window_name" -X eval "select '$screen_window_name'" "stuff \"$jump_cmd\"" + if [ $? != 0 ] ; then die "You have to manually start a screen session with: $SCREEN $screen_opts_str -t $(quote "$screen_window_name") $MUTT -f $(quote "$orig_maildir")"