X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/9383ac2311caa190a93fd6694c6c82390cabf044..403805faa7a8564c103801891b5abf33974767ad:/test/mhpath/test-mhpath?ds=inline diff --git a/test/mhpath/test-mhpath b/test/mhpath/test-mhpath index d07e4148..eebcc3c2 100755 --- a/test/mhpath/test-mhpath +++ b/test/mhpath/test-mhpath @@ -16,11 +16,14 @@ fi setup_test +check_exit '-eq 1' mhpath - + expected=$MH_TEST_DIR/$$.expected actual=$MH_TEST_DIR/$$.actual # check -help +start_test "-help" cat > $expected <"$actual" 2>&1 +run_prog mhpath -help 2>&1 | sed '/^$/,$d' >"$actual" check "$expected" "$actual" # check -version +start_test "-version" case `mhpath -v` in mhpath\ --*) ;; * ) echo "$0: mhpath -v generated unexpected output" 1>&2 @@ -40,16 +44,20 @@ case `mhpath -v` in esac # check + +start_test "+" run_test "mhpath +" "$MH_TEST_DIR/Mail" # check with no options +start_test "with no options" folder -fast +inbox > /dev/null run_test "mhpath" "$MH_TEST_DIR/Mail/inbox" # check +inbox +start_test "+inbox" run_test "mhpath +inbox" "$MH_TEST_DIR/Mail/inbox" # check all +start_test "all" cat > $expected < $actual 2>&1 check $expected $actual # check message number greater than highest +start_test "message number greater than highest" run_test "mhpath 11" "mhpath: message 11 out of range 1-10" run_test "mhpath 10 11" "mhpath: message 11 out of range 1-10" # check range with message number greater than highest +start_test "range with message number greater than highest" cat > $expected < $actual 2>&1 check $expected $actual # check new +start_test "new" run_test "mhpath new" "$MH_TEST_DIR/Mail/inbox/11" # check multiple msgs, including new +start_test "multiple msgs, including new" cat > $expected < $actual 2>&1 check $expected $actual # check invalid message list using names +start_test "invalid message list using names" run_test "mhpath last-new" "mhpath: bad message list last-new" # check cur +start_test "cur" folder +inbox 5 > /dev/null run_test "mhpath cur" "$MH_TEST_DIR/Mail/inbox/5" # check prev +start_test "prev" run_test "mhpath prev" "$MH_TEST_DIR/Mail/inbox/4" # check next +start_test "next" run_test "mhpath next" "$MH_TEST_DIR/Mail/inbox/6" # check invalid message list using numbers +start_test "invalid message list using numbers" rmm 1-2 run_test "mhpath 1-2" "mhpath: no messages in range 1-2" # check ignoring of out-of-range message numbers in ranges +start_test "ignoring of out-of-range message numbers in ranges" run_test "mhpath 1-3" "$MH_TEST_DIR/Mail/inbox/3" run_test "mhpath first-3" "$MH_TEST_DIR/Mail/inbox/3" run_test "mhpath 10-11" "$MH_TEST_DIR/Mail/inbox/10" run_test "mhpath last-11" "$MH_TEST_DIR/Mail/inbox/10" # check reference to existing messages +start_test "reference to existing messages" cat > $expected < $actual 2>&1 check $expected $actual -# check reference to non-existant messages +# check reference to non-existent messages +start_test "reference to non-existent messages" cat > $expected < $actual 2>&1 check $expected $actual +finish_test exit $failed