Hello community, here is the log from the commit of package perl-Module-Info for openSUSE:Factory checked in at 2015-11-04 15:34:13 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Module-Info (Old) and /work/SRC/openSUSE:Factory/.perl-Module-Info.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Module-Info" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Module-Info/perl-Module-Info.changes 2015-10-30 13:43:17.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Module-Info.new/perl-Module-Info.changes 2015-11-04 15:34:32.000000000 +0100 @@ -1,0 +2,14 @@ +Tue Nov 3 10:11:13 UTC 2015 - [email protected] + +- updated to 0.37 + see /usr/share/doc/packages/perl-Module-Info/Changes + + 0.37 2015-11-01 NEILB + - Added a has_pod() method, which returns the path to the file + containing the pod (it could be a .pod file), if there is one. + Thanks to YANICK for this. + - Listed NEILB as the current maintainer in the AUTHOR section. + Thanks again to YANICK. + - Added link to github repo to doc. + +------------------------------------------------------------------- Old: ---- Module-Info-0.36.tar.gz New: ---- Module-Info-0.37.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Module-Info.spec ++++++ --- /var/tmp/diff_new_pack.mAjXsz/_old 2015-11-04 15:34:33.000000000 +0100 +++ /var/tmp/diff_new_pack.mAjXsz/_new 2015-11-04 15:34:33.000000000 +0100 @@ -17,7 +17,7 @@ Name: perl-Module-Info -Version: 0.36 +Version: 0.37 Release: 0 %define cpan_name Module-Info Summary: Information about Perl modules ++++++ Module-Info-0.36.tar.gz -> Module-Info-0.37.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/Changes new/Module-Info-0.37/Changes --- old/Module-Info-0.36/Changes 2015-10-24 00:06:48.000000000 +0200 +++ new/Module-Info-0.37/Changes 2015-11-01 16:30:35.000000000 +0100 @@ -1,5 +1,13 @@ Revision history for perl module Module::Info +0.37 2015-11-01 NEILB + - Added a has_pod() method, which returns the path to the file + containing the pod (it could be a .pod file), if there is one. + Thanks to YANICK for this. + - Listed NEILB as the current maintainer in the AUTHOR section. + Thanks again to YANICK. + - Added link to github repo to doc. + 0.36 2015-10-23 NEILB - Dropped our own fork of B::Utils, now rely on CPAN one - RT#13524 - Now works on recent versions of Perl - RT#97105 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/META.json new/Module-Info-0.37/META.json --- old/Module-Info-0.36/META.json 2015-10-24 00:14:37.000000000 +0200 +++ new/Module-Info-0.37/META.json 2015-11-01 16:32:53.000000000 +0100 @@ -4,7 +4,7 @@ "Mattia Barbon <[email protected]>" ], "dynamic_config" : 0, - "generated_by" : "ExtUtils::MakeMaker version 7.02, CPAN::Meta::Converter version 2.150005", + "generated_by" : "ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150001", "license" : [ "perl_5" ], @@ -42,6 +42,5 @@ } }, "release_status" : "stable", - "version" : "0.36", - "x_serialization_backend" : "JSON::PP version 2.27203" + "version" : "0.37" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/META.yml new/Module-Info-0.37/META.yml --- old/Module-Info-0.36/META.yml 2015-10-24 00:14:37.000000000 +0200 +++ new/Module-Info-0.37/META.yml 2015-11-01 16:32:53.000000000 +0100 @@ -7,7 +7,7 @@ configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 0 -generated_by: 'ExtUtils::MakeMaker version 7.02, CPAN::Meta::Converter version 2.150005' +generated_by: 'ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150001' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -24,5 +24,4 @@ File::Spec: '0.8' perl: '5.006' strict: '0' -version: '0.36' -x_serialization_backend: 'CPAN::Meta::YAML version 0.016' +version: '0.37' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/lib/B/Module/Info.pm new/Module-Info-0.37/lib/B/Module/Info.pm --- old/Module-Info-0.36/lib/B/Module/Info.pm 2015-10-24 00:07:26.000000000 +0200 +++ new/Module-Info-0.37/lib/B/Module/Info.pm 2015-11-01 16:25:37.000000000 +0100 @@ -2,7 +2,7 @@ use 5.006; use strict; -our $VERSION = '0.36'; +our $VERSION = '0.37'; use B; use B::Utils 0.27 qw(walkoptree_filtered walkoptree_simple diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/lib/Module/Info.pm new/Module-Info-0.37/lib/Module/Info.pm --- old/Module-Info-0.36/lib/Module/Info.pm 2015-10-24 00:07:11.000000000 +0200 +++ new/Module-Info-0.37/lib/Module/Info.pm 2015-11-01 16:30:19.000000000 +0100 @@ -12,7 +12,7 @@ our $AUTOLOAD; our $VERSION; -$VERSION = eval 'use version; 1' ? 'version'->new('0.36') : '0.36'; +$VERSION = eval 'use version; 1' ? 'version'->new('0.37') : '0.37'; $VERSION = eval $VERSION; @@ -321,6 +321,42 @@ $Config{privlib}); } +=item B<has_pod> + + my $has_pod = $module->has_pod; + +Returns the location of the module's pod, which can be the module file itself, +if the POD is inlined, the associated POD file, or nothing if there is no POD +at all. + +=cut + +sub has_pod { + my $self = shift; + + my $filename = $self->file; + + open my $file, $filename or return; # the file won't even open + + while( <$file> ) { + return $filename if /^=[a-z]/; + } + + # nothing found? Try a companion POD file + + $filename =~ s/\.[^.]+$/.pod/ or return; + + return unless -f $filename; + + open $file, $filename or return; + + while( <$file> ) { + return $filename if /^=[a-z]/; + } + + return; +} + =back =head2 Information that requires loading. @@ -721,12 +757,19 @@ =back +=head1 REPOSITORY + +L<https://github.com/neilb/Module-Info> + =head1 AUTHOR Michael G Schwern <[email protected]> with code from ExtUtils::MM_Unix, Module::InstalledVersion and lots of cargo-culting from B::Deparse. -Mattia Barbon <[email protected]> is the current maintainer. +Mattia Barbon <[email protected]> maintained +the module from 2002 to 2013. + +Neil Bowers <[email protected]> is the current maintainer. =head1 LICENSE diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/t/Module-Info.t new/Module-Info-0.37/t/Module-Info.t --- old/Module-Info-0.36/t/Module-Info.t 2015-10-24 00:07:57.000000000 +0200 +++ new/Module-Info-0.37/t/Module-Info.t 2015-11-01 16:25:55.000000000 +0100 @@ -6,11 +6,11 @@ my $has_version_pm = eval 'use version; 1'; my $version_pm_VERSION = $has_version_pm ? 'version'->VERSION : 0; -my $Mod_Info_VERSION = '0.36'; +my $Mod_Info_VERSION = '0.37'; # 0.280 vith version.pm, 0.28 without, except for development versions -my $Mod_Info_Pack_VERSION = !$has_version_pm ? '0.36' : # 0.3101 - $has_version_pm && $version_pm_VERSION > '0.72' ? '0.36' : # 0.3101 - '0.36'; # 0.310001 +my $Mod_Info_Pack_VERSION = !$has_version_pm ? '0.37' : # 0.3101 + $has_version_pm && $version_pm_VERSION > '0.72' ? '0.37' : # 0.3101 + '0.37'; # 0.310001 my @old5lib = defined $ENV{PERL5LIB} ? ($ENV{PERL5LIB}) : (); $ENV{PERL5LIB} = join $Config{path_sep}, 'blib/lib', @old5lib; @@ -27,6 +27,7 @@ inc_dir file is_core + has_pod packages_inside package_versions modules_required diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Module-Info-0.36/t/lib/Moo.pm new/Module-Info-0.37/t/lib/Moo.pm --- old/Module-Info-0.36/t/lib/Moo.pm 2015-06-15 22:49:38.000000000 +0200 +++ new/Module-Info-0.37/t/lib/Moo.pm 2015-11-01 16:22:15.000000000 +0100 @@ -3,4 +3,10 @@ # potentially unsafe version assignment line use vars; $VERSION = '0.12'; +=head1 NAME + +Moo - Hacking bovines's favorite + +=cut + 1;
