/[pkgs]/devel/perl/perl-5.10.0-bz448392.patch
ViewVC logotype

Contents of /devel/perl/perl-5.10.0-bz448392.patch

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.1 - (show annotations) (download) (as text)
Mon May 26 15:09:24 2008 UTC (17 months, 4 weeks ago) by mmaslano
Branch: MAIN
CVS Tags: perl-5_10_0-51_fc11, perl-5_10_0-45_fc10, perl-5_10_0-57_fc11, perl-5_10_0-26_fc10, perl-5_10_0-41_fc10, perl-5_10_0-53_fc11, perl-5_10_0-28_fc10, F-10-split, perl-5_10_0-54_fc11, perl-5_10_0-46_fc10, perl-5_10_0-49_fc10, perl-5_10_0-43_fc10, perl-5_10_0-38_fc10, perl-5_10_0-24_fc10, perl-5_10_0-48_fc10, perl-5_10_0-25_fc10, perl-5_10_0-32_fc10, perl-5_10_0-56_fc11, perl-5_10_0-44_fc10, perl-5_10_0-52_fc11, perl-5_10_0-40_fc10, perl-5_10_0-33_fc10, perl-5_10_0-34_fc10, perl-5_10_0-47_fc10, perl-5_10_0-35_fc10, perl-5_10_0-37_fc10, perl-5_10_0-59_fc11, perl-5_10_0-39_fc10, perl-5_10_0-58_fc11, perl-5_10_0-60_fc11, perl-5_10_0-36_fc10
File MIME type: text/x-patch 
Fix assert.
1 diff -up perl-5.10.0/mg.c.crr perl-5.10.0/mg.c
2 --- perl-5.10.0/mg.c.crr 2007-12-18 11:47:08.000000000 +0100
3 +++ perl-5.10.0/mg.c 2008-05-26 15:28:17.000000000 +0200
4 @@ -1543,7 +1543,7 @@ Perl_magic_setisa(pTHX_ SV *sv, MAGIC *m
5 stash = GvSTASH(
6 SvTYPE(mg->mg_obj) == SVt_PVGV
7 ? (GV*)mg->mg_obj
8 - : (GV*)SvMAGIC(mg->mg_obj)->mg_obj
9 + : (GV*)mg_find(mg->mg_obj, PERL_MAGIC_isa)->mg_obj
10 );
11
12 mro_isa_changed_in(stash);
admin@fedoraproject.org
 ViewVC Help
Powered by ViewVC 1.1.2