[popfile-commit] engine/UI HTML.pm,1.211,1.212

[<jgr...@us...>]

Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv5117/UI

Modified Files:
	HTML.pm 
Log Message:
Merge patches for Korean and Japanese support

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.211
retrieving revision 1.212
diff -C2 -d -r1.211 -r1.212
*** HTML.pm	9 Oct 2003 18:32:51 -0000	1.211
--- HTML.pm	10 Oct 2003 14:59:32 -0000	1.212
***************
*** 2724,2728 ****
          # Do not truncate at 39 if the last char is the first byte of DBCS char(pair of two bytes).
          # Truncate it 1 byte shorter.
!         if ( $self->config_( 'language' ) eq 'Korean' ) {
              $short_subject = $1;
              $short_subject =~ s/(([\x80-\xff].)*)[\x80-\xff]?$/$1/;
--- 2724,2728 ----
          # Do not truncate at 39 if the last char is the first byte of DBCS char(pair of two bytes).
          # Truncate it 1 byte shorter.
!         if (( $self->config_( 'language' ) eq 'Korean' ) || ( $self->config_( 'language' ) eq 'Nihongo' )) {
              $short_subject = $1;
              $short_subject =~ s/(([\x80-\xff].)*)[\x80-\xff]?$/$1/;