X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/d50cd0782e32cf9632e7cf7299960e1f666fdc59..1d5e6d0340ba258b34b85ccdac4c402ccf4fd51e:/test/mhl/test-mhl-flags

diff --git a/test/mhl/test-mhl-flags b/test/mhl/test-mhl-flags
index f1f16cd5..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 </dev/null
+check_exit '-eq 0' "$mhl" -forwall -digest foo \
+    -bell -length 1 -width 1 </dev/null
+check_exit '-eq 0' "$mhl" -forwall -digest foo \
+    -nobell -volume 1 -clear </dev/null
+
 expected="$MH_TEST_DIR/$$.expected"
 actual="$MH_TEST_DIR/$$.actual"