[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