[popfile-commit] engine/UI HTML.pm,1.311.4.13,1.311.4.14

[naoki i. <am...@us...>]

Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24469/UI

Modified Files:
      Tag: b0_22_2
	HTML.pm 
Log Message:
Fixed a bug that causes segmentation faults when displaying messages which have very long To, Cc or From headers in the POPFile UI.

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.311.4.13
retrieving revision 1.311.4.14
diff -C2 -d -r1.311.4.13 -r1.311.4.14
*** HTML.pm	18 Dec 2007 12:51:19 -0000	1.311.4.13
--- HTML.pm	29 Jan 2008 15:02:30 -0000	1.311.4.14
***************
*** 2466,2470 ****
                  # Remove wrong characters as euc-jp.
                  for my $i (1..4) {
!                     $$row[$i] =~ s/\G((?:$euc_jp)*)([\x80-\xFF](?=(?:$euc_jp)*))?/$1/og;
                  }
              }
--- 2466,2474 ----
                  # Remove wrong characters as euc-jp.
                  for my $i (1..4) {
!                     my $result = '';
!                     while ( $$row[$i] =~ /((?:$euc_jp){1,300})/og ) {
!                         $result .= $1;
!                     }
!                     $$row[$i] = $result;
                  }
              }