[otrs-cvs] otrs/scripts/test EmailParser.t,1.4,1.5
cvs-log at otrs.org
cvs-log at otrs.org
Thu Apr 12 23:55:26 GMT 2007
Comments:
Update of /home/cvs/otrs/scripts/test
In directory lancelot:/tmp/cvs-serv13879/scripts/test
Modified Files:
EmailParser.t
Log Message:
Added md5 attachment check.
Author: martin
Index: EmailParser.t
===================================================================
RCS file: /home/cvs/otrs/scripts/test/EmailParser.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** EmailParser.t 12 Apr 2007 16:34:37 -0000 1.4
--- EmailParser.t 12 Apr 2007 23:55:21 -0000 1.5
***************
*** 105,108 ****
--- 105,114 ----
);
@Attachments = $Self->{EmailParserObject}->GetAttachments();
+ my $MD5 = md5_hex($Attachments[1]->{Content}) || '';
+ $Self->Is(
+ $MD5,
+ '4e78ae6bffb120669f50bca56965f552',
+ "#3 md5 check",
+ );
if ($Self->{ConfigObject}->Get('DefaultCharset') =~ /utf/i) {
$Self->Is(
***************
*** 166,170 ****
);
@Attachments = $Self->{EmailParserObject}->GetAttachments();
! my $MD5 = md5_hex($Attachments[1]->{Content}) || '';
$Self->Is(
$MD5,
--- 172,176 ----
);
@Attachments = $Self->{EmailParserObject}->GetAttachments();
! $MD5 = md5_hex($Attachments[1]->{Content}) || '';
$Self->Is(
$MD5,
More information about the cvs-log
mailing list