Update of /home/users/mhonarc.org/ehood/cvs/mhonarc/mhonarc/MHonArc/lib/MHonArc
In directory denethor.mallorn.com:/tmp/cvs-serv1485
Modified Files:
CharEnt.pm
Log Message:
BUG FIX #11187: Unsure why "U" template to unpack is not sufficient,
but changing it to "U0U*" appears to fix the problem and should work
for 5.6.x and 5.8.x versions of Perl.
Index: CharEnt.pm
===================================================================
RCS file: /home/users/mhonarc.org/ehood/cvs/mhonarc/mhonarc/MHonArc/lib/MHonArc/CharEnt.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -r1.14 -r1.15
*** CharEnt.pm 5 Mar 2003 22:17:15 -0000 1.14
--- CharEnt.pm 3 Dec 2004 20:36:35 -0000 1.15
***************
*** 157,161 ****
$utf8_re
}{
! (($char = unpack('U',$1)) <= 0x7F)
? $HTMLSpecials{$1} || $1
: sprintf('&#x%X;',$char);
--- 157,161 ----
$utf8_re
}{
! (($char = unpack('U0U*',$1)) <= 0x7F)
? $HTMLSpecials{$1} || $1
: sprintf('&#x%X;',$char);
---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-COMMITS