]>
diplodocus.org Git - nmh/blob - test/scan/test-header-parsing
3 # Test short headers and short bodies.
4 # One-character long headers used to sometimes be missed; see commit
5 # 41a82a7ecba04be5b27b3ffc813e2f34d2786a38.
9 if test -z "${MH_OBJ_DIR}"; then
10 srcdir
=`dirname "$0"`/..
/..
11 MH_OBJ_DIR
=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
14 .
"$MH_OBJ_DIR/test/common.sh"
18 mail="$MH_TEST_DIR/$$.mail"
19 expected
="$MH_TEST_DIR/$$.expected"
20 actual
="$MH_TEST_DIR/$$.actual"
21 format
="$MH_TEST_DIR/$$.format"
23 for a
in a
: a
:1 aa
: aa
:1; do
24 for b
in b
: b
:1 bb
: bb
:1; do
25 for c
in c
: c
:1 cc
: cc
:1; do
26 printf '%s\n%s\n%s\n' $a $b $c >"$mail"
27 sed 's/.*://' "$mail" >"$expected"
28 sed 's/:.*/}/; s/^/%{/' "$mail" >"$format"
29 run_prog scan
-form "$format" -file "$mail" >"$actual" ||
31 check
"$expected" "$actual"
32 rm -f "$mail" "$format"