Added ml script to docs/contrib.

[mmh] / test / scan / test-scan

diff --git a/test/scan/test-scan b/test/scan/test-scan
index 8e59b96..fb69e29 100755 (executable)
--- a/test/scan/test-scan
+++ b/test/scan/test-scan
@@ -6,8 +6,8 @@
 ######################################################
 
 if test -z "${MH_OBJ_DIR}"; then
-    srcdir=`dirname $0`/../..
-    MH_OBJ_DIR=`cd $srcdir && pwd`; export MH_OBJ_DIR
+    srcdir=`dirname "$0"`/../..
+    MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
 fi
 
 . "$MH_OBJ_DIR/test/common.sh"
@@ -30,6 +30,30 @@ cat > $expected <<EOF
   10  09/29 Test10             Testing message 10<<This is message number 10 >>
 EOF
 
-scan -width 80 +inbox > $actual || exit 1
+scan +inbox -width 80 > $actual || exit 1
 
-diff -u $expected $actual
+check "$expected" "$actual"
+
+# check highlighting
+cat > $expected <<EOF
+   1  09/29 Test1              Testing message 1<<This is message number 1 >>\e[m
+   2  09/29 Test2              Testing message 2<<This is message number 2 >>\e[m
+   3  09/29 Test3              Testing message 3<<This is message number 3 >>\e[m
+   4  09/29 Test4              Testing message 4<<This is message number 4 >>\e[m
+\e[33m   5+ 09/29 Test5              Testing message 5<<This is message number 5 >>\e[m
+   6  09/29 Test6              Testing message 6<<This is message number 6 >>\e[m
+   7  09/29 Test7              Testing message 7<<This is message number 7 >>\e[m
+   8  09/29 Test8              Testing message 8<<This is message number 8 >>\e[m
+   9  09/29 Test9              Testing message 9<<This is message number 9 >>\e[m
+\e[36m  10  09/29 Test10             Testing message 10<<This is message number 10 >>\e[m
+EOF
+
+printf 'Unseen-Sequence: unseen\n' >> $MH
+mark -sequence cur 5
+mark -sequence unseen 10
+scan -form scan.highlighted -width 80 > $actual || exit 1
+
+check "$expected" "$actual"
+
+
+exit $failed