about summary refs log tree commit homepage
path: root/t/msg_iter.t
diff options
context:
space:
mode:
Diffstat (limited to 't/msg_iter.t')
-rw-r--r--t/msg_iter.t18
1 files changed, 18 insertions, 0 deletions
diff --git a/t/msg_iter.t b/t/msg_iter.t
index f6fd3bb0..f9b586f1 100644
--- a/t/msg_iter.t
+++ b/t/msg_iter.t
@@ -40,5 +40,23 @@ use_ok('PublicInbox::MsgIter');
                 'nested part shows up properly');
 }
 
+{
+        my $f = 't/iso-2202-jp.mbox';
+        my $mime = Email::MIME->new(do {
+                open my $fh, '<', $f or die "open($f): $!";
+                local $/;
+                <$fh>;
+        });
+        my $raw = '';
+        msg_iter($mime, sub {
+                my ($part, $level, @ex) = @{$_[0]};
+                my ($s, $err) = msg_part_text($part, 'text/plain');
+                ok(!$err, 'no error');
+                $raw .= $s;
+        });
+        ok(length($raw) > 0, 'got non-empty message');
+        is(index($raw, '$$$'), -1, 'no unescaped $$$');
+}
+
 done_testing();
 1;