SOURCES: perl-Template-Toolkit-stashXS.patch - switch cosmetics, c...

[radek]

Author: radek                        Date: Sun Feb 17 15:33:46 2008 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- switch cosmetics, commented

---- Files affected:
SOURCES:
   perl-Template-Toolkit-stashXS.patch (1.1 -> 1.2) 

---- Diffs:

================================================================
Index: SOURCES/perl-Template-Toolkit-stashXS.patch
diff -u SOURCES/perl-Template-Toolkit-stashXS.patch:1.1 SOURCES/perl-Template-Toolkit-stashXS.patch:1.2
--- SOURCES/perl-Template-Toolkit-stashXS.patch:1.1	Sun Feb 17 14:00:38 2008
+++ SOURCES/perl-Template-Toolkit-stashXS.patch	Sun Feb 17 16:33:41 2008
@@ -1,3 +1,12 @@
+http://www.nntp.perl.org/group/perl.perl5.porters/2006/01/msg108750.html
+
+The following comes from http://rt.cpan.org/Public/Bug/Display.html?id=22506
+
+Still segfaults in assign() on t/tiedhash.t -- SvRV(root) starts returning
+null after a call to sv_isobject(root); this doesn't seem right and the code
+later doesn't expect it.
+
+
 On Mon Oct 23 11:25:30 2006, SMPETERS wrote:
 > A missing pair of parens causes Template-Toolkit 2.15 to fail to compile
 > with bleadperl.  The following patch fixes the problem.
@@ -8,6 +17,15 @@
 
 --- xs/Stash.xs.old     2007-01-09 20:27:49.000000000 -0600
 +++ xs/Stash.xs 2007-01-09 22:06:30.000000000 -0600
+@@ -499,7 +499,7 @@
+         }
+         
+         /* drop-through if not an object or method not found  */
+-        switch SvTYPE(SvRV(root)) {
++        switch (SvTYPE(SvRV(root))) {
+             
+         case SVt_PVHV:				    /* HASH */
+             roothv = (HV *) SvRV(root);
 @@ -991,7 +991,7 @@
      STRLEN jlen;
      char *joint;
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/SOURCES/perl-Template-Toolkit-stashXS.patch?r1=1.1&r2=1.2&f=u