4 use RT::Test tests => 2;
6 require RT::Crypt::SMIME;
7 note "simple round trip";
9 my %data = (Foo => 'bar', Baz => 'zoo');
11 [ RT::Crypt::SMIME->ParseStatus( RT::Crypt::SMIME->FormatStatus( \%data, \%data ) ) ],
16 note "status appendability";
18 my %data = (Foo => 'bar', Baz => 'zoo');
20 [ RT::Crypt::SMIME->ParseStatus(
21 RT::Crypt::SMIME->FormatStatus( \%data )
22 . RT::Crypt::SMIME->FormatStatus( \%data )