diplodocus.org Git - nmh/blob - test/scan/test-scan

   1 #!/bin/sh
   2 ######################################################
   3 #
   4 # Test a simple scan.
   5 #
   6 ######################################################
   7
   8 if test -z "${MH_OBJ_DIR}"; then
   9     srcdir=`dirname "$0"`/../..
  10     MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
  11 fi
  12
  13 . "$MH_OBJ_DIR/test/common.sh"
  14
  15 setup_test
  16
  17 expected=$MH_TEST_DIR/$$.expected
  18 actual=$MH_TEST_DIR/$$.actual
  19
  20 cat > $expected <<EOF
  21    1  09/29 Test1              Testing message 1<<This is message number 1 >>
  22    2  09/29 Test2              Testing message 2<<This is message number 2 >>
  23    3  09/29 Test3              Testing message 3<<This is message number 3 >>
  24    4  09/29 Test4              Testing message 4<<This is message number 4 >>
  25    5  09/29 Test5              Testing message 5<<This is message number 5 >>
  26    6  09/29 Test6              Testing message 6<<This is message number 6 >>
  27    7  09/29 Test7              Testing message 7<<This is message number 7 >>
  28    8  09/29 Test8              Testing message 8<<This is message number 8 >>
  29    9  09/29 Test9              Testing message 9<<This is message number 9 >>
  30   10  09/29 Test10             Testing message 10<<This is message number 10 >>
  31 EOF
  32
  33 scan +inbox -width 80 > $actual || exit 1
  34
  35 check "$expected" "$actual"
  36
  37 # check highlighting
  38 cat > $expected <<EOF
  39    1  09/29 Test1              Testing message 1<<This is message number 1 >>\e[m
  40    2  09/29 Test2              Testing message 2<<This is message number 2 >>\e[m
  41    3  09/29 Test3              Testing message 3<<This is message number 3 >>\e[m
  42    4  09/29 Test4              Testing message 4<<This is message number 4 >>\e[m
  43 \e[33;40m   5+ 09/29 Test5              Testing message 5<<This is message number 5 >>\e[m
  44    6  09/29 Test6              Testing message 6<<This is message number 6 >>\e[m
  45    7  09/29 Test7              Testing message 7<<This is message number 7 >>\e[m
  46    8  09/29 Test8              Testing message 8<<This is message number 8 >>\e[m
  47    9  09/29 Test9              Testing message 9<<This is message number 9 >>\e[m
  48 \e[36;40m  10  09/29 Test10             Testing message 10<<This is message number 10 >>\e[m
  49 EOF
  50
  51 printf 'Unseen-Sequence: unseen\n' >> $MH
  52 mark -sequence cur 5
  53 mark -sequence unseen 10
  54 scan -form scan.highlighted -width 80 > $actual || exit 1
  55
  56 check "$expected" "$actual"
  57
  58
  59 exit $failed