Hello community,

here is the log from the commit of package perl-DateTime-Format-Pg for 
openSUSE:Factory checked in at 2016-07-24 19:52:44
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-DateTime-Format-Pg (Old)
 and      /work/SRC/openSUSE:Factory/.perl-DateTime-Format-Pg.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-DateTime-Format-Pg"

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/perl-DateTime-Format-Pg/perl-DateTime-Format-Pg.changes
  2015-06-23 11:59:41.000000000 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-DateTime-Format-Pg.new/perl-DateTime-Format-Pg.changes
     2016-07-24 19:53:18.000000000 +0200
@@ -1,0 +2,11 @@
+Thu Jul 21 05:16:25 UTC 2016 - [email protected]
+
+- updated to 0.16012
+   see /usr/share/doc/packages/perl-DateTime-Format-Pg/Changes
+
+  0.16012 2016-07-19T21:37:31Z
+      - Parsing invalid intervals with no amount and units only should have
+        resulted in exceptions, but did not. Reported by Henrik Pauli (ssue #8)
+      - Internal cleanup
+
+-------------------------------------------------------------------

Old:
----
  DateTime-Format-Pg-0.16011.tar.gz

New:
----
  DateTime-Format-Pg-0.16012.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-DateTime-Format-Pg.spec ++++++
--- /var/tmp/diff_new_pack.FnxGC0/_old  2016-07-24 19:53:19.000000000 +0200
+++ /var/tmp/diff_new_pack.FnxGC0/_new  2016-07-24 19:53:19.000000000 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-DateTime-Format-Pg
 #
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -17,7 +17,7 @@
 
 
 Name:           perl-DateTime-Format-Pg
-Version:        0.16011
+Version:        0.16012
 Release:        0
 %define cpan_name DateTime-Format-Pg
 Summary:        Parse and format PostgreSQL dates and times
@@ -34,7 +34,7 @@
 BuildRequires:  perl(DateTime::Format::Builder) >= 0.72
 BuildRequires:  perl(DateTime::TimeZone) >= 0.05
 BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.36
-BuildRequires:  perl(Module::Build) >= 0.380000
+BuildRequires:  perl(Module::Build::Tiny) >= 0.035
 Requires:       perl(DateTime) >= 0.10
 Requires:       perl(DateTime::Format::Builder) >= 0.72
 Requires:       perl(DateTime::TimeZone) >= 0.05
@@ -51,14 +51,14 @@
 %setup -q -n %{cpan_name}-%{version}
 
 %build
-%{__perl} Build.PL installdirs=vendor
-./Build build flags=%{?_smp_mflags}
+%{__perl} Build.PL --installdirs=vendor
+./Build build --flags=%{?_smp_mflags}
 
 %check
 ./Build test
 
 %install
-./Build install destdir=%{buildroot} create_packlist=0
+./Build install --destdir=%{buildroot} --create_packlist=0
 %perl_gen_filelist
 
 %files -f %{name}.files

++++++ DateTime-Format-Pg-0.16011.tar.gz -> DateTime-Format-Pg-0.16012.tar.gz 
++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/Build.PL 
new/DateTime-Format-Pg-0.16012/Build.PL
--- old/DateTime-Format-Pg-0.16011/Build.PL     2015-06-19 15:40:31.000000000 
+0200
+++ new/DateTime-Format-Pg-0.16012/Build.PL     2016-07-19 23:37:34.000000000 
+0200
@@ -4,62 +4,9 @@
 # =========================================================================
 
 use 5.008_001;
-
 use strict;
-use warnings;
-use utf8;
-
-use Module::Build;
-use File::Basename;
-use File::Spec;
-
-my %args = (
-    license              => 'perl',
-    dynamic_config       => 0,
-
-    configure_requires => {
-        'Module::Build' => 0.38,
-    },
-
-    name            => 'DateTime-Format-Pg',
-    module_name     => 'DateTime::Format::Pg',
-    allow_pureperl => 0,
-
-    script_files => [glob('script/*'), glob('bin/*')],
-    c_source     => [qw()],
-    PL_files => {},
-
-    test_files           => ((-d '.git' || $ENV{RELEASE_TESTING}) && -d 'xt') 
? 't/ xt/' : 't/',
-    recursive_test_files => 1,
-
-
-);
-if (-d 'share') {
-    $args{share_dir} = 'share';
-}
-
-my $builder = Module::Build->subclass(
-    class => 'MyBuilder',
-    code => q{
-        sub ACTION_distmeta {
-            die "Do not run distmeta. Install Minilla and `minil install` 
instead.\n";
-        }
-        sub ACTION_installdeps {
-            die "Do not run installdeps. Run `cpanm --installdeps .` 
instead.\n";
-        }
-    }
-)->new(%args);
-$builder->create_build_script();
-
-use File::Copy;
 
-print "cp META.json MYMETA.json\n";
-copy("META.json","MYMETA.json") or die "Copy failed(META.json): $!";
+use Module::Build::Tiny 0.035;
 
-if (-f 'META.yml') {
-    print "cp META.yml MYMETA.yml\n";
-    copy("META.yml","MYMETA.yml") or die "Copy failed(META.yml): $!";
-} else {
-    print "There is no META.yml... You may install this module from the 
repository...\n";
-}
+Build_PL();
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/Changes 
new/DateTime-Format-Pg-0.16012/Changes
--- old/DateTime-Format-Pg-0.16011/Changes      2015-06-19 15:40:31.000000000 
+0200
+++ new/DateTime-Format-Pg-0.16012/Changes      2016-07-19 23:37:34.000000000 
+0200
@@ -1,5 +1,10 @@
 Revision history for Perl extension DateTime::Format::Pg.
 
+0.16012 2016-07-19T21:37:31Z
+    - Parsing invalid intervals with no amount and units only should have
+      resulted in exceptions, but did not. Reported by Henrik Pauli (ssue #8)
+    - Internal cleanup
+
 0.16011 2015-06-19T13:40:27Z
     - Support full interval syntax [pr #7]
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/META.json 
new/DateTime-Format-Pg-0.16012/META.json
--- old/DateTime-Format-Pg-0.16011/META.json    2015-06-19 15:40:31.000000000 
+0200
+++ new/DateTime-Format-Pg-0.16012/META.json    2016-07-19 23:37:34.000000000 
+0200
@@ -4,7 +4,7 @@
       "Daisuke Maki <[email protected]>"
    ],
    "dynamic_config" : 0,
-   "generated_by" : "Minilla/v2.2.0",
+   "generated_by" : "Minilla/v3.0.2",
    "license" : [
       "perl_5"
    ],
@@ -34,7 +34,7 @@
       },
       "configure" : {
          "requires" : {
-            "Module::Build" : "0.38"
+            "Module::Build::Tiny" : "0.035"
          }
       },
       "develop" : {
@@ -57,7 +57,7 @@
    "provides" : {
       "DateTime::Format::Pg" : {
          "file" : "lib/DateTime/Format/Pg.pm",
-         "version" : "0.16011"
+         "version" : "0.16012"
       }
    },
    "release_status" : "stable",
@@ -71,7 +71,7 @@
          "web" : "https://github.com/lestrrat/DateTime-Format-Pg";
       }
    },
-   "version" : "0.16011",
+   "version" : "0.16012",
    "x_contributors" : [
       "Vasily Chekalkin <[email protected]>",
       "David Steinbrunner <[email protected]>",
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/META.yml 
new/DateTime-Format-Pg-0.16012/META.yml
--- old/DateTime-Format-Pg-0.16011/META.yml     2015-06-19 15:40:31.000000000 
+0200
+++ new/DateTime-Format-Pg-0.16012/META.yml     2016-07-19 23:37:34.000000000 
+0200
@@ -6,9 +6,9 @@
   ExtUtils::MakeMaker: '6.36'
   Test::More: '0'
 configure_requires:
-  Module::Build: '0.38'
+  Module::Build::Tiny: '0.035'
 dynamic_config: 0
-generated_by: 'Minilla/v2.2.0, CPAN::Meta::Converter version 2.142690'
+generated_by: 'Minilla/v3.0.2, CPAN::Meta::Converter version 2.150001'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -27,7 +27,7 @@
 provides:
   DateTime::Format::Pg:
     file: lib/DateTime/Format/Pg.pm
-    version: '0.16011'
+    version: '0.16012'
 requires:
   DateTime: '0.10'
   DateTime::Format::Builder: '0.72'
@@ -36,7 +36,7 @@
   bugtracker: https://github.com/lestrrat/DateTime-Format-Pg/issues
   homepage: https://github.com/lestrrat/DateTime-Format-Pg
   repository: git://github.com/lestrrat/DateTime-Format-Pg.git
-version: '0.16011'
+version: '0.16012'
 x_contributors:
   - 'Vasily Chekalkin <[email protected]>'
   - 'David Steinbrunner <[email protected]>'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/lib/DateTime/Format/Pg.pm 
new/DateTime-Format-Pg-0.16012/lib/DateTime/Format/Pg.pm
--- old/DateTime-Format-Pg-0.16011/lib/DateTime/Format/Pg.pm    2015-06-19 
15:40:31.000000000 +0200
+++ new/DateTime-Format-Pg-0.16012/lib/DateTime/Format/Pg.pm    2016-07-19 
23:37:34.000000000 +0200
@@ -10,9 +10,8 @@
 use DateTime::TimeZone 0.06;
 use DateTime::TimeZone::UTC;
 use DateTime::TimeZone::Floating;
-use Data::Dumper;
 
-$VERSION = '0.16011';
+$VERSION = '0.16012';
 $VERSION = eval $VERSION;
 
 our @ISA = ('DateTime::Format::Builder');
@@ -593,15 +592,8 @@
 #   $timespec =~ s/\b(\d+):(\d\d):((\d\d)|(\d\d.\d+))\b/$1h $2m $3s/g;
     $string =~ s/\b(\d+):(\d\d):(\d\d)\b/$1h $2m $3s/g;
     $string =~ s/\b(\d+):(\d\d)\b/$1h $2m/g;
-
-    if ( $string =~ m/-(\d+)h (\d+)m (\d+)s\s*/ ) {
-        $string =~ s/\s*(\d+)m\s+(\d+)s\s*/ -$1m -$2s /;
-    }
-
-    if ( $string =~ m/-(\d+)h (\d+)m\s*/ ) {
-        $string =~ s/\s*(\d+)m\s*/ -$1m /;
-    }
-
+    $string =~ s/(-\d+h)\s+(\d+m)\s+(\d+s)\s*/$1 -$2 -$3 /;
+    $string =~ s/(-\d+h)\s+(\d+m)\s*/$1 -$2 /;
 
     while ($string =~ 
s/^\s*(-?\d+(?:[.,]\d+)?)\s*([a-zA-Z]+)(?:\s*(?:,|and)\s*)*//i) {
         my($amount, $unit) = ($1, $2);
@@ -625,7 +617,9 @@
         }
     }
 
-
+    if ($string =~ /\S/) { # OK to have extra spaces, but nothing else
+        Carp::croak "Unknown timespec: $string_to_parse";
+    }
 
     return $du;
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DateTime-Format-Pg-0.16011/t/parse_interval.t 
new/DateTime-Format-Pg-0.16012/t/parse_interval.t
--- old/DateTime-Format-Pg-0.16011/t/parse_interval.t   2015-06-19 
15:40:31.000000000 +0200
+++ new/DateTime-Format-Pg-0.16012/t/parse_interval.t   2016-07-19 
23:37:34.000000000 +0200
@@ -12,6 +12,9 @@
 {
     @negative_data = (
         '12:34:00 1 week 42 seconds',
+        "2 hello",
+        "hello",
+        "-days",
     );
 
     @positive_data = (


Reply via email to