X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/7797550a7e1332dbcdadda18b38e5f5330e6dd01..86d3f54edebc4ed9f923b6b8ef175aebdc60989b:/test/mhlist/test-mhlist diff --git a/test/mhlist/test-mhlist b/test/mhlist/test-mhlist index cb793670..b1d59d10 100755 --- a/test/mhlist/test-mhlist +++ b/test/mhlist/test-mhlist @@ -172,6 +172,13 @@ run_test 'mhlist last -part 2 -noheader -check -nocheck' \ 1 multipart/related 180 2 text/plain 36' +# +# Set the cur sequence to 1 to test default behavior of changecur after +# this test. +# + +mark 1 -sequence cur -add -zero + # check -verbose run_test 'mhlist 11 -verbose -noheader' \ ' 11 multipart/mixed 936 @@ -189,5 +196,172 @@ run_test 'mhlist 11 -verbose -noheader' \ 4 text/plain 36 charset="iso-8859-1"' +# +# Check default changecur behavior +# + +run_test 'mark -sequence cur -list' 'cur: 11' + +# +# Now test -nochangecur +# + +mhlist -nochangecur 1 >/dev/null + +run_test 'mark -sequence cur -list' 'cur: 11' + +# check MIME parser and m_getfld +cat > $expected < $msgfile < $actual 2>&1 +check $expected $actual + exit $failed