Hello community,
here is the log from the commit of package perl-Devel-Symdump for
openSUSE:Factory checked in at 2015-06-15 17:46:28
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Devel-Symdump (Old)
and /work/SRC/openSUSE:Factory/.perl-Devel-Symdump.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Devel-Symdump"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Devel-Symdump/perl-Devel-Symdump.changes
2015-04-25 21:15:32.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Devel-Symdump.new/perl-Devel-Symdump.changes
2015-06-15 17:46:30.000000000 +0200
@@ -1,0 +2,13 @@
+Sun Jun 14 08:04:58 UTC 2015 - [email protected]
+
+- updated to 2.15
+ see /usr/share/doc/packages/perl-Devel-Symdump/Changes
+
+ 2015-06-11 k <[email protected]>
+
+ * release 2.15
+
+ * In the tests, always check for exists before checking for
+ definedness (Reini Urban)
+
+-------------------------------------------------------------------
Old:
----
Devel-Symdump-2.14.tar.gz
New:
----
Devel-Symdump-2.15.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Devel-Symdump.spec ++++++
--- /var/tmp/diff_new_pack.hlLoWv/_old 2015-06-15 17:46:31.000000000 +0200
+++ /var/tmp/diff_new_pack.hlLoWv/_new 2015-06-15 17:46:31.000000000 +0200
@@ -17,7 +17,7 @@
Name: perl-Devel-Symdump
-Version: 2.14
+Version: 2.15
Release: 0
%define cpan_name Devel-Symdump
Summary: Dump Symbol Names or the Symbol Table
++++++ Devel-Symdump-2.14.tar.gz -> Devel-Symdump-2.15.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/Changes
new/Devel-Symdump-2.15/Changes
--- old/Devel-Symdump-2.14/Changes 2014-12-16 05:27:59.000000000 +0100
+++ new/Devel-Symdump-2.15/Changes 2015-06-11 04:59:40.000000000 +0200
@@ -1,3 +1,10 @@
+2015-06-11 k <[email protected]>
+
+ * release 2.15
+
+ * In the tests, always check for exists before checking for
+ definedness (Reini Urban)
+
2014-12-16 k <[email protected]>
* release 2.14
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/META.json
new/Devel-Symdump-2.15/META.json
--- old/Devel-Symdump-2.14/META.json 2014-12-16 05:38:39.000000000 +0100
+++ new/Devel-Symdump-2.15/META.json 2015-06-11 05:02:51.000000000 +0200
@@ -4,7 +4,7 @@
"Andreas Koenig <[email protected]>"
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter
version 2.143240",
+ "generated_by" : "ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter
version 2.150005",
"keywords" : [
"symbol table inspection"
],
@@ -47,5 +47,6 @@
"url" : "git://github.com/andk/devel-symdump.git"
}
},
- "version" : "2.14"
+ "version" : "2.15",
+ "x_serialization_backend" : "JSON::PP version 2.27300"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/META.yml
new/Devel-Symdump-2.15/META.yml
--- old/Devel-Symdump-2.14/META.yml 2014-12-16 05:38:38.000000000 +0100
+++ new/Devel-Symdump-2.15/META.yml 2015-06-11 05:02:51.000000000 +0200
@@ -7,7 +7,7 @@
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version
2.143240'
+generated_by: 'ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter
version 2.150005'
keywords:
- 'symbol table inspection'
license: perl
@@ -25,4 +25,5 @@
perl: '5.004'
resources:
repository: git://github.com/andk/devel-symdump.git
-version: '2.14'
+version: '2.15'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.016'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/SIGNATURE
new/Devel-Symdump-2.15/SIGNATURE
--- old/Devel-Symdump-2.14/SIGNATURE 2014-12-16 05:38:46.000000000 +0100
+++ new/Devel-Symdump-2.15/SIGNATURE 2015-06-11 05:02:51.000000000 +0200
@@ -1,5 +1,5 @@
This file contains message digests of all files listed in MANIFEST,
-signed via the Module::Signature module, version 0.73.
+signed via the Module::Signature module, version 0.79.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
@@ -14,13 +14,13 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
-SHA1 a0604ba8b5a14e3dfa0d781798fb3ba4fe89fca9 Changes
+SHA1 0db9bcf95981556302e06db39b2758191593c63c Changes
SHA1 1a8c5d596cff0111353e14fa44e6caca7cce8c13 MANIFEST
-SHA1 330b4d11a6fb13faa609356db31aa7de14fcfe4f META.json
-SHA1 05e11782074cbbd59139e4632f9e80e61ff51244 META.yml
+SHA1 9d42d82b27deeee1eed560ae9f4bb6e1eb74bd86 META.json
+SHA1 0ef7a02c74bbb5b4865f1ba8168b9b27afc9af28 META.yml
SHA1 a58477f4ebc16c72b70c3c3bd8981bf808598d70 Makefile.PL
SHA1 5db31f42fa30d51489b21e2687781c054527d3b3 README
-SHA1 65f1a6f2c45e6fb97f9641bd1c9e8283bf45c852 lib/Devel/Symdump.pm
+SHA1 492b7d5d10a8e4ba8b759da040ecff1dfd05be1f lib/Devel/Symdump.pm
SHA1 fef2e4c5ea88bd09f2af618e32a58ee87be965a4 lib/Devel/Symdump/Export.pm
SHA1 6fbcf9e39c02e9889a6d8bf9cb2c6444967dc841 t/autogen.t
SHA1 ac80cb093bffdce80ea28209197e58ec40b0cdd4 t/diff.t
@@ -29,12 +29,12 @@
SHA1 835eaa7ac1ac82351bcc0f8fca734ed539459a95 t/pod.t
SHA1 61383cc359764b3323e77a07ebf846f215331d34 t/podcover.t
SHA1 a3c92f14ca7be245384a8a9f1425f6b99c2f42f1 t/recur.t
-SHA1 ca9823feb952a1794d6488efb5cdcdb607b6e431 t/symdump.t
+SHA1 eb77a889d1fbfc55658cb80e9791c63b10b369bd t/symdump.t
SHA1 d7e8e57a5c9676c8fd716b6b0fe13559c83d8711 t/tree.t
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1
-iEYEARECAAYFAlSPt08ACgkQ7IA58KMXwV2wDwCg1W+2g9ssu4RNFDXrWm7yNc3z
-ifsAoIDWEkbHek8FnOcLs049xrOBmPRF
-=mmzF
+iEYEARECAAYFAlV4+lsACgkQ7IA58KMXwV3gqgCg6D8U8nUoz1f/zs0Luubsu+Mi
+w/MAn1vgr3AJbT7Y9NodxXlevYodMpiX
+=tmM1
-----END PGP SIGNATURE-----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/lib/Devel/Symdump.pm
new/Devel-Symdump-2.15/lib/Devel/Symdump.pm
--- old/Devel-Symdump-2.14/lib/Devel/Symdump.pm 2014-12-08 22:29:07.000000000
+0100
+++ new/Devel-Symdump-2.15/lib/Devel/Symdump.pm 2015-06-11 05:01:52.000000000
+0200
@@ -5,7 +5,7 @@
use strict;
use vars qw($Defaults $VERSION *ENTRY $MAX_RECURSION);
-$VERSION = '2.14';
+$VERSION = '2.15';
$MAX_RECURSION = 97;
$Defaults = {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Devel-Symdump-2.14/t/symdump.t
new/Devel-Symdump-2.15/t/symdump.t
--- old/Devel-Symdump-2.14/t/symdump.t 2014-12-08 22:28:30.000000000 +0100
+++ new/Devel-Symdump-2.15/t/symdump.t 2015-06-11 04:56:56.000000000 +0200
@@ -70,7 +70,7 @@
$a = "@a";
#write;
like (
- $a, "/main::INC.*main::_.*main::a/"
+ $a, "/main::INC.*main::_.*main::a/", "packsort arrays"
);
eval {
@@ -79,7 +79,7 @@
$a = $@ ? $@ : "@a";
like ($a,
"/^invalid Devel::Symdump method: really_bogus\(\)/",
- );
+ "really_bogus");
$sob = rnew Devel::Symdump;
@@ -89,7 +89,7 @@
}
$a="@m";
like ($a,
-
"/Carp.*Devel.*Devel::Symdump.*Devel::Symdump::Export.*DynaLoader.*Exporter.*Hidden.*big::long::hairy.*funny::little.*strict/");
+
"/Carp.*Devel.*Devel::Symdump.*Devel::Symdump::Export.*DynaLoader.*Exporter.*Hidden.*big::long::hairy.*funny::little.*strict/",
"active_packages");
my %m=();
for (active_modules($sob)) {
@@ -97,12 +97,11 @@
}
$a = join " ", keys %m;
#print "[$a]\n";
-ok (exists $m{"Carp"} &&
- exists $m{"Devel::Symdump"} &&
+ok (exists $m{"Devel::Symdump"} &&
exists $m{"Devel::Symdump::Export"} &&
exists $m{"Exporter"} &&
exists $m{"strict"} &&
- exists $m{"vars"});
+ exists $m{"vars"}, "active_modules");
# Cannot test on the number of packages and functions because not
# every perl is built the same way. Static perls will reveal more
@@ -145,17 +144,23 @@
my $ob = shift;
my @modules = ();
my($pack);
- for $pack ("main", $ob->packages) {
- if (
- defined &{ "$pack\::import" } ||
- defined &{ "$pack\::AUTOLOAD" } ||
- @{ "$pack\::ISA" } ||
- @{ "$pack\::EXPORT" } ||
- @{ "$pack\::EXPORT_OK"}
- )
- {
- push @modules, $pack;
- }
+ for $pack ("main", sort $ob->packages) {
+ no strict 'refs';
+ my %stash = %{"$pack\::"};
+ # With restricted hashes we need to check with exists first
+ # XXX Core limitation: copying to %stash removes the READONLY flag
+ my $restricted = Internals::SvREADONLY(%{"$pack\::"});
+ #warn (($restricted ? "" : "un")."restricted $pack\::\n");
+ FUNCS:
+ for my $f (qw(import AUTOLOAD ISA EXPORT EXPORT_OK)) {
+ if (!$restricted or exists($stash{$f})) {
+ if (defined &{ "$pack\::$f"}) {
+ push @modules, $pack;
+ #warn "$pack \n";
+ last FUNCS;
+ }
+ }
+ }
}
return sort @modules;
}