Hello community,

here is the log from the commit of package perl-Data-Peek for openSUSE:Factory 
checked in at 2013-10-06 14:53:19
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Data-Peek (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Data-Peek.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Data-Peek"

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Data-Peek/perl-Data-Peek.changes    
2013-06-05 17:50:53.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-Data-Peek.new/perl-Data-Peek.changes       
2013-10-06 14:53:20.000000000 +0200
@@ -1,0 +2,7 @@
+Fri Oct  4 09:15:24 UTC 2013 - [email protected]
+
+- updated to 0.39
+    * Upped copyright to 2013
+    * Add alternative test results for 5.19.3 and up (COW and no PV for IV)
+
+-------------------------------------------------------------------

Old:
----
  Data-Peek-0.38.tgz

New:
----
  Data-Peek-0.39.tgz

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

Other differences:
------------------
++++++ perl-Data-Peek.spec ++++++
--- /var/tmp/diff_new_pack.RUv5EV/_old  2013-10-06 14:53:20.000000000 +0200
+++ /var/tmp/diff_new_pack.RUv5EV/_new  2013-10-06 14:53:20.000000000 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Data-Peek
-Version:        0.38
+Version:        0.39
 Release:        0
 %define cpan_name Data-Peek
 Summary:        A collection of low-level debug facilities
@@ -33,6 +33,7 @@
 #BuildRequires: perl(Data::Peek)
 Requires:       perl(Test::More) >= 0.88
 Requires:       perl(Test::NoWarnings)
+Recommends:     perl(Data::Dumper) >= 2.145
 Recommends:     perl(Perl::Tidy)
 Recommends:     perl(Test::More) >= 0.98
 %{perl_requires}
@@ -45,10 +46,6 @@
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
-%if 0%{?suse_version} < 1120 || 0%{?rhel_version} || 0%{?centos_version}
-%{__perl} -p -i\
-  -e 's|(use Test::More);|\1 qw(no_plan);|,s|(done_testing.*)|#\1|' 
t/22_DHexDump.t
-%endif
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"

++++++ Data-Peek-0.38.tgz -> Data-Peek-0.39.tgz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/ChangeLog new/Data-Peek-0.39/ChangeLog
--- old/Data-Peek-0.38/ChangeLog        2012-05-29 08:34:03.000000000 +0200
+++ new/Data-Peek-0.39/ChangeLog        2013-08-17 18:15:47.000000000 +0200
@@ -1,99 +1,103 @@
-0.38   2012-05-29, H.Merijn Brand   <[email protected]>
+0.39   - 2013-08-17, H.Merijn Brand   <[email protected]>
+    * Upped copyright to 2013
+    * Add alternative test results for 5.19.3 and up (COW and no PV for IV)
+
+0.38   - 2012-05-29, H.Merijn Brand   <[email protected]>
     * Backslashed { in regex in test to satisfy perl-5.17
 
-0.37   2012-04-16, H.Merijn Brand   <[email protected]>
+0.37   - 2012-04-16, H.Merijn Brand   <[email protected]>
     * Upped copyright to 2012
     * Allow length for DHexDump ()
 
-0.36   2011-09-07, H.Merijn Brand   <[email protected]>
+0.36   - 2011-09-07, H.Merijn Brand   <[email protected]>
     * NAME / DISTNAME in Makefile.PL
 
-0.35   2011-09-07, H.Merijn Brand   <[email protected]>
+0.35   - 2011-09-07, H.Merijn Brand   <[email protected]>
     * More cross-checks for META data
 
-0.34   2011-09-01, H.Merijn Brand   <[email protected]>
+0.34   - 2011-09-01, H.Merijn Brand   <[email protected]>
     * Tests require Test::More-0.88 or up (RT#70538)
     * Tested on perl-5.14.1 and 5.15.1
 
-0.33   2011-02-16, H.Merijn Brand   <[email protected]>
+0.33   - 2011-02-16, H.Merijn Brand   <[email protected]>
     * Added DTidy (): stream DDumper output through Perl::Tidy
     * Upped copyright to 2011
 
-0.32   2010-11-21, H.Merijn Brand   <[email protected]>
+0.32   - 2010-11-21, H.Merijn Brand   <[email protected]>
     * Require perl 5.8.0
     * DGrow tests for bigger gap
     * Spell checking
     * Add DHexDump ()
 
-0.31   2010-03-16, H.Merijn Brand   <[email protected]>
+0.31   - 2010-03-16, H.Merijn Brand   <[email protected]>
     * Dropped YAML spec to 1.0
 
-0.30   2010-02-14, H.Merijn Brand   <[email protected]>
+0.30   - 2010-02-14, H.Merijn Brand   <[email protected]>
     * Use $Data::Dumper::Quotekeys = 0; instead of removing the quotes myself
     * Put first hash element after opening lonely brace
     * Upped copyright to 2010
     * Use warn () instead of print STDERR
 
-0.29   2009-11-09, H.Merijn Brand   <[email protected]>
+0.29   - 2009-11-09, H.Merijn Brand   <[email protected]>
     * Use skip instead of skip_all for builds that have no DPeek ()
     * Be more lenient towards the allocated space
 
-0.28   2009-11-06, H.Merijn Brand   <[email protected]>
+0.28   - 2009-11-06, H.Merijn Brand   <[email protected]>
     * DDump () now dumps the variable itself, instead of a copy (Zefram)
     * Add DGrow ()
 
-0.27   2009-06-03, H.Merijn Brand   <[email protected]>
+0.27   - 2009-06-03, H.Merijn Brand   <[email protected]>
     * void context behaviour for DPeek ()
     * void context behaviour for DDual ()
 
-0.26   2009-06-03, H.Merijn Brand   <[email protected]>
+0.26   - 2009-06-03, H.Merijn Brand   <[email protected]>
     * Upped copyright to 2009
     * Corrected paren placement for bless (...)
     * Documentation fixes
     * Added Test::NoWarnings
     * Added DDsort ()
 
-0.25   2008-11-24, H.Merijn Brand   <[email protected]>
+0.25   - 2008-11-24, H.Merijn Brand   <[email protected]>
     * Wrong e-mail in META.yml
     * #34831 fixed tied $,
 
-0.24   2008-10-31, H.Merijn Brand   <[email protected]>
+0.24   - 2008-10-31, H.Merijn Brand   <[email protected]>
     * Implement DDisplay ()
     * Implement triplevar ()
     * Update ppport.h to 3.14_05 (mhx++)
     * 5.6.x DDisplay ()'s UTF8 different
     * make leaktest/leakcheck enabled and executed
 
-0.23   2008-10-21, H.Merijn Brand   <[email protected]>
+0.23   - 2008-10-21, H.Merijn Brand   <[email protected]>
     * Selecting to install DP did not install Data::Peek
 
-0.22   2008-10-20, H.Merijn Brand   <[email protected]>
+0.22   - 2008-10-20, H.Merijn Brand   <[email protected]>
     * Updated to ppport-3.14_01
     * YAML declared 1.4 (META.yml) instead of 1.1 (YAML)
     * DP.pm gets version from Peek.pm
     * DP.pm should not be installed in Data namespace
 
-0.21   2008-10-13, H.Merijn Brand   <[email protected]>
+0.21   - 2008-10-13, H.Merijn Brand   <[email protected]>
     * Typo in pod (Joshua Juran)
     * MSwin doesn't use plain \n (RT#39916)
     * Some MSWin (ActivePerl) and AIX builds do not have
       Perl_sv_peek () exported (RT#39916)
 
-0.20   2008-10-08, H.Merijn Brand   <[email protected]>
+0.20   - 2008-10-08, H.Merijn Brand   <[email protected]>
     * Renamed DDumper to Data::Peek
     * Default argument for DPeek is $_
     * Optionally install DP as shortcut for Data::Peek
     * Public git repo set up
 
-0.16   2008-10-07, H.Merijn Brand   <[email protected]>
+0.16   - 2008-10-07, H.Merijn Brand   <[email protected]>
     * Allocated length for PV's depends on arch (upped test to 8)
     * Released on Amsterdam.pm
 
-0.15   2008-09-26, H.Merijn Brand   <[email protected]>
+0.15   - 2008-09-26, H.Merijn Brand   <[email protected]>
     * Start writing tests for DDump ()
     * Added DDual ()
 
-0.11   2008-09-25, H.Merijn Brand   <[email protected]>
+0.11   - 2008-09-25, H.Merijn Brand   <[email protected]>
     * PerlIO is only available in 5.8 and up
     * Perl 5.6 is a minimal requirement for 'use warnings'
     * Tests for DPeek ()
@@ -103,5 +107,5 @@
     * Doc changes
     * In void context DDumper prints to STDERR
 
-0.10   2008-09-24, H.Merijn Brand   <[email protected]>
+0.10   - 2008-09-24, H.Merijn Brand   <[email protected]>
     * Initial attempt
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/META.json new/Data-Peek-0.39/META.json
--- old/Data-Peek-0.38/META.json        2012-06-01 15:29:15.000000000 +0200
+++ new/Data-Peek-0.39/META.json        2013-08-20 17:43:17.000000000 +0200
@@ -1,46 +1,67 @@
 {
    "resources" : {
-      "repository" : "http://repo.or.cz/w/Data-Peek.git";,
-      "license" : "http://dev.perl.org/licenses/";
-   },
+      "license" : [
+         "http://dev.perl.org/licenses/";
+         ],
+      "repository" : {
+         "type" : "git",
+         "url" : "http://repo.or.cz/r/Data-Peek.git";,
+         "web" : "http://repo.or.cz/w/Data-Peek.git";
+         }
+      },
+   "version" : "0.39",
+   "abstract" : "Modified and extended debugging facilities",
    "meta-spec" : {
-      "version" : 2,
-      "url" : "https://metacpan.org/module/CPAN::Meta::Spec?#meta-spec";
-   },
-   "test_requires" : {
-      "Test::More" : "0.88",
-      "Test::Harness" : "0",
-      "Test::NoWarnings" : "0"
-   },
-   "distribution_type" : "module",
-   "generated_by" : "Author",
-   "version" : "0.38",
+      "version" : "2",
+      "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";
+      },
    "name" : "Data-Peek",
-   "author" : [
-      "H.Merijn Brand <[email protected]>"
-   ],
-   "license" : "perl",
-   "build_requires" : {
-      "perl" : "5.008"
-   },
+   "license" : [
+      "perl_5"
+      ],
+   "dynamic_config" : 1,
+   "prereqs" : {
+      "configure" : {
+         "requires" : {
+            "ExtUtils::MakeMaker" : "0"
+            }
+         },
+      "test" : {
+         "recommends" : {
+            "Test::More" : "0.98"
+            },
+         "requires" : {
+            "Test::More" : "0.88",
+            "Test::NoWarnings" : "0"
+            }
+         },
+      "build" : {
+         "requires" : {
+            "perl" : "5.008"
+            }
+         },
+      "runtime" : {
+         "recommends" : {
+            "Data::Dumper" : "2.145",
+            "perl" : "5.016003",
+            "Perl::Tidy" : "0"
+            },
+         "requires" : {
+            "Data::Dumper" : "0",
+            "perl" : "5.008",
+            "DynaLoader" : "0"
+            }
+         }
+      },
    "provides" : {
       "Data::Peek" : {
-         "version" : "0.38",
-         "file" : "Peek.pm"
-      }
-   },
-   "requires" : {
-      "perl" : "5.008",
-      "Data::Dumper" : "0",
-      "DynaLoader" : "0"
-   },
-   "recommends" : {
-      "Test::More" : "0.98",
-      "perl" : "5.016000",
-      "Perl::Tidy" : "0"
-   },
-   "abstract" : "Modified and extended debugging facilities",
-   "configure_requires" : {
-      "ExtUtils::MakeMaker" : "0"
+         "file" : "Peek.pm",
+         "version" : "0.39"
+         }
+      },
+   "release_status" : "stable",
+   "generated_by" : "Author",
+   "author" : [
+      "H.Merijn Brand <[email protected]>"
+      ]
    }
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/META.yml new/Data-Peek-0.39/META.yml
--- old/Data-Peek-0.38/META.yml 2012-06-01 15:29:15.000000000 +0200
+++ new/Data-Peek-0.39/META.yml 2013-08-20 17:43:17.000000000 +0200
@@ -1,35 +1,34 @@
---- #YAML:1.0
-name:                    Data-Peek
-version:                 0.38
-abstract:                Modified and extended debugging facilities
-license:                 perl
-author:
-    - H.Merijn Brand <[email protected]>
-generated_by:            Author
-distribution_type:       module
-provides:
-    Data::Peek:
-        file:            Peek.pm
-        version:         0.38
-requires:
-    perl:                5.008
-    DynaLoader:          0
-    Data::Dumper:        0
-configure_requires:
-    ExtUtils::MakeMaker: 0
-build_requires:
-    perl:                5.008
-test_requires:
-    Test::Harness:       0
-    Test::More:          0.88
-    Test::NoWarnings:    0
-recommends:
-    perl:                5.016000
-    Perl::Tidy:          0
-    Test::More:          0.98
-resources:
-    license:             http://dev.perl.org/licenses/
-    repository:          http://repo.or.cz/w/Data-Peek.git
-meta-spec:
-    version:             1.4
-    url:                 
http://module-build.sourceforge.net/META-spec-v1.4.html
+--- 
+abstract: Modified and extended debugging facilities
+author: 
+  - H.Merijn Brand <[email protected]>
+build_requires: 
+  perl: '5.008'
+configure_requires: 
+  ExtUtils::MakeMaker: 0
+dynamic_config: 1
+generated_by: Author, CPAN::Meta::Converter version 2.132140
+license: perl
+meta-spec: 
+  url: http://module-build.sourceforge.net/META-spec-v1.4.html
+  version: '1.4'
+name: Data-Peek
+provides: 
+  Data::Peek: 
+    file: Peek.pm
+    version: '0.39'
+recommends: 
+  Data::Dumper: '2.145'
+  Perl::Tidy: 0
+  Test::More: '0.98'
+  perl: '5.016003'
+requires: 
+  Data::Dumper: 0
+  DynaLoader: 0
+  Test::More: '0.88'
+  Test::NoWarnings: 0
+  perl: '5.008'
+resources: 
+  license: http://dev.perl.org/licenses/
+  repository: http://repo.or.cz/r/Data-Peek.git
+version: '0.39'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/Makefile.PL 
new/Data-Peek-0.39/Makefile.PL
--- old/Data-Peek-0.38/Makefile.PL      2012-01-11 09:16:27.000000000 +0100
+++ new/Data-Peek-0.39/Makefile.PL      2013-08-20 17:42:53.000000000 +0200
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# Copyright PROCURA B.V. (c) 2008-2012 H.Merijn Brand
+# Copyright PROCURA B.V. (c) 2008-2013 H.Merijn Brand
 
 require 5.008; # <- also see postamble at the bottom for META.yml
 use strict;
@@ -16,7 +16,6 @@
     PREREQ_PM   => { "DynaLoader"       => 0,
                      "Data::Dumper"     => 0,
                      "Test::More"       => 0.88,
-                     "Test::Harness"    => 0,
                      "Test::NoWarnings" => 0,
                      },
     clean        => { FILES => join " ", qw(
@@ -28,6 +27,8 @@
                         valgrind.log
                         )
                      },
+    macro        => { TARFLAGS => "--format=ustar -c -v -f",
+                     },
     );
 $ExtUtils::MakeMaker::VERSION > 6.30 and $wm{LICENSE} = "perl";
 
@@ -135,7 +136,7 @@
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright (C) 2008-2012 H.Merijn Brand
+Copyright (C) 2008-2013 H.Merijn Brand
 
 This library is free software; you can redistribute it and/or modify it
 under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/Peek.pm new/Data-Peek-0.39/Peek.pm
--- old/Data-Peek-0.38/Peek.pm  2012-04-16 18:47:42.000000000 +0200
+++ new/Data-Peek-0.39/Peek.pm  2013-01-21 17:03:43.000000000 +0100
@@ -6,7 +6,7 @@
 use DynaLoader ();
 
 use vars qw( $VERSION @ISA @EXPORT @EXPORT_OK );
-$VERSION   = "0.38";
+$VERSION   = "0.39";
 @ISA       = qw( DynaLoader Exporter );
 @EXPORT    = qw( DDumper DTidy DDsort DPeek DDisplay DDump DHexDump
                 DDual DGrow );
@@ -677,7 +677,7 @@
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright (C) 2008-2012 H.Merijn Brand
+Copyright (C) 2008-2013 H.Merijn Brand
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/Peek.xs new/Data-Peek-0.39/Peek.xs
--- old/Data-Peek-0.38/Peek.xs  2012-01-11 09:16:36.000000000 +0100
+++ new/Data-Peek-0.39/Peek.xs  2013-01-21 17:03:46.000000000 +0100
@@ -1,4 +1,4 @@
-/*  Copyright (c) 2008-2012 H.Merijn Brand.  All rights reserved.
+/*  Copyright (c) 2008-2013 H.Merijn Brand.  All rights reserved.
  *  This program is free software; you can redistribute it and/or
  *  modify it under the same terms as Perl itself.
  */
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/README new/Data-Peek-0.39/README
--- old/Data-Peek-0.38/README   2012-01-11 09:17:03.000000000 +0100
+++ new/Data-Peek-0.39/README   2013-01-21 17:03:52.000000000 +0100
@@ -56,7 +56,7 @@
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright (c) 2008-2012 H.Merijn Brand.  All rights reserved.
+Copyright (c) 2008-2013 H.Merijn Brand.  All rights reserved.
 
 This program is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Peek-0.38/t/30_DDump-s.t 
new/Data-Peek-0.39/t/30_DDump-s.t
--- old/Data-Peek-0.38/t/30_DDump-s.t   2009-11-09 16:37:32.000000000 +0100
+++ new/Data-Peek-0.39/t/30_DDump-s.t   2013-08-17 17:12:16.000000000 +0200
@@ -24,7 +24,7 @@
 my $var = "";
 
 foreach my $test (@tests) {
-    my ($in, $out) = split m/\n--\n/ => $test;
+    my ($in, $expect) = split m/\n--\n/ => $test;
     $in eq "" and next;
     SKIP: {
        eval "\$var = $in;";
@@ -38,23 +38,33 @@
                @nl = ($dump =~ m/PV = 0x\w+ "([^"]+)".*"([^"]+)"/);
                diag "# This perl dumps \\n as (@nl)";
                # Catch differences in \n
-               $dump =~ s/"ab\Q$nl[0]\E(.*?)"ab\Q$nl[1]\E/"ab\\n$1"ab\\n/;
+               $dump =~ s/"ab\Q$nl[0]\E(.*?)"ab\Q$nl[1]\E/"ab\\n$1"ab\\n/g;
                }
            }
 
        $dump =~ s/\b0x[0-9a-f]+\b/0x****/g;
        $dump =~ s/\b(REFCNT =) [0-9]{4,}/$1 -1/g;
 
-       $dump =~ s/\bLEN = (?:[1-9]|1[0-6])\b/LEN = 8/; # aligned at long long?
+       $dump =~ s/\bLEN = (?:[1-9]|1[0-6])\b/LEN = 8/g; # aligned at long long?
 
        $dump =~ s/\bPADBUSY\b,?//g     if $] < 5.010;
 
        $dump =~ s/\bUV = /IV = /g      if $] < 5.008;
        $dump =~ s/,?\bIsUV\b//g        if $] < 5.008;
 
-       $in =~ s/[\s\n]+/ /g;
+       my @expect = split m/(?<=\n)\|\n+/ => $expect;
 
-       is ($dump, $out, "DDump ($in)");
+       $in   =~ s/[\s\n]+/ /g;
+
+       my @match = grep { $dump eq $_ } @expect;
+       if (@match == 1) {
+           is ($dump, $match[0], "DDump ($in)");
+           }
+       else {
+           my $match = shift @expect;
+           is ($dump, $match, "DDump ($in)");
+           diag ("DDump ($in) neither matches\n$_") for @expect;
+           }
        }
     }
 
@@ -69,6 +79,11 @@
   PV = 0x**** ""\0
   CUR = 0
   LEN = 8
+|
+SV = PV(0x****) at 0x****
+  REFCNT = 1
+  FLAGS = (PADMY)
+  PV = 0
 ==
 0
 --
@@ -79,6 +94,12 @@
   PV = 0x**** ""\0
   CUR = 0
   LEN = 8
+|
+SV = PVIV(0x****) at 0x****
+  REFCNT = 1
+  FLAGS = (PADMY,IOK,pIOK)
+  IV = 0
+  PV = 0
 ==
 1
 --
@@ -89,6 +110,12 @@
   PV = 0x**** ""\0
   CUR = 0
   LEN = 8
+|
+SV = PVIV(0x****) at 0x****
+  REFCNT = 1
+  FLAGS = (PADMY,IOK,pIOK)
+  IV = 1
+  PV = 0
 ==
 ""
 --
@@ -99,3 +126,12 @@
   PV = 0x**** ""\0
   CUR = 0
   LEN = 8
+|
+SV = PVIV(0x****) at 0x****
+  REFCNT = 1
+  FLAGS = (PADMY,POK,IsCOW,pPOK)
+  IV = 1
+  PV = 0x**** ""\0
+  CUR = 0
+  LEN = 8
+  COW_REFCNT = 0

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to