Hello community,
here is the log from the commit of package perl-Getopt-Long-Descriptive for openSUSE:Factory checked in at 2013-06-06 13:15:29
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Getopt-Long-Descriptive (Old)
and /work/SRC/openSUSE:Factory/.perl-Getopt-Long-Descriptive.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Getopt-Long-Descriptive"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Getopt-Long-Descriptive/perl-Getopt-Long-Descriptive.changes 2012-02-24 12:06:40.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Getopt-Long-Descriptive.new/perl-Getopt-Long-Descriptive.changes 2013-06-06 13:15:31.000000000 +0200
@@ -1,0 +2,7 @@
+Wed Jun 5 05:47:21 UTC 2013 - coolo@suse.com
+
+- updated to 0.093
+ bogus %-codes in usage description are now noticed and fatal
+ make "hidden" options usable on their own (thanks, Roman Hubacek!)
+
+-------------------------------------------------------------------
Old:
----
Getopt-Long-Descriptive-0.091.tar.gz
New:
----
Getopt-Long-Descriptive-0.093.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Getopt-Long-Descriptive.spec ++++++
--- /var/tmp/diff_new_pack.2iqaoy/_old 2013-06-06 13:15:31.000000000 +0200
+++ /var/tmp/diff_new_pack.2iqaoy/_new 2013-06-06 13:15:31.000000000 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Getopt-Long-Descriptive
#
-# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2013 SUSE LINUX Products 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-Getopt-Long-Descriptive
-Version: 0.091
+Version: 0.093
Release: 0
%define cpan_name Getopt-Long-Descriptive
Summary: Getopt::Long, but simpler and more powerful
++++++ Getopt-Long-Descriptive-0.091.tar.gz -> Getopt-Long-Descriptive-0.093.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/Changes new/Getopt-Long-Descriptive-0.093/Changes
--- old/Getopt-Long-Descriptive-0.091/Changes 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/Changes 2012-11-01 20:55:38.000000000 +0100
@@ -1,5 +1,11 @@
Revision history for Getopt-Long-Descriptive
+0.093 2012-11-01 15:55:35 America/New_York
+ bogus %-codes in usage description are now noticed and fatal
+
+0.092 2012-07-31 22:51:09 America/New_York
+ make "hidden" options usable on their own (thanks, Roman Hubacek!)
+
0.091 2012-02-22 18:15:08 America/New_York
don't die quite so violently when a Params::Validate constraint fails
(initial patch by harleypig@github; final blame to RJBS)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/MANIFEST new/Getopt-Long-Descriptive-0.093/MANIFEST
--- old/Getopt-Long-Descriptive-0.091/MANIFEST 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/MANIFEST 2012-11-01 20:55:38.000000000 +0100
@@ -9,6 +9,8 @@
lib/Getopt/Long/Descriptive.pm
lib/Getopt/Long/Descriptive/Opts.pm
lib/Getopt/Long/Descriptive/Usage.pm
-t/00-load.t
+t/00-compile.t
+t/000-report-versions-tiny.t
t/descriptive.t
-t/release-pod-syntax.t
+xt/release/changes_has_content.t
+xt/release/pod-syntax.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/META.json new/Getopt-Long-Descriptive-0.093/META.json
--- old/Getopt-Long-Descriptive-0.091/META.json 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/META.json 2012-11-01 20:55:38.000000000 +0100
@@ -5,7 +5,7 @@
"Ricardo Signes "
],
"dynamic_config" : 0,
- "generated_by" : "Dist::Zilla version 4.300007, CPAN::Meta::Converter version 2.120351",
+ "generated_by" : "Dist::Zilla version 4.300028, CPAN::Meta::Converter version 2.120921",
"license" : [
"perl_5"
],
@@ -20,6 +20,12 @@
"ExtUtils::MakeMaker" : "6.30"
}
},
+ "develop" : {
+ "requires" : {
+ "Test::Pod" : "1.41",
+ "version" : "0.9901"
+ }
+ },
"runtime" : {
"requires" : {
"Carp" : "0",
@@ -37,6 +43,8 @@
},
"test" : {
"requires" : {
+ "File::Find" : "0",
+ "File::Temp" : "0",
"Test::More" : "0.96"
}
}
@@ -50,123 +58,136 @@
"web" : "https://github.com/rjbs/Getopt-Long-Descriptive"
}
},
- "version" : "0.091",
+ "version" : "0.093",
"x_Dist_Zilla" : {
+ "perl" : {
+ "version" : "5.017004"
+ },
"plugins" : [
{
+ "class" : "Dist::Zilla::Plugin::Git::GatherDir",
+ "name" : "@RJBS/Git::GatherDir",
+ "version" : "2.001"
+ },
+ {
"class" : "Dist::Zilla::Plugin::CheckPrereqsIndexed",
"name" : "@RJBS/CheckPrereqsIndexed",
"version" : "0.007"
},
{
- "class" : "Dist::Zilla::Plugin::GatherDir",
- "name" : "@RJBS/@Basic/GatherDir",
- "version" : "4.300007"
+ "class" : "Dist::Zilla::Plugin::CheckExtraTests",
+ "name" : "@RJBS/CheckExtraTests",
+ "version" : "0.007"
},
{
"class" : "Dist::Zilla::Plugin::PruneCruft",
- "name" : "@RJBS/@Basic/PruneCruft",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/PruneCruft",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::ManifestSkip",
- "name" : "@RJBS/@Basic/ManifestSkip",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/ManifestSkip",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::MetaYAML",
- "name" : "@RJBS/@Basic/MetaYAML",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/MetaYAML",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::License",
- "name" : "@RJBS/@Basic/License",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/License",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::Readme",
- "name" : "@RJBS/@Basic/Readme",
- "version" : "4.300007"
- },
- {
- "class" : "Dist::Zilla::Plugin::ExtraTests",
- "name" : "@RJBS/@Basic/ExtraTests",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/Readme",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::ExecDir",
- "name" : "@RJBS/@Basic/ExecDir",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/ExecDir",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::ShareDir",
- "name" : "@RJBS/@Basic/ShareDir",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/ShareDir",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
- "name" : "@RJBS/@Basic/MakeMaker",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/MakeMaker",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::Manifest",
- "name" : "@RJBS/@Basic/Manifest",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/Manifest",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::TestRelease",
- "name" : "@RJBS/@Basic/TestRelease",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/TestRelease",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::ConfirmRelease",
- "name" : "@RJBS/@Basic/ConfirmRelease",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/ConfirmRelease",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::UploadToCPAN",
- "name" : "@RJBS/@Basic/UploadToCPAN",
- "version" : "4.300007"
+ "name" : "@RJBS/@Filter/UploadToCPAN",
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::AutoPrereqs",
"name" : "@RJBS/AutoPrereqs",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::Git::NextVersion",
"name" : "@RJBS/Git::NextVersion",
- "version" : "1.120370"
+ "version" : "2.001"
},
{
"class" : "Dist::Zilla::Plugin::PkgVersion",
"name" : "@RJBS/PkgVersion",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::MetaConfig",
"name" : "@RJBS/MetaConfig",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::MetaJSON",
"name" : "@RJBS/MetaJSON",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::NextRelease",
"name" : "@RJBS/NextRelease",
- "version" : "4.300007"
+ "version" : "4.300028"
+ },
+ {
+ "class" : "Dist::Zilla::Plugin::Test::ChangesHasContent",
+ "name" : "@RJBS/Test::ChangesHasContent",
+ "version" : "0.006"
},
{
"class" : "Dist::Zilla::Plugin::PodSyntaxTests",
"name" : "@RJBS/PodSyntaxTests",
- "version" : "4.300007"
+ "version" : "4.300028"
+ },
+ {
+ "class" : "Dist::Zilla::Plugin::Test::Compile",
+ "name" : "@RJBS/Test::Compile",
+ "version" : "1.112820"
},
{
- "class" : "Dist::Zilla::Plugin::Repository",
- "name" : "@RJBS/Repository",
- "version" : "0.18"
+ "class" : "Dist::Zilla::Plugin::ReportVersions::Tiny",
+ "name" : "@RJBS/ReportVersions::Tiny",
+ "version" : "1.08"
},
{
"class" : "Dist::Zilla::Plugin::Prereqs",
@@ -177,7 +198,7 @@
}
},
"name" : "@RJBS/TestMoreWithSubtests",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::PodWeaver",
@@ -192,52 +213,52 @@
{
"class" : "Dist::Zilla::Plugin::Git::Check",
"name" : "@RJBS/@Git/Check",
- "version" : "1.120370"
+ "version" : "2.001"
},
{
"class" : "Dist::Zilla::Plugin::Git::Commit",
"name" : "@RJBS/@Git/Commit",
- "version" : "1.120370"
+ "version" : "2.001"
},
{
"class" : "Dist::Zilla::Plugin::Git::Tag",
"name" : "@RJBS/@Git/Tag",
- "version" : "1.120370"
+ "version" : "2.001"
},
{
"class" : "Dist::Zilla::Plugin::Git::Push",
"name" : "@RJBS/@Git/Push",
- "version" : "1.120370"
+ "version" : "2.001"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":InstallModules",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":IncModules",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":TestFiles",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ExecFiles",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ShareFiles",
- "version" : "4.300007"
+ "version" : "4.300028"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":MainModule",
- "version" : "4.300007"
+ "version" : "4.300028"
}
],
"zilla" : {
@@ -245,7 +266,7 @@
"config" : {
"is_trial" : "0"
},
- "version" : "4.300007"
+ "version" : "4.300028"
}
}
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/META.yml new/Getopt-Long-Descriptive-0.093/META.yml
--- old/Getopt-Long-Descriptive-0.091/META.yml 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/META.yml 2012-11-01 20:55:38.000000000 +0100
@@ -4,11 +4,13 @@
- 'Hans Dieter Pearcey '
- 'Ricardo Signes '
build_requires:
+ File::Find: 0
+ File::Temp: 0
Test::More: 0.96
configure_requires:
ExtUtils::MakeMaker: 6.30
dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.300007, CPAN::Meta::Converter version 2.120351'
+generated_by: 'Dist::Zilla version 4.300028, CPAN::Meta::Converter version 2.120921'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -29,101 +31,111 @@
resources:
homepage: https://github.com/rjbs/Getopt-Long-Descriptive
repository: https://github.com/rjbs/Getopt-Long-Descriptive.git
-version: 0.091
+version: 0.093
x_Dist_Zilla:
+ perl:
+ version: 5.017004
plugins:
-
+ class: Dist::Zilla::Plugin::Git::GatherDir
+ name: '@RJBS/Git::GatherDir'
+ version: 2.001
+ -
class: Dist::Zilla::Plugin::CheckPrereqsIndexed
name: '@RJBS/CheckPrereqsIndexed'
version: 0.007
-
- class: Dist::Zilla::Plugin::GatherDir
- name: '@RJBS/@Basic/GatherDir'
- version: 4.300007
+ class: Dist::Zilla::Plugin::CheckExtraTests
+ name: '@RJBS/CheckExtraTests'
+ version: 0.007
-
class: Dist::Zilla::Plugin::PruneCruft
- name: '@RJBS/@Basic/PruneCruft'
- version: 4.300007
+ name: '@RJBS/@Filter/PruneCruft'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::ManifestSkip
- name: '@RJBS/@Basic/ManifestSkip'
- version: 4.300007
+ name: '@RJBS/@Filter/ManifestSkip'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::MetaYAML
- name: '@RJBS/@Basic/MetaYAML'
- version: 4.300007
+ name: '@RJBS/@Filter/MetaYAML'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::License
- name: '@RJBS/@Basic/License'
- version: 4.300007
+ name: '@RJBS/@Filter/License'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::Readme
- name: '@RJBS/@Basic/Readme'
- version: 4.300007
- -
- class: Dist::Zilla::Plugin::ExtraTests
- name: '@RJBS/@Basic/ExtraTests'
- version: 4.300007
+ name: '@RJBS/@Filter/Readme'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::ExecDir
- name: '@RJBS/@Basic/ExecDir'
- version: 4.300007
+ name: '@RJBS/@Filter/ExecDir'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::ShareDir
- name: '@RJBS/@Basic/ShareDir'
- version: 4.300007
+ name: '@RJBS/@Filter/ShareDir'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::MakeMaker
- name: '@RJBS/@Basic/MakeMaker'
- version: 4.300007
+ name: '@RJBS/@Filter/MakeMaker'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::Manifest
- name: '@RJBS/@Basic/Manifest'
- version: 4.300007
+ name: '@RJBS/@Filter/Manifest'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::TestRelease
- name: '@RJBS/@Basic/TestRelease'
- version: 4.300007
+ name: '@RJBS/@Filter/TestRelease'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::ConfirmRelease
- name: '@RJBS/@Basic/ConfirmRelease'
- version: 4.300007
+ name: '@RJBS/@Filter/ConfirmRelease'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::UploadToCPAN
- name: '@RJBS/@Basic/UploadToCPAN'
- version: 4.300007
+ name: '@RJBS/@Filter/UploadToCPAN'
+ version: 4.300028
-
class: Dist::Zilla::Plugin::AutoPrereqs
name: '@RJBS/AutoPrereqs'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::Git::NextVersion
name: '@RJBS/Git::NextVersion'
- version: 1.120370
+ version: 2.001
-
class: Dist::Zilla::Plugin::PkgVersion
name: '@RJBS/PkgVersion'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::MetaConfig
name: '@RJBS/MetaConfig'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::MetaJSON
name: '@RJBS/MetaJSON'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::NextRelease
name: '@RJBS/NextRelease'
- version: 4.300007
+ version: 4.300028
+ -
+ class: Dist::Zilla::Plugin::Test::ChangesHasContent
+ name: '@RJBS/Test::ChangesHasContent'
+ version: 0.006
-
class: Dist::Zilla::Plugin::PodSyntaxTests
name: '@RJBS/PodSyntaxTests'
- version: 4.300007
+ version: 4.300028
-
- class: Dist::Zilla::Plugin::Repository
- name: '@RJBS/Repository'
- version: 0.18
+ class: Dist::Zilla::Plugin::Test::Compile
+ name: '@RJBS/Test::Compile'
+ version: 1.112820
+ -
+ class: Dist::Zilla::Plugin::ReportVersions::Tiny
+ name: '@RJBS/ReportVersions::Tiny'
+ version: 1.08
-
class: Dist::Zilla::Plugin::Prereqs
config:
@@ -131,7 +143,7 @@
phase: test
type: requires
name: '@RJBS/TestMoreWithSubtests'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::PodWeaver
name: '@RJBS/PodWeaver'
@@ -143,45 +155,45 @@
-
class: Dist::Zilla::Plugin::Git::Check
name: '@RJBS/@Git/Check'
- version: 1.120370
+ version: 2.001
-
class: Dist::Zilla::Plugin::Git::Commit
name: '@RJBS/@Git/Commit'
- version: 1.120370
+ version: 2.001
-
class: Dist::Zilla::Plugin::Git::Tag
name: '@RJBS/@Git/Tag'
- version: 1.120370
+ version: 2.001
-
class: Dist::Zilla::Plugin::Git::Push
name: '@RJBS/@Git/Push'
- version: 1.120370
+ version: 2.001
-
class: Dist::Zilla::Plugin::FinderCode
name: ':InstallModules'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::FinderCode
name: ':IncModules'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::FinderCode
name: ':TestFiles'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ExecFiles'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ShareFiles'
- version: 4.300007
+ version: 4.300028
-
class: Dist::Zilla::Plugin::FinderCode
name: ':MainModule'
- version: 4.300007
+ version: 4.300028
zilla:
class: Dist::Zilla::Dist::Builder
config:
is_trial: 0
- version: 4.300007
+ version: 4.300028
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/Makefile.PL new/Getopt-Long-Descriptive-0.093/Makefile.PL
--- old/Getopt-Long-Descriptive-0.091/Makefile.PL 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/Makefile.PL 2012-11-01 20:55:38.000000000 +0100
@@ -12,6 +12,8 @@
"ABSTRACT" => "Getopt::Long, but simpler and more powerful",
"AUTHOR" => "Hans Dieter Pearcey , Ricardo Signes ",
"BUILD_REQUIRES" => {
+ "File::Find" => 0,
+ "File::Temp" => 0,
"Test::More" => "0.96"
},
"CONFIGURE_REQUIRES" => {
@@ -34,7 +36,7 @@
"strict" => 0,
"warnings" => 0
},
- "VERSION" => "0.091",
+ "VERSION" => "0.093",
"test" => {
"TESTS" => "t/*.t"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/README new/Getopt-Long-Descriptive-0.093/README
--- old/Getopt-Long-Descriptive-0.091/README 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/README 2012-11-01 20:55:38.000000000 +0100
@@ -1,7 +1,7 @@
This archive contains the distribution Getopt-Long-Descriptive,
-version 0.091:
+version 0.093:
Getopt::Long, but simpler and more powerful
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive/Opts.pm new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive/Opts.pm
--- old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive/Opts.pm 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive/Opts.pm 2012-11-01 20:55:38.000000000 +0100
@@ -2,7 +2,7 @@
use warnings;
package Getopt::Long::Descriptive::Opts;
{
- $Getopt::Long::Descriptive::Opts::VERSION = '0.091';
+ $Getopt::Long::Descriptive::Opts::VERSION = '0.093';
}
# ABSTRACT: object representing command line switches
@@ -98,6 +98,7 @@
1;
__END__
+
=pod
=head1 NAME
@@ -106,7 +107,7 @@
=head1 VERSION
-version 0.091
+version 0.093
=head1 DESCRIPTION
@@ -166,4 +167,3 @@
the same terms as the Perl 5 programming language system itself.
=cut
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive/Usage.pm new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive/Usage.pm
--- old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive/Usage.pm 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive/Usage.pm 2012-11-01 20:55:38.000000000 +0100
@@ -2,7 +2,7 @@
use warnings;
package Getopt::Long::Descriptive::Usage;
{
- $Getopt::Long::Descriptive::Usage::VERSION = '0.091';
+ $Getopt::Long::Descriptive::Usage::VERSION = '0.093';
}
# ABSTRACT: the usage description for GLD
@@ -117,6 +117,7 @@
1;
__END__
+
=pod
=head1 NAME
@@ -125,7 +126,7 @@
=head1 VERSION
-version 0.091
+version 0.093
=head1 SYNOPSIS
@@ -206,4 +207,3 @@
the same terms as the Perl 5 programming language system itself.
=cut
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive.pm new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive.pm
--- old/Getopt-Long-Descriptive-0.091/lib/Getopt/Long/Descriptive.pm 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/lib/Getopt/Long/Descriptive.pm 2012-11-01 20:55:38.000000000 +0100
@@ -2,7 +2,7 @@
use warnings;
package Getopt::Long::Descriptive;
{
- $Getopt::Long::Descriptive::VERSION = '0.091';
+ $Getopt::Long::Descriptive::VERSION = '0.093';
}
# ABSTRACT: Getopt::Long, but simpler and more powerful
@@ -133,6 +133,13 @@
# not entirely sure that all of this (until the Usage->new) shouldn't be
# moved into Usage -- rjbs, 2009-08-19
+
+ # all specs including hidden
+ my @getopt_specs =
+ map { $_->{spec} }
+ grep { $_->{desc} ne 'spacer' }
+ @opts;
+
my @specs =
map { $_->{spec} }
grep { $_->{desc} ne 'spacer' }
@@ -156,7 +163,12 @@
),
);
- (my $str = $format) =~ s/%(.)/$replace{$1}/ge;
+ (my $str = $format) =~ s<%(.)><
+ defined $replace{$1}
+ ? $replace{$1}
+ : Carp::croak("unknown sequence %$1 in first argument to describe_options")
+ >ge;
+
$str =~ s/\s{2,}/ /g;
my $usage = $class->usage_class->new({
@@ -167,7 +179,7 @@
Getopt::Long::Configure(@go_conf);
my %return;
- $usage->die unless GetOptions(\%return, grep { length } @specs);
+ $usage->die unless GetOptions(\%return, grep { length } @getopt_specs);
my @given_keys = keys %return;
for my $opt (keys %return) {
@@ -346,6 +358,7 @@
1; # End of Getopt::Long::Descriptive
__END__
+
=pod
=head1 NAME
@@ -354,7 +367,7 @@
=head1 VERSION
-version 0.091
+version 0.093
=head1 SYNOPSIS
@@ -630,4 +643,3 @@
the same terms as the Perl 5 programming language system itself.
=cut
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/t/00-compile.t new/Getopt-Long-Descriptive-0.093/t/00-compile.t
--- old/Getopt-Long-Descriptive-0.091/t/00-compile.t 1970-01-01 01:00:00.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/t/00-compile.t 2012-11-01 20:55:38.000000000 +0100
@@ -0,0 +1,73 @@
+#!perl
+
+use strict;
+use warnings;
+
+use Test::More;
+
+
+
+use File::Find;
+use File::Temp qw{ tempdir };
+
+my @modules;
+find(
+ sub {
+ return if $File::Find::name !~ /\.pm\z/;
+ my $found = $File::Find::name;
+ $found =~ s{^lib/}{};
+ $found =~ s{[/\\]}{::}g;
+ $found =~ s/\.pm$//;
+ # nothing to skip
+ push @modules, $found;
+ },
+ 'lib',
+);
+
+sub _find_scripts {
+ my $dir = shift @_;
+
+ my @found_scripts = ();
+ find(
+ sub {
+ return unless -f;
+ my $found = $File::Find::name;
+ # nothing to skip
+ open my $FH, '<', $_ or do {
+ note( "Unable to open $found in ( $! ), skipping" );
+ return;
+ };
+ my $shebang = <$FH>;
+ return unless $shebang =~ /^#!.*?\bperl\b\s*$/;
+ push @found_scripts, $found;
+ },
+ $dir,
+ );
+
+ return @found_scripts;
+}
+
+my @scripts;
+do { push @scripts, _find_scripts($_) if -d $_ }
+ for qw{ bin script scripts };
+
+my $plan = scalar(@modules) + scalar(@scripts);
+$plan ? (plan tests => $plan) : (plan skip_all => "no tests to run");
+
+{
+ # fake home for cpan-testers
+ # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
+
+ like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" )
+ for sort @modules;
+
+ SKIP: {
+ eval "use Test::Script 1.05; 1;";
+ skip "Test::Script needed to test script compilation", scalar(@scripts) if $@;
+ foreach my $file ( @scripts ) {
+ my $script = $file;
+ $script =~ s!.*/!!;
+ script_compiles( $file, "$script script compiles" );
+ }
+ }
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/t/00-load.t new/Getopt-Long-Descriptive-0.093/t/00-load.t
--- old/Getopt-Long-Descriptive-0.091/t/00-load.t 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/t/00-load.t 1970-01-01 01:00:00.000000000 +0100
@@ -1,9 +0,0 @@
-#!perl -T
-
-use Test::More tests => 1;
-
-BEGIN {
- use_ok( 'Getopt::Long::Descriptive' );
-}
-
-diag( "Testing Getopt::Long::Descriptive $Getopt::Long::Descriptive::VERSION, Perl $], $^X" );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/t/000-report-versions-tiny.t new/Getopt-Long-Descriptive-0.093/t/000-report-versions-tiny.t
--- old/Getopt-Long-Descriptive-0.091/t/000-report-versions-tiny.t 1970-01-01 01:00:00.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/t/000-report-versions-tiny.t 2012-11-01 20:55:38.000000000 +0100
@@ -0,0 +1,86 @@
+use strict;
+use warnings;
+use Test::More 0.88;
+# This is a relatively nice way to avoid Test::NoWarnings breaking our
+# expectations by adding extra tests, without using no_plan. It also helps
+# avoid any other test module that feels introducing random tests, or even
+# test plans, is a nice idea.
+our $success = 0;
+END { $success && done_testing; }
+
+# List our own version used to generate this
+my $v = "\nGenerated by Dist::Zilla::Plugin::ReportVersions::Tiny v1.08\n";
+
+eval { # no excuses!
+ # report our Perl details
+ my $want = "any version";
+ $v .= "perl: $] (wanted $want) on $^O from $^X\n\n";
+};
+defined($@) and diag("$@");
+
+# Now, our module version dependencies:
+sub pmver {
+ my ($module, $wanted) = @_;
+ $wanted = " (want $wanted)";
+ my $pmver;
+ eval "require $module;";
+ if ($@) {
+ if ($@ =~ m/Can't locate .* in \@INC/) {
+ $pmver = 'module not found.';
+ } else {
+ diag("${module}: $@");
+ $pmver = 'died during require.';
+ }
+ } else {
+ my $version;
+ eval { $version = $module->VERSION; };
+ if ($@) {
+ diag("${module}: $@");
+ $pmver = 'died during VERSION check.';
+ } elsif (defined $version) {
+ $pmver = "$version";
+ } else {
+ $pmver = '<undef>';
+ }
+ }
+
+ # So, we should be good, right?
+ return sprintf('%-45s => %-10s%-15s%s', $module, $pmver, $wanted, "\n");
+}
+
+eval { $v .= pmver('Carp','any version') };
+eval { $v .= pmver('ExtUtils::MakeMaker','6.30') };
+eval { $v .= pmver('File::Basename','any version') };
+eval { $v .= pmver('File::Find','any version') };
+eval { $v .= pmver('File::Temp','any version') };
+eval { $v .= pmver('Getopt::Long','2.33') };
+eval { $v .= pmver('List::Util','any version') };
+eval { $v .= pmver('Params::Validate','0.97') };
+eval { $v .= pmver('Scalar::Util','any version') };
+eval { $v .= pmver('Sub::Exporter','0.972') };
+eval { $v .= pmver('Sub::Exporter::Util','any version') };
+eval { $v .= pmver('Test::More','0.96') };
+eval { $v .= pmver('Test::Pod','1.41') };
+eval { $v .= pmver('overload','any version') };
+eval { $v .= pmver('strict','any version') };
+eval { $v .= pmver('version','0.9901') };
+eval { $v .= pmver('warnings','any version') };
+
+
+# All done.
+$v .= <<'EOT';
+
+Thanks for using my code. I hope it works for you.
+If not, please try and include this output in the bug report.
+That will help me reproduce the issue and solve your problem.
+
+EOT
+
+diag($v);
+ok(1, "we really didn't test anything, just reporting data");
+$success = 1;
+
+# Work around another nasty module on CPAN. :/
+no warnings 'once';
+$Template::Test::NO_FLUSH = 1;
+exit 0;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/t/descriptive.t new/Getopt-Long-Descriptive-0.093/t/descriptive.t
--- old/Getopt-Long-Descriptive-0.091/t/descriptive.t 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/t/descriptive.t 2012-11-01 20:55:38.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
use warnings;
-use Test::More tests => 40;
+use Test::More tests => 42;
use_ok("Getopt::Long::Descriptive");
@@ -16,7 +16,7 @@
sub is_opt {
my ($argv, $specs, $expect, $desc) = @_;
local @ARGV = @$argv;
- eval {
+ eval {
my ($opt, $usage) = describe_options(
"test %o",
@$specs,
@@ -30,7 +30,7 @@
for my $key (keys %$expect) {
is($opt->$key, $expect->{$key}, "...->$key");
}
- };
+ };
if ($@) {
chomp($@);
if (ref($expect) eq 'Regexp') {
@@ -86,17 +86,24 @@
qr/a bar option/,
);
+is_opt(
+ [ '--nora' ],
+ [ [ "nora", "Invisible Nora", { hidden => 1 } ] ],
+ { nora => 1 },
+ "",
+);
+
### tests for one_of
-my $foobar = [
+my $foobar = [
[ 'foo' => 'a foo option' ],
[ 'bar' => 'a bar option' ],
];
is_opt(
[ ],
- [
- [
+ [
+ [
mode => $foobar, { default => 'foo' },
],
],
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/t/release-pod-syntax.t new/Getopt-Long-Descriptive-0.093/t/release-pod-syntax.t
--- old/Getopt-Long-Descriptive-0.091/t/release-pod-syntax.t 2012-02-23 00:15:15.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/t/release-pod-syntax.t 1970-01-01 01:00:00.000000000 +0100
@@ -1,15 +0,0 @@
-#!perl
-
-BEGIN {
- unless ($ENV{RELEASE_TESTING}) {
- require Test::More;
- Test::More::plan(skip_all => 'these tests are for release candidate testing');
- }
-}
-
-use Test::More;
-
-eval "use Test::Pod 1.41";
-plan skip_all => "Test::Pod 1.41 required for testing POD" if $@;
-
-all_pod_files_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/xt/release/changes_has_content.t new/Getopt-Long-Descriptive-0.093/xt/release/changes_has_content.t
--- old/Getopt-Long-Descriptive-0.091/xt/release/changes_has_content.t 1970-01-01 01:00:00.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/xt/release/changes_has_content.t 2012-11-01 20:55:38.000000000 +0100
@@ -0,0 +1,41 @@
+#!perl
+
+use Test::More tests => 2;
+
+note 'Checking Changes';
+my $changes_file = 'Changes';
+my $newver = '0.093';
+my $trial_token = '-TRIAL';
+
+SKIP: {
+ ok(-e $changes_file, "$changes_file file exists")
+ or skip 'Changes is missing', 1;
+
+ ok(_get_changes($newver), "$changes_file has content for $newver");
+}
+
+done_testing;
+
+# _get_changes copied and adapted from Dist::Zilla::Plugin::Git::Commit
+# by Jerome Quelin
+sub _get_changes
+{
+ my $newver = shift;
+
+ # parse changelog to find commit message
+ open(my $fh, '<', $changes_file) or die "cannot open $changes_file: $!";
+ my $changelog = join('', <$fh>);
+ close $fh;
+
+ my @content =
+ grep { /^$newver(?:$trial_token)?(?:\s+|$)/ ... /^\S/ } # from newver to un-indented
+ split /\n/, $changelog;
+ shift @content; # drop the version line
+
+ # drop unindented last line and trailing blank lines
+ pop @content while ( @content && $content[-1] =~ /^(?:\S|\s*$)/ );
+
+ # return number of non-blank lines
+ return scalar @content;
+}
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Getopt-Long-Descriptive-0.091/xt/release/pod-syntax.t new/Getopt-Long-Descriptive-0.093/xt/release/pod-syntax.t
--- old/Getopt-Long-Descriptive-0.091/xt/release/pod-syntax.t 1970-01-01 01:00:00.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.093/xt/release/pod-syntax.t 2012-11-01 20:55:38.000000000 +0100
@@ -0,0 +1,7 @@
+#!perl
+use Test::More;
+
+eval "use Test::Pod 1.41";
+plan skip_all => "Test::Pod 1.41 required for testing POD" if $@;
+
+all_pod_files_ok();
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org