X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/1aa8f3e11e6d83ee4806abaa132ab9466f02ca5f..1d5e6d0340ba258b34b85ccdac4c402ccf4fd51e:/test/mhl/test-mhl-flags diff --git a/test/mhl/test-mhl-flags b/test/mhl/test-mhl-flags index b458a31e..e0117fd2 100755 --- a/test/mhl/test-mhl-flags +++ b/test/mhl/test-mhl-flags @@ -12,7 +12,37 @@ fi . "$MH_OBJ_DIR/test/common.sh" setup_test -mhl="${MH_LIB_DIR}/mhl" +mhl="${MH_LIBEXEC_DIR}/mhl" + +MHLDEBUG=foo check_exit '-eq 1' "$mhl" - +unset MHLDEBUG +check_exit '-eq 1' "$mhl" -xyzzy +check_exit '-eq 0' "$mhl" -help +check_exit '-eq 0' "$mhl" -version +check_exit '-eq 1' "$mhl" -bell -nobell -clear - +check_exit '-eq 1' "$mhl" -folder +check_exit '-eq 1' "$mhl" -folder + - +check_exit '-eq 1' "$mhl" -form +check_exit '-eq 1' "$mhl" -sleep +check_exit '-eq 1' "$mhl" -sleep 42 - +check_exit '-eq 1' "$mhl" -moreproc foo -moreproc +check_exit '-eq 1' "$mhl" -nofmtproc -fmtproc foo -fmtproc +check_exit '-eq 1' "$mhl" -length 42 -length +check_exit '-eq 1' "$mhl" -length 0 +check_exit '-eq 1' "$mhl" -width +check_exit '-eq 1' "$mhl" -digest foo -width 0 +check_exit '-eq 1' "$mhl" -issue 42 -digest +check_exit '-eq 1' "$mhl" -issue +check_exit '-eq 1' "$mhl" -volume 42 -issue 0 +check_exit '-eq 1' "$mhl" -volume +check_exit '-eq 1' "$mhl" -forwall -volume 0 +check_exit '-eq 0' "$mhl" -dashstuffing -nodashstuffing \ + -forwall `mhpath new` <"$expected" <"$MH_TEST_DIR/test.format" <"$actual" @@ -56,7 +86,7 @@ cat >"$expected" <"$MH_TEST_DIR/test.format" <"$actual" @@ -64,4 +94,5 @@ check "$expected" "$actual" rm -f "$MH_TEST_DIR/test.format" + exit $failed