X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/c703902741e0f7ce55f87e48ef0d00901195f1bc..1a2ef2eed6ab723cbf2280c01cb6e1a0500d4001:/test/scan/test-scan

diff --git a/test/scan/test-scan b/test/scan/test-scan
index 632c54ba..dc0e2250 100755
--- a/test/scan/test-scan
+++ b/test/scan/test-scan
@@ -14,6 +14,8 @@ fi
 
 setup_test
 
+check_exit '-eq 1' scan -
+
 expected="$MH_TEST_DIR/$$.expected"
 actual="$MH_TEST_DIR/$$.actual"
 
@@ -30,7 +32,7 @@ cat >"$expected" <<EOF
   10  09/29 Test10             Testing message 10<<This is message number 10 >>
 EOF
 
-scan +inbox -width 80 >"$actual" || exit 1
+run_prog scan +inbox -width 80 >"$actual" || exit 1
 check "$expected" "$actual"
 
 # check highlighting
@@ -50,7 +52,7 @@ EOF
 printf 'Unseen-Sequence: unseen\n' >> $MH
 mark -sequence cur 5
 mark -sequence unseen 10
-scan -form scan.highlighted -width 80 >"$actual" || exit 1
+run_prog scan -form scan.highlighted -width 80 >"$actual" || exit 1
 check "$expected" "$actual"