whatnow2: remove get_attachmentheader()
[mmh] / uip / whatnow2.sh
index a4be1a9..2040725 100755 (executable)
@@ -19,7 +19,7 @@ printhelp()
 
 version()
 {
-       if [ $# -eq 0 ]
+       if [ $1 -eq 0 ]
        then
                echo "$0 has no own version number, thus this instead:"
                folder -Version
@@ -38,7 +38,7 @@ usage()
                exit 0
        fi
        printhelp 1>&2
-       exit $1
+       exit 1
 }
 
 get_editor()
@@ -61,21 +61,6 @@ get_editor()
                return
        fi
        mheditor=`mhparam 'Editor'`
-       if [ -n "$mheditor" ]
-       then
-               return
-       fi
-       if [ -n "$VISUAL" ]
-       then
-               mheditor=$VISUAL
-               return
-       fi
-       if [ -n "$EDITOR" ]
-       then
-               mheditor=$EDITOR
-               return
-       fi
-       mheditor=vi
 }
 
 get_showproc()
@@ -90,12 +75,7 @@ get_realpath()
        filename=`basename "$1"`
        cd $reldir
        echo "$PWD/$filename"
-       cd -
-}
-
-get_attachmentheader()
-{
-       header=`mhparam 'Attachment-Header'`
+       cd $OLDPWD
 }
 
 set_lasteditor()
@@ -163,7 +143,7 @@ list()
        exec $mhshowproc -file $mhdraft
 }
 
-send()
+sendfunktion()
 {
        export mhaltmsg=`anno -list -component 'mhaltmsg' $mhmetafile`
        export mhdist=`anno -list -component 'mhdist' $mhmetafile`
@@ -171,19 +151,22 @@ send()
        export mhfolder=`anno -list -component 'mhfolder' $mhmetafile`
        export mhmessages=`anno -list -component 'mhmessages' $mhmetafile`
        export mhannotate=`anno -list -component 'mhannotate' $mhmetafile`
+       send "$@" $mhdraft || exit $?
        rm -f $mhmetafile
-       exec send "$@" $mhdraft
+       exit 0
 }
 
 delete()
 {
-       rmm +draft c
+       folder -push $draftfolder >/dev/null 2>&1
+       rmm $draftfolder c
+       folder -pop >/dev/null 2>&1
        rm $mhmetafile
 }
 
 attach()
 {
-       get_attachmentheader
+       header=`mhparam 'Attachment-Header'`
        while [ -n "$1" ]
        do
                if [ ! -f "$1" ]
@@ -203,13 +186,13 @@ attach()
 
 alist()
 {
-       get_attachmentheader
+       header=`mhparam 'Attachment-Header'`
        anno -list -number -component $header $mhdraft
 }
 
 detach()
 {
-       get_attachmentheader
+       header=`mhparam 'Attachment-Header'`
        while [ -n "$1" ]
        do
                anno -delete -component $header -number "$1" $mhdraft
@@ -226,7 +209,7 @@ display()
 {
        mhaltmsg=`anno -list -component 'mhaltmsg' $mhmetafile`
        get_showproc
-       if [ -n "$mhaltmsg" ]
+       if [ -z "$mhaltmsg" ]
        then
                echo "no altmsg" 1>&2
                exit 1
@@ -243,11 +226,8 @@ fi
 command=$1
 shift
 
-draftfolder=`mhparam Draft-Folder`
-if [ -z "$dratffolder" ]
-then
-    draftfolder="+drafts"
-fi
+draftfolder=`mhparam draftfolder`
+
 mhdraft=`mhpath $draftfolder c 2>/dev/null`
 if [ -z "$mhdraft" ]
 then
@@ -259,7 +239,7 @@ then
                version $#
                ;;
        *)
-               echo "no current message in $draftsfolder" 1>&2
+               echo "no current message in $draftfolder" 1>&2
                usage 1
                ;;
        esac
@@ -269,44 +249,47 @@ touch $mhmetafile
 
 
 case $command in
-e*)
+e|ed|edi|edit)
        edit "$@"
        ;;
-l*)
+l|li|lis|list)
        [ $# -eq 0 ] || usage 1
        list
        ;;
-s*)
-       send "$@"
+s|se|sen|send)
+       sendfunktion "$@"
        ;;
-del*)
+del|dele|delet|delete)
        [ $# -eq 0 ] || usage 1
        delete
        ;;
-di*)
+di|dis|disp|displ|displa|display)
        [ $# -eq 0 ] || usage 1
        display
        ;;
-at*)
+at|att|atta|attac|attach)
        attach "$@"
        ;;
-al*)
+al|ali|alis|alist)
        [ $# -eq 0 ] || usage 1
        alist
        ;;
-det*)
+det|deta|detac|detach)
        detach "$@"
        ;;
-r*)
-       refile -nolink -file $mhdraft "$@"
+r|re|ref|refi|refil|refile)
+       refile -file $mhdraft "$@"
        ;;
-w*)
+w|wh|who|whom)
        whom "$@" $mhdraft
        ;;
--h*)
+-h|-he|-hel|-help)
        usage $#
        ;;
--V*)
+-V|-Ve|-Ver|-Vers|-Versi|-Versio|-Version)
        version $#
        ;;
+*)
+       usage 1
+       ;;
 esac