diff options
Diffstat (limited to 'rt/t/crypt/smime/status-string.t')
-rw-r--r-- | rt/t/crypt/smime/status-string.t | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/rt/t/crypt/smime/status-string.t b/rt/t/crypt/smime/status-string.t new file mode 100644 index 000000000..9317229fb --- /dev/null +++ b/rt/t/crypt/smime/status-string.t @@ -0,0 +1,26 @@ +use strict; +use warnings; + +use RT::Test tests => 2; + +require RT::Crypt::SMIME; +note "simple round trip"; +{ + my %data = (Foo => 'bar', Baz => 'zoo'); + is_deeply( + [ RT::Crypt::SMIME->ParseStatus( RT::Crypt::SMIME->FormatStatus( \%data, \%data ) ) ], + [ \%data, \%data ], + ); +} + +note "status appendability"; +{ + my %data = (Foo => 'bar', Baz => 'zoo'); + is_deeply( + [ RT::Crypt::SMIME->ParseStatus( + RT::Crypt::SMIME->FormatStatus( \%data ) + . RT::Crypt::SMIME->FormatStatus( \%data ) + ) ], + [ \%data, \%data ], + ); +} |