summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--regress/base/Makefile2
-rw-r--r--regress/base/multipart_io.sh22
2 files changed, 19 insertions, 5 deletions
diff --git a/regress/base/Makefile b/regress/base/Makefile
index c9b1b918..689d6941 100644
--- a/regress/base/Makefile
+++ b/regress/base/Makefile
@@ -7,7 +7,7 @@ test:
@ $(PERL) ../base/lock.pl
@ echo "* checksum test"
@ $(PERL) ../base/md5.pl
- @ echo "* multipart operations test"
+ @ echo "* Mail::Message module IO test"
@ sh ../base/multipart_io.sh
@ sh ../base/multipart_maker.sh
diff --git a/regress/base/multipart_io.sh b/regress/base/multipart_io.sh
index 14a05283..7aea3fd6 100644
--- a/regress/base/multipart_io.sh
+++ b/regress/base/multipart_io.sh
@@ -19,14 +19,28 @@ DIFF () {
diff -ub $msg $tmp && echo $file ok || echo $file fail
}
+
+echo "* text operations test"
xdir=$dir/../testmails
-DIFF $xdir/multipart=mixed
-DIFF $xdir/multipart=mixed-preamble
-DIFF $xdir/multipart=mixed-trailor
-xdir=$dir/../errormails
+for x in $xdir/text*
+do
+ env test_mode=1 ../message/basic_io.pl $x
+done
+
+
+echo "* multipart operations test"
+xdir=$dir/../testmails
+
+for x in $xdir/multipart*
+do
+ DIFF $x
+done
+
echo " ++ errormails/ has broken multipart messages ;0"
+xdir=$dir/../errormails
+
# ../errormails has broken multipart messages ;0
grep -i -l multipart $xdir/[a-z]*[a-z0-9] |\
grep -v odn.ne.jp |\