[perl-BZ-Client/f17] Include patch to handle bugzilla dates (#927999)

[Emmanuel Seyman]

commit 2e5917944fa71b3603906da17994d78868043717
Author: Emmanuel Seyman <emmanuel at seyman.fr>
Date:   Mon Apr 1 16:16:22 2013 +0200

    Include patch to handle bugzilla dates (#927999)

 perl-BZ-Client-bugzilla-dates.patch |   15 +++++++++++++++
 perl-BZ-Client.spec                 |    8 +++++++-
 2 files changed, 22 insertions(+), 1 deletions(-)
---
diff --git a/perl-BZ-Client-bugzilla-dates.patch b/perl-BZ-Client-bugzilla-dates.patch
new file mode 100644
index 0000000..f8c6fe1
--- /dev/null
+++ b/perl-BZ-Client-bugzilla-dates.patch
@@ -0,0 +1,15 @@
+--- lib/BZ/Client/XMLRPC/Value.pm
++++ lib/BZ/Client/XMLRPC/Value.pm
+@@ -71,7 +71,11 @@ sub end($$) {
+             $self->{'level1_content'} = undef;
+             $self->{'level1_elem'} = undef;
+             if ("dateTime.iso8601" eq $name) {
+-               $self->{'result'} = DateTime::Format::ISO8601->parse_datetime( $self->{'result'} );
++               my $val = $self->{'result'};
++               if ($val =~ /(\d\d\d\d)(\d\d)(\d\d)(T\d\d:\d\d:\d\d)/) {
++		  $val = "$1-$2-$3$4";
++               }
++               $self->{'result'} = DateTime::Format::ISO8601->parse_datetime( $val );
+             }            
+         }
+     }
diff --git a/perl-BZ-Client.spec b/perl-BZ-Client.spec
index a1f286f..f36e7c8 100644
--- a/perl-BZ-Client.spec
+++ b/perl-BZ-Client.spec
@@ -1,11 +1,12 @@
 Name:           perl-BZ-Client
 Version:        1.04
-Release:        2%{?dist}
+Release:        3%{?dist}
 Summary:        A client for the Bugzilla web services API
 License:        GPL+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/BZ-Client/
 Source0:        http://www.cpan.org/authors/id/J/JW/JWIED/BZ-Client-%{version}.tar.gz
+Patch0:         perl-BZ-Client-bugzilla-dates.patch
 BuildArch:      noarch
 BuildRequires:  perl(DateTime)
 BuildRequires:  perl(DateTime::Format::ISO8601)
@@ -24,6 +25,8 @@ This module provides an interface to the Bugzilla web services API.
 %setup -q -n BZ-Client-%{version}
 chmod 644 Changes README LICENSE
 
+%patch0
+
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor
 make %{?_smp_mflags}
@@ -46,6 +49,9 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Mon Apr 01 2013 Emmanuel Seyman <emmanuel at seyman.fr> - 1.04-3
+- Include patch to handle bugzilla dates (#927999)
+
 * Fri Jan 13 2012 Fedora Release Engineering <rel-eng at lists.fedoraproject.org> - 1.04-2
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_17_Mass_Rebuild