develooper Front page | perl.perl5.porters | Postings from September 2000

fix(?) for 20000901.097

Thread Next
From:
Marc Lehmann
Date:
September 1, 2000 20:40
Subject:
fix(?) for 20000901.097
Message ID:
20000902054050.A672@cerebro.laendle
After sending the bugreport it occured to me that I could look at
pp_concat again. The patch below fixes the problem for me, but is
certainly incorrect ;)

--- pp_hot.c~	Sat Sep  2 05:35:46 2000
+++ pp_hot.c	Sat Sep  2 05:37:26 2000
@@ -191,6 +191,7 @@
             SvCUR_set(TARG, targlen);
             *SvEND(TARG) = '\0';
             SvUTF8_on(TARG);
+            SvPOK_only_UTF8(TARG);
             SETs(TARG);
 	    Safefree(olds);
             RETURN;

-- 
      -----==-                                             |
      ----==-- _                                           |
      ---==---(_)__  __ ____  __       Marc Lehmann      +--
      --==---/ / _ \/ // /\ \/ /       pcg@opengroup.org |e|
      -=====/_/_//_/\_,_/ /_/\_\       XX11-RIPE         --+
    The choice of a GNU generation                       |
                                                         |

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About