Added check of a header with name that's 998 bytes long to

[nmh] / test / inc / test-inc-scanout

diff --git a/test/inc/test-inc-scanout b/test/inc/test-inc-scanout
index ec93999ba8558f0c56d15f53c72e2d54c49db25a..adc7867acf69a2058573b8647e37c14d2a2199ad 100755 (executable)
--- a/test/inc/test-inc-scanout
+++ b/test/inc/test-inc-scanout
@@ -17,9 +17,7 @@ setup_test
 
 thisdir="$srcdir/test/inc"
 expected="$MH_TEST_DIR/$$.expected"
 
 thisdir="$srcdir/test/inc"
 expected="$MH_TEST_DIR/$$.expected"

-expected_err="$MH_TEST_DIR/$$.expected_err"

 actual="$MH_TEST_DIR/$$.actual"
 actual="$MH_TEST_DIR/$$.actual"

-actual_err="$MH_TEST_DIR/$$.actual_err"

 
 cat > "${MH_TEST_DIR}/test.mbox" <<EOF
 From nobody@nowhereville Jan 1 1970
 
 cat > "${MH_TEST_DIR}/test.mbox" <<EOF
 From nobody@nowhereville Jan 1 1970


@@ -205,19 +203,16 @@ run_test "scan -width 120 +inbox 11" \
 run_test "scan -width 60 -file $thisdir/lots_of_headers.txt" \
          '   1  01/10 No Such User       all that and nothing to say?'
 
 run_test "scan -width 60 -file $thisdir/lots_of_headers.txt" \
          '   1  01/10 No Such User       all that and nothing to say?'
 

-cat >"$expected" <<EOF
-   1  01/10*
+# check m_getfld() handling of fields with trailing whitespace
+# Even though header field names aren't supposed to have spaces (RFC
+# 28220, m_getfld () trims trailing whitespace from them.
+cat >`mhpath new` <<EOF
+Date : Sun, 18 Dec 2005 00:52:39 +0100
+From   : foo@example.edu
+To: bar@example.edu
+Subject: test

 EOF
 EOF

-cat >"$expected_err" <<EOF
-scan: eof encountered in field "Received"
-??Format error (message -1) in component 1
-EOF
-
-# check m_getfld() handling of empty header field
-scan -width 13 -file "$thisdir"/malformed_message.txt >"$actual" 2>"$actual_err"
-
-check "$expected" "$actual"
-check "$expected_err" "$actual_err"
+run_test 'scan last' '  12  12/18 foo@example.edu    test'

 
 
 exit ${failed:-0}
 
 
 exit ${failed:-0}