Author: lkundrak
Update of /cvs/pkgs/rpms/perl-Text-CSV_XS/F-9
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv1356
Modified Files:
perl-Text-CSV_XS.spec
Added Files:
perl-Text-CSV_XS-0.30-svupgrade.patch
Log Message:
* Tue Jul 08 2008 Lubomir Rintel <lkundrak@xxxxx> - 0.30-6
- Actually solving the issue mentioned in previous change
perl-Text-CSV_XS-0.30-svupgrade.patch:
--- NEW FILE perl-Text-CSV_XS-0.30-svupgrade.patch ---
Under some circumstances, newSVpv() returns SV of higher type than
SVt_PVIV, such as SVt_PVMG.
Lubomir Rintel <lkundrak@xxxxx>
diff -urp Text-CSV_XS-0.52.orig/CSV_XS.xs Text-CSV_XS-0.52/CSV_XS.xs
--- Text-CSV_XS-0.52.orig/CSV_XS.xs 2008-06-17 12:20:00.000000000 +0200
+++ Text-CSV_XS-0.52/CSV_XS.xs 2008-07-08 14:42:33.000000000 +0200
@@ -181,7 +181,7 @@ static SV *SetDiag (csv_t *csv, int xse)
while (xs_errors[i].xs_errno && xs_errors[i].xs_errno != xse) i++;
if ((err = newSVpv (xs_errors[i].xs_errstr, 0))) {
- sv_upgrade (err, SVt_PVIV);
+ SvUPGRADE (err, SVt_PVIV);
SvIV_set (err, xse);
SvIOK_on (err);
hv_store (csv->self, "_ERROR_DIAG", 11, err, 0);
Index: perl-Text-CSV_XS.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl-Text-CSV_XS/F-9/perl-Text-CSV_XS.spec,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -r1.12 -r1.13
--- perl-Text-CSV_XS.spec 3 Mar 2008 20:19:20 -0000 1.12
+++ perl-Text-CSV_XS.spec 8 Jul 2008 15:22:19 -0000 1.13
@@ -1,12 +1,13 @@
Name: perl-Text-CSV_XS
Version: 0.30
-Release: 5%{?dist}
+Release: 6%{?dist}
Summary: Comma-separated values manipulation routines
Group: Development/Libraries
License: GPL+ or Artistic
URL: http://search.cpan.org/dist/Text-CSV_XS/
Source0: http://www.cpan.org/authors/id/H/HM/HMBRAND/Text-CSV_XS-%{version}.tar.gz
+Patch0: perl-Text-CSV_XS-0.30-svupgrade.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
BuildRequires: perl(Test::Pod)
@@ -21,6 +22,7 @@
%prep
%setup -q -n Text-CSV_XS-%{version}
+%patch0 -p1 -b .svupgrade
chmod -c a-x examples/*
@@ -55,6 +57,9 @@
%changelog
+* Tue Jul 08 2008 Lubomir Rintel <lkundrak@xxxxx> - 0.30-6
+- Actually solving the issue mentioned in previous change
+
* Wed Feb 27 2008 Tom "spot" Callaway <tcallawa@xxxxxxxxxx> - 0.30-5
- Rebuild for perl 5.10 (again)
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
Fedora-perl-devel-list mailing list
Fedora-perl-devel-list@xxxxxxxxxx
https://www.redhat.com/mailman/listinfo/fedora-perl-devel-list
