X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=cpan%2FEncode%2FUnicode%2FUnicode.xs;h=d8ef569515d8aac37752b645747955aeb07ed764;hb=b2deda172989adc48a591cc4a4c1a88918c73105;hp=1f041d42403d8d4f23638ecf91f1df7af851f4c5;hpb=b65597cb4d6f7ba547ab80880fc66b31b6f08c15;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/cpan/Encode/Unicode/Unicode.xs b/cpan/Encode/Unicode/Unicode.xs
index 1f041d4..d8ef569 100644
--- a/cpan/Encode/Unicode/Unicode.xs
+++ b/cpan/Encode/Unicode/Unicode.xs
@@ -1,5 +1,5 @@
 /*
- $Id: Unicode.xs,v 2.5 2009/02/01 13:14:41 dankogai Exp $
+ $Id: Unicode.xs,v 2.6 2009/11/16 14:08:13 dankogai Exp dankogai $
  */
 
 #define PERL_NO_GET_CONTEXT
@@ -377,5 +377,7 @@ CODE:
     if (!temp_result)
 	shrink_buffer(result);
 
+    SvSETMAGIC(utf8);
+
     XSRETURN(1);
 }