Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Getopt-Long-Descriptive for
openSUSE:Factory checked in at 2021-03-18 22:54:42
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Getopt-Long-Descriptive (Old)
and /work/SRC/openSUSE:Factory/.perl-Getopt-Long-Descriptive.new.2401
(New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Getopt-Long-Descriptive"
Thu Mar 18 22:54:42 2021 rev:22 rq:879714 version:0.109
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Getopt-Long-Descriptive/perl-Getopt-Long-Descriptive.changes
2020-02-27 14:38:58.342234610 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Getopt-Long-Descriptive.new.2401/perl-Getopt-Long-Descriptive.changes
2021-03-18 22:54:46.635520251 +0100
@@ -1,0 +2,32 @@
+Wed Mar 17 03:06:34 UTC 2021 - Tina M??ller <[email protected]>
+
+- updated to 0.109
+ see /usr/share/doc/packages/perl-Getopt-Long-Descriptive/Changes
+
+ 0.109 2021-03-16 19:55:45-04:00 America/New_York
+ - eliminate warnings-count failure by requiring an
ExtUtils::MakeMaker
+ from late 2013 or later; without this, very old EUMM could pass -w
+ to the tests, enabling more warnings than we wanted (thanks,
Matthew
+ Horsfall and Graham Knop!)
+
+ 0.108 2021-03-16 09:54:51-04:00 America/New_York
+ - provide diagnostics in tests when more warnings arrive than are
+ expected
+
+-------------------------------------------------------------------
+Mon Mar 15 03:08:40 UTC 2021 - Tina M??ller <[email protected]>
+
+- updated to 0.107
+ see /usr/share/doc/packages/perl-Getopt-Long-Descriptive/Changes
+
+ 0.107 2021-03-14 16:15:57-04:00 America/New_York
+ - Term::ReadKey has been dropped; caused too many problems
+ - minimum version is now v5.10.1, not v5.10.0
+
+ 0.106 2021-03-12 21:29:54-05:00 America/New_York
+ - improved formatting of switches
+ - when available, use Term::ReadKey to get terminal width
+ - when an option name is defined twice, warn about it
+ THIS WILL BECOME FATAL IN A FUTURE VERSION
+
+-------------------------------------------------------------------
Old:
----
Getopt-Long-Descriptive-0.105.tar.gz
New:
----
Getopt-Long-Descriptive-0.109.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Getopt-Long-Descriptive.spec ++++++
--- /var/tmp/diff_new_pack.ppwKT6/_old 2021-03-18 22:54:47.183520843 +0100
+++ /var/tmp/diff_new_pack.ppwKT6/_new 2021-03-18 22:54:47.187520847 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Getopt-Long-Descriptive
#
-# Copyright (c) 2020 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2021 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -16,18 +16,16 @@
#
+%define cpan_name Getopt-Long-Descriptive
Name: perl-Getopt-Long-Descriptive
-Version: 0.105
+Version: 0.109
Release: 0
-%define cpan_name Getopt-Long-Descriptive
Summary: Getopt::Long, but simpler and more powerful
License: Artistic-1.0 OR GPL-1.0-or-later
-Group: Development/Libraries/Perl
-Url: https://metacpan.org/release/%{cpan_name}
+URL: https://metacpan.org/release/%{cpan_name}
Source0:
https://cpan.metacpan.org/authors/id/R/RJ/RJBS/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
BuildArch: noarch
-BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(CPAN::Meta::Check) >= 0.011
@@ -52,11 +50,11 @@
useful features.
%prep
-%setup -q -n %{cpan_name}-%{version}
+%autosetup -n %{cpan_name}-%{version}
%build
perl Makefile.PL INSTALLDIRS=vendor
-make %{?_smp_mflags}
+%make_build
%check
make test
@@ -67,7 +65,6 @@
%perl_gen_filelist
%files -f %{name}.files
-%defattr(-,root,root,755)
%doc Changes README
%license LICENSE
++++++ Getopt-Long-Descriptive-0.105.tar.gz ->
Getopt-Long-Descriptive-0.109.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/Changes
new/Getopt-Long-Descriptive-0.109/Changes
--- old/Getopt-Long-Descriptive-0.105/Changes 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/Changes 2021-03-17 00:55:48.000000000
+0100
@@ -1,5 +1,25 @@
Revision history for Getopt-Long-Descriptive
+0.109 2021-03-16 19:55:45-04:00 America/New_York
+ - eliminate warnings-count failure by requiring an ExtUtils::MakeMaker
+ from late 2013 or later; without this, very old EUMM could pass -w
+ to the tests, enabling more warnings than we wanted (thanks, Matthew
+ Horsfall and Graham Knop!)
+
+0.108 2021-03-16 09:54:51-04:00 America/New_York
+ - provide diagnostics in tests when more warnings arrive than are
+ expected
+
+0.107 2021-03-14 16:15:57-04:00 America/New_York
+ - Term::ReadKey has been dropped; caused too many problems
+ - minimum version is now v5.10.1, not v5.10.0
+
+0.106 2021-03-12 21:29:54-05:00 America/New_York
+ - improved formatting of switches
+ - when available, use Term::ReadKey to get terminal width
+ - when an option name is defined twice, warn about it
+ THIS WILL BECOME FATAL IN A FUTURE VERSION
+
0.105 2020-02-26 09:40:36+11:00 Australia/Melbourne
- one_of suboptions now get accessors (thanks, Michael McClimon!)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/MANIFEST
new/Getopt-Long-Descriptive-0.109/MANIFEST
--- old/Getopt-Long-Descriptive-0.105/MANIFEST 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/MANIFEST 2021-03-17 00:55:48.000000000
+0100
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.012.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.017.
Changes
LICENSE
MANIFEST
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/META.json
new/Getopt-Long-Descriptive-0.109/META.json
--- old/Getopt-Long-Descriptive-0.105/META.json 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/META.json 2021-03-17 00:55:48.000000000
+0100
@@ -5,7 +5,7 @@
"Ricardo Signes <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "Dist::Zilla version 6.012, CPAN::Meta::Converter version
2.150010",
+ "generated_by" : "Dist::Zilla version 6.017, CPAN::Meta::Converter version
2.150010",
"license" : [
"perl_5"
],
@@ -17,7 +17,7 @@
"prereqs" : {
"configure" : {
"requires" : {
- "ExtUtils::MakeMaker" : "0"
+ "ExtUtils::MakeMaker" : "6.78"
}
},
"develop" : {
@@ -38,6 +38,7 @@
"Sub::Exporter" : "0.972",
"Sub::Exporter::Util" : "0",
"overload" : "0",
+ "perl" : "v5.10.1",
"strict" : "0",
"warnings" : "0"
}
@@ -69,10 +70,10 @@
"web" : "https://github.com/rjbs/Getopt-Long-Descriptive";
}
},
- "version" : "0.105",
+ "version" : "0.109",
"x_Dist_Zilla" : {
"perl" : {
- "version" : "5.030001"
+ "version" : "5.032000"
},
"plugins" : [
{
@@ -92,7 +93,7 @@
}
},
"name" : "@RJBS/Git::GatherDir",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::CheckPrereqsIndexed",
@@ -119,7 +120,7 @@
}
},
"name" : "@RJBS/RJBS-Outdated",
- "version" : "0.055"
+ "version" : "0.057"
},
{
"class" : "Dist::Zilla::Plugin::PromptIfStale",
@@ -134,62 +135,62 @@
}
},
"name" : "@RJBS/CPAN-Outdated",
- "version" : "0.055"
+ "version" : "0.057"
},
{
"class" : "Dist::Zilla::Plugin::PruneCruft",
"name" : "@RJBS/@Filter/PruneCruft",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::ManifestSkip",
"name" : "@RJBS/@Filter/ManifestSkip",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::MetaYAML",
"name" : "@RJBS/@Filter/MetaYAML",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::License",
"name" : "@RJBS/@Filter/License",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::Readme",
"name" : "@RJBS/@Filter/Readme",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::ExecDir",
"name" : "@RJBS/@Filter/ExecDir",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::ShareDir",
"name" : "@RJBS/@Filter/ShareDir",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::Manifest",
"name" : "@RJBS/@Filter/Manifest",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::TestRelease",
"name" : "@RJBS/@Filter/TestRelease",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::ConfirmRelease",
"name" : "@RJBS/@Filter/ConfirmRelease",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::UploadToCPAN",
"name" : "@RJBS/@Filter/UploadToCPAN",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::MakeMaker",
@@ -199,48 +200,48 @@
}
},
"name" : "@RJBS/MakeMaker",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::AutoPrereqs",
"name" : "@RJBS/AutoPrereqs",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::Git::NextVersion",
"config" : {
"Dist::Zilla::Plugin::Git::NextVersion" : {
"first_version" : "0.001",
- "version_by_branch" : 0,
+ "version_by_branch" : 1,
"version_regexp" : "(?^:^([0-9]+\\.[0-9]+)$)"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"repo_root" : "."
}
},
"name" : "@RJBS/Git::NextVersion",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::PkgVersion",
"name" : "@RJBS/PkgVersion",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::MetaConfig",
"name" : "@RJBS/MetaConfig",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::MetaJSON",
"name" : "@RJBS/MetaJSON",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::NextRelease",
"name" : "@RJBS/NextRelease",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::Test::ChangesHasContent",
@@ -250,12 +251,12 @@
{
"class" : "Dist::Zilla::Plugin::PodSyntaxTests",
"name" : "@RJBS/PodSyntaxTests",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::Test::ReportPrereqs",
"name" : "@RJBS/Test::ReportPrereqs",
- "version" : "0.027"
+ "version" : "0.028"
},
{
"class" : "Dist::Zilla::Plugin::Prereqs",
@@ -266,7 +267,7 @@
}
},
"name" : "@RJBS/TestMoreWithSubtests",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::PodWeaver",
@@ -401,19 +402,20 @@
"changelog" : "Changes"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"repo_root" : "."
}
},
"name" : "@RJBS/@Git/Check",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::Git::Commit",
"config" : {
"Dist::Zilla::Plugin::Git::Commit" : {
"add_files_in" : [],
- "commit_msg" : "v%V%n%n%c"
+ "commit_msg" : "v%V%n%n%c",
+ "signoff" : 0
},
"Dist::Zilla::Role::Git::DirtyFiles" : {
"allow_dirty" : [
@@ -424,7 +426,7 @@
"changelog" : "Changes"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"repo_root" : "."
},
"Dist::Zilla::Role::Git::StringFormatter" : {
@@ -432,7 +434,7 @@
}
},
"name" : "@RJBS/@Git/Commit",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::Git::Tag",
@@ -441,12 +443,12 @@
"branch" : null,
"changelog" : "Changes",
"signed" : 0,
- "tag" : "0.105",
+ "tag" : "0.109",
"tag_format" : "%v",
"tag_message" : "v%V"
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"repo_root" : "."
},
"Dist::Zilla::Role::Git::StringFormatter" : {
@@ -454,31 +456,30 @@
}
},
"name" : "@RJBS/@Git/Tag",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::Git::Push",
"config" : {
"Dist::Zilla::Plugin::Git::Push" : {
"push_to" : [
- "origin :",
"github :"
],
"remotes_must_exist" : 0
},
"Dist::Zilla::Role::Git::Repo" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"repo_root" : "."
}
},
"name" : "@RJBS/@Git/Push",
- "version" : "2.046"
+ "version" : "2.047"
},
{
"class" : "Dist::Zilla::Plugin::Git::Contributors",
"config" : {
"Dist::Zilla::Plugin::Git::Contributors" : {
- "git_version" : "2.25.0",
+ "git_version" : "2.24.3 (Apple Git-128)",
"include_authors" : 0,
"include_releaser" : 1,
"order_by" : "name",
@@ -486,7 +487,7 @@
}
},
"name" : "@RJBS/Git::Contributors",
- "version" : "0.035"
+ "version" : "0.036"
},
{
"class" : "Dist::Zilla::Plugin::Breaks",
@@ -503,7 +504,7 @@
"no_forced_deps" : 0
},
"Dist::Zilla::Role::ModuleMetadata" : {
- "Module::Metadata" : "1.000036",
+ "Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
@@ -511,54 +512,65 @@
"version" : "0.019"
},
{
+ "class" : "Dist::Zilla::Plugin::Prereqs",
+ "config" : {
+ "Dist::Zilla::Plugin::Prereqs" : {
+ "phase" : "configure",
+ "type" : "requires"
+ }
+ },
+ "name" : "ConfigureRequires",
+ "version" : "6.017"
+ },
+ {
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":InstallModules",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":IncModules",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":TestFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ExtraTestFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ExecFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":PerlExecFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ShareFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":MainModule",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":AllFiles",
- "version" : "6.012"
+ "version" : "6.017"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":NoFiles",
- "version" : "6.012"
+ "version" : "6.017"
}
],
"zilla" : {
@@ -566,7 +578,7 @@
"config" : {
"is_trial" : 0
},
- "version" : "6.012"
+ "version" : "6.017"
}
},
"x_breaks" : {
@@ -584,12 +596,14 @@
"Michael McClimon <[email protected]>",
"Niels Thykier <[email protected]>",
"Olaf Alders <[email protected]>",
+ "Ricardo Signes <[email protected]>",
"Roman Hubacek <[email protected]>",
"Smylers <[email protected]>",
"Thomas Neumann <[email protected]>",
"zhouzhen1 <[email protected]>"
],
- "x_generated_by_perl" : "v5.30.1",
- "x_serialization_backend" : "Cpanel::JSON::XS version 4.18"
+ "x_generated_by_perl" : "v5.32.0",
+ "x_serialization_backend" : "Cpanel::JSON::XS version 4.25",
+ "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/META.yml
new/Getopt-Long-Descriptive-0.109/META.yml
--- old/Getopt-Long-Descriptive-0.105/META.yml 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/META.yml 2021-03-17 00:55:48.000000000
+0100
@@ -12,9 +12,9 @@
Test::More: '0.96'
Test::Warnings: '0.005'
configure_requires:
- ExtUtils::MakeMaker: '0'
+ ExtUtils::MakeMaker: '6.78'
dynamic_config: 0
-generated_by: 'Dist::Zilla version 6.012, CPAN::Meta::Converter version
2.150010'
+generated_by: 'Dist::Zilla version 6.017, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -30,16 +30,17 @@
Sub::Exporter: '0.972'
Sub::Exporter::Util: '0'
overload: '0'
+ perl: v5.10.1
strict: '0'
warnings: '0'
resources:
bugtracker: https://github.com/rjbs/Getopt-Long-Descriptive/issues
homepage: https://github.com/rjbs/Getopt-Long-Descriptive
repository: https://github.com/rjbs/Getopt-Long-Descriptive.git
-version: '0.105'
+version: '0.109'
x_Dist_Zilla:
perl:
- version: '5.030001'
+ version: '5.032000'
plugins:
-
class: Dist::Zilla::Plugin::Git::GatherDir
@@ -55,7 +56,7 @@
Dist::Zilla::Plugin::Git::GatherDir:
include_untracked: 0
name: '@RJBS/Git::GatherDir'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::CheckPrereqsIndexed
name: '@RJBS/CheckPrereqsIndexed'
@@ -76,7 +77,7 @@
run_under_travis: 0
skip: []
name: '@RJBS/RJBS-Outdated'
- version: '0.055'
+ version: '0.057'
-
class: Dist::Zilla::Plugin::PromptIfStale
config:
@@ -88,90 +89,90 @@
run_under_travis: 0
skip: []
name: '@RJBS/CPAN-Outdated'
- version: '0.055'
+ version: '0.057'
-
class: Dist::Zilla::Plugin::PruneCruft
name: '@RJBS/@Filter/PruneCruft'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::ManifestSkip
name: '@RJBS/@Filter/ManifestSkip'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::MetaYAML
name: '@RJBS/@Filter/MetaYAML'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::License
name: '@RJBS/@Filter/License'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::Readme
name: '@RJBS/@Filter/Readme'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::ExecDir
name: '@RJBS/@Filter/ExecDir'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::ShareDir
name: '@RJBS/@Filter/ShareDir'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::Manifest
name: '@RJBS/@Filter/Manifest'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::TestRelease
name: '@RJBS/@Filter/TestRelease'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::ConfirmRelease
name: '@RJBS/@Filter/ConfirmRelease'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::UploadToCPAN
name: '@RJBS/@Filter/UploadToCPAN'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::MakeMaker
config:
Dist::Zilla::Role::TestRunner:
default_jobs: 9
name: '@RJBS/MakeMaker'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::AutoPrereqs
name: '@RJBS/AutoPrereqs'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::Git::NextVersion
config:
Dist::Zilla::Plugin::Git::NextVersion:
first_version: '0.001'
- version_by_branch: 0
+ version_by_branch: 1
version_regexp: (?^:^([0-9]+\.[0-9]+)$)
Dist::Zilla::Role::Git::Repo:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
repo_root: .
name: '@RJBS/Git::NextVersion'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::PkgVersion
name: '@RJBS/PkgVersion'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::MetaConfig
name: '@RJBS/MetaConfig'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::MetaJSON
name: '@RJBS/MetaJSON'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::NextRelease
name: '@RJBS/NextRelease'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::Test::ChangesHasContent
name: '@RJBS/Test::ChangesHasContent'
@@ -179,11 +180,11 @@
-
class: Dist::Zilla::Plugin::PodSyntaxTests
name: '@RJBS/PodSyntaxTests'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::Test::ReportPrereqs
name: '@RJBS/Test::ReportPrereqs'
- version: '0.027'
+ version: '0.028'
-
class: Dist::Zilla::Plugin::Prereqs
config:
@@ -191,7 +192,7 @@
phase: test
type: requires
name: '@RJBS/TestMoreWithSubtests'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::PodWeaver
config:
@@ -296,16 +297,17 @@
allow_dirty_match: []
changelog: Changes
Dist::Zilla::Role::Git::Repo:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
repo_root: .
name: '@RJBS/@Git/Check'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::Git::Commit
config:
Dist::Zilla::Plugin::Git::Commit:
add_files_in: []
commit_msg: v%V%n%n%c
+ signoff: '0'
Dist::Zilla::Role::Git::DirtyFiles:
allow_dirty:
- Changes
@@ -313,12 +315,12 @@
allow_dirty_match: []
changelog: Changes
Dist::Zilla::Role::Git::Repo:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
repo_root: .
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
name: '@RJBS/@Git/Commit'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::Git::Tag
config:
@@ -326,40 +328,39 @@
branch: ~
changelog: Changes
signed: 0
- tag: '0.105'
+ tag: '0.109'
tag_format: '%v'
tag_message: v%V
Dist::Zilla::Role::Git::Repo:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
repo_root: .
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
name: '@RJBS/@Git/Tag'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::Git::Push
config:
Dist::Zilla::Plugin::Git::Push:
push_to:
- - 'origin :'
- 'github :'
remotes_must_exist: 0
Dist::Zilla::Role::Git::Repo:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
repo_root: .
name: '@RJBS/@Git/Push'
- version: '2.046'
+ version: '2.047'
-
class: Dist::Zilla::Plugin::Git::Contributors
config:
Dist::Zilla::Plugin::Git::Contributors:
- git_version: 2.25.0
+ git_version: '2.24.3 (Apple Git-128)'
include_authors: 0
include_releaser: 1
order_by: name
paths: []
name: '@RJBS/Git::Contributors'
- version: '0.035'
+ version: '0.036'
-
class: Dist::Zilla::Plugin::Breaks
name: Breaks
@@ -372,55 +373,63 @@
- Moose::Conflicts
no_forced_deps: 0
Dist::Zilla::Role::ModuleMetadata:
- Module::Metadata: '1.000036'
+ Module::Metadata: '1.000037'
version: '0.006'
name: Test::CheckBreaks
version: '0.019'
-
+ class: Dist::Zilla::Plugin::Prereqs
+ config:
+ Dist::Zilla::Plugin::Prereqs:
+ phase: configure
+ type: requires
+ name: ConfigureRequires
+ version: '6.017'
+ -
class: Dist::Zilla::Plugin::FinderCode
name: ':InstallModules'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':IncModules'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':TestFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ExtraTestFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ExecFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':PerlExecFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ShareFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':MainModule'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':AllFiles'
- version: '6.012'
+ version: '6.017'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':NoFiles'
- version: '6.012'
+ version: '6.017'
zilla:
class: Dist::Zilla::Dist::Builder
config:
is_trial: '0'
- version: '6.012'
+ version: '6.017'
x_breaks:
MooseX::Getopt: '< 0.66'
x_contributors:
@@ -435,9 +444,11 @@
- 'Michael McClimon <[email protected]>'
- 'Niels Thykier <[email protected]>'
- 'Olaf Alders <[email protected]>'
+ - 'Ricardo Signes <[email protected]>'
- 'Roman Hubacek <[email protected]>'
- 'Smylers <[email protected]>'
- 'Thomas Neumann <[email protected]>'
- 'zhouzhen1 <[email protected]>'
-x_generated_by_perl: v5.30.1
+x_generated_by_perl: v5.32.0
x_serialization_backend: 'YAML::Tiny version 1.73'
+x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/Makefile.PL
new/Getopt-Long-Descriptive-0.109/Makefile.PL
--- old/Getopt-Long-Descriptive-0.105/Makefile.PL 2020-02-25
23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/Makefile.PL 2021-03-17
00:55:48.000000000 +0100
@@ -1,8 +1,8 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.012.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.017.
use strict;
use warnings;
-
+use 5.010001;
use ExtUtils::MakeMaker;
@@ -10,10 +10,11 @@
"ABSTRACT" => "Getopt::Long, but simpler and more powerful",
"AUTHOR" => "Hans Dieter Pearcey <hdp\@cpan.org>, Ricardo Signes
<rjbs\@cpan.org>",
"CONFIGURE_REQUIRES" => {
- "ExtUtils::MakeMaker" => 0
+ "ExtUtils::MakeMaker" => "6.78"
},
"DISTNAME" => "Getopt-Long-Descriptive",
"LICENSE" => "perl",
+ "MIN_PERL_VERSION" => "5.010001",
"NAME" => "Getopt::Long::Descriptive",
"PREREQ_PM" => {
"Carp" => 0,
@@ -37,7 +38,7 @@
"Test::More" => "0.96",
"Test::Warnings" => "0.005"
},
- "VERSION" => "0.105",
+ "VERSION" => "0.109",
"test" => {
"TESTS" => "t/*.t"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/README
new/Getopt-Long-Descriptive-0.109/README
--- old/Getopt-Long-Descriptive-0.105/README 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/README 2021-03-17 00:55:48.000000000
+0100
@@ -1,5 +1,5 @@
This archive contains the distribution Getopt-Long-Descriptive,
-version 0.105:
+version 0.109:
Getopt::Long, but simpler and more powerful
@@ -9,4 +9,4 @@
the same terms as the Perl 5 programming language system itself.
-This README file was generated by Dist::Zilla::Plugin::Readme v6.012.
+This README file was generated by Dist::Zilla::Plugin::Readme v6.017.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/dist.ini
new/Getopt-Long-Descriptive-0.109/dist.ini
--- old/Getopt-Long-Descriptive-0.105/dist.ini 2020-02-25 23:40:39.000000000
+0100
+++ new/Getopt-Long-Descriptive-0.109/dist.ini 2021-03-17 00:55:48.000000000
+0100
@@ -12,3 +12,6 @@
[Test::CheckBreaks]
conflicts_module = Moose::Conflicts
+
+[Prereqs / ConfigureRequires]
+ExtUtils::MakeMaker = 6.78 ; do not pass -w when running tests
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive/Opts.pm
new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive/Opts.pm
--- old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive/Opts.pm
2020-02-25 23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive/Opts.pm
2021-03-17 00:55:48.000000000 +0100
@@ -2,7 +2,7 @@
use warnings;
package Getopt::Long::Descriptive::Opts;
# ABSTRACT: object representing command line switches
-$Getopt::Long::Descriptive::Opts::VERSION = '0.105';
+$Getopt::Long::Descriptive::Opts::VERSION = '0.109';
use Scalar::Util qw(blessed weaken);
#pod =head1 DESCRIPTION
@@ -145,7 +145,7 @@
=head1 VERSION
-version 0.105
+version 0.109
=head1 DESCRIPTION
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive/Usage.pm
new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive/Usage.pm
--- old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive/Usage.pm
2020-02-25 23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive/Usage.pm
2021-03-17 00:55:48.000000000 +0100
@@ -2,7 +2,7 @@
use warnings;
package Getopt::Long::Descriptive::Usage;
# ABSTRACT: the usage description for GLD
-$Getopt::Long::Descriptive::Usage::VERSION = '0.105';
+$Getopt::Long::Descriptive::Usage::VERSION = '0.109';
use List::Util qw(max);
#pod =head1 SYNOPSIS
@@ -74,9 +74,10 @@
sub option_text {
my ($self) = @_;
- my @options = @{ $self->{options} || [] };
my $string = q{};
- my @specs = map { $_->{spec} } grep { $_->{desc} ne 'spacer' } @options;
+
+ my @options = @{ $self->{options} || [] };
+ my @specs = map { $_->{spec} } grep { $_->{desc} ne 'spacer' } @options;
my $length = (max(map { _option_length($_) } @specs) || 0);
my $spec_fmt = "\t%-${length}s";
@@ -84,7 +85,7 @@
my $opt = shift @options;
my $spec = $opt->{spec};
my $desc = $opt->{desc};
- my $assign;
+
if ($desc eq 'spacer') {
if (ref $opt->{spec}) {
$string .= "${ $opt->{spec} }\n";
@@ -97,15 +98,28 @@
}
}
- ($spec, $assign) = Getopt::Long::Descriptive->_strip_assignment($spec);
- my ($left, $right) = _parse_assignment($assign);
- $spec = join q{ },
- reverse
- map { length > 1 ? "--$left$_$right" : "-${_}$right" }
- split /\|/, $spec;
+ ($spec, my $assign) = Getopt::Long::Descriptive->_strip_assignment($spec);
+
+ my ($pre, $post) = _parse_assignment($assign);
+ my @names = split /\|/, $spec;
+
+ my $primary = shift @names;
+ my $short;
+ my ($i) = grep {; length $names[$_] == 1 } (0 .. $#names);
+ if (defined $i) {
+ $short = splice @names, $i, 1;
+ }
+
+ $spec = length $primary > 1 ? "--$pre$primary$post" : "-$primary$post";
+ $spec .= " (or -$short)" if $short;
my @desc = $self->_split_description($length, $desc);
+ if (@names) {
+ push @desc,
+ "aka " . join q{, }, map { length > 1 ? "--$_" : "-$_" } @names;
+ }
+
# add default value if it exists
if (exists $opt->{constraint}->{default} and $self->{show_defaults}) {
my $dflt = $opt->{constraint}->{default};
@@ -128,56 +142,32 @@
sub _option_length {
my ($fullspec) = @_;
- my $number_opts = 1;
- my $last_pos = 0;
- my $number_shortopts = 0;
+
my ($spec, $argspec) =
Getopt::Long::Descriptive->_strip_assignment($fullspec);
- my $length = length $spec;
- my ($left, $right) = _parse_assignment($argspec);
- my $arglen = length($left) + length($right);
+ my ($pre, $post) = _parse_assignment($argspec);
+ my @names = split /\|/, $spec;
- # Spacing rules:
- #
- # For short options we want 1 space (for '-'), for long options 2
- # spaces (for '--'). Then one space for separating the options,
- # but we here abuse that $spec has a '|' char for that.
- #
- # For options that take arguments, we want 2 spaces for mandatory
- # options ('=X') and 4 for optional arguments ('[=X]'). Note we
- # consider {N,M} cases as "single argument" atm.
-
- # Count the number of "variants" (e.g. "long|s" has two variants)
- while ($spec =~ m{\|}g) {
- $number_opts++;
- if (pos($spec) - $last_pos == 2) {
- $number_shortopts++;
- }
- $last_pos = pos($spec);
- }
+ my $primary = shift @names;
+ my $short = (@names && length $names[0] eq 1)
+ ? shift @names
+ : undef;
- # Was the last option a "short" one?
- if ($length - $last_pos == 1) {
- $number_shortopts++;
- }
+ $spec = length $primary > 1 ? "--$pre$primary$post" : "-$primary$post";
+ $spec .= " (or -$short)" if $short;
+
+ return length $spec;
+}
- # We got $number_opts options, each with an argument length of
- # $arglen. Plus each option (after the first) needs 3 a char
- # spacing. $length gives us the total length of all options and 1
- # char spacing per option (after the first). So the result should be:
-
- my $number_longopts = $number_opts - $number_shortopts;
- my $total_arglen = $number_opts * $arglen;
- my $total_optsep = 2 * $number_longopts + $number_shortopts;
- my $total = $length + $total_optsep + $total_arglen;
- return $total;
+sub _max_line_length {
+ return $Getopt::Long::Descriptive::TERM_WIDTH - 2;
}
sub _split_description {
my ($self, $length, $desc) = @_;
- # 8 for a tab, 2 for the space between option & desc;
- my $max_length = 78 - ( $length + 8 + 2 );
+ # 8 for a tab, 2 for the space between option & desc, 2 more for gutter
+ my $max_length = $self->_max_line_length - ( $length + 8 + 2 );
return $desc if length $desc <= $max_length;
@@ -290,7 +280,7 @@
=head1 VERSION
-version 0.105
+version 0.109
=head1 SYNOPSIS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive.pm
new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive.pm
--- old/Getopt-Long-Descriptive-0.105/lib/Getopt/Long/Descriptive.pm
2020-02-25 23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/lib/Getopt/Long/Descriptive.pm
2021-03-17 00:55:48.000000000 +0100
@@ -2,7 +2,9 @@
use warnings;
package Getopt::Long::Descriptive;
# ABSTRACT: Getopt::Long, but simpler and more powerful
-$Getopt::Long::Descriptive::VERSION = '0.105';
+$Getopt::Long::Descriptive::VERSION = '0.109';
+use v5.10.1;
+
use Carp qw(carp croak);
use File::Basename ();
use Getopt::Long 2.33;
@@ -287,6 +289,26 @@
our $MungeOptions = 1;
+our $TERM_WIDTH;
+{
+ $TERM_WIDTH = $ENV{COLUMNS} || 80;
+
+ # So, this was the old code:
+ #
+ # if (eval { require Term::ReadKey; 1 }) {
+ # my ($width) = Term::ReadKey::GetTerminalSize();
+ # $TERM_WIDTH = $width;
+ # } else {
+ # $TERM_WIDTH = $ENV{COLUMNS} || 80;
+ # }
+ #
+ # ...but the problem is that Term::ReadKey will carp when it can't get an
+ # answer, it can't be trivially made to keep quiet. (I decline to stick a
+ # local $SIG{__WARN__} here, as it's too heavy a hammer.) With the new (as
+ # of 2021-03) formatting code, using the full width is less of an issue,
+ # anyway.
+}
+
sub _nohidden {
return grep { ! $_->{constraint}->{hidden} } @_;
}
@@ -319,12 +341,10 @@
(my $copy = $str) =~ s{$SPEC_RE}{};
if (wantarray) {
- my $len = length $copy;
- my $assignment = substr $str, $len;
- if (!defined($assignment)) {
- $assignment = '';
- }
- return ($copy, $assignment);
+ my $len = length $copy;
+ my $assignment = substr($str, $len) // q{};
+
+ return ($copy, $assignment);
}
return $copy;
}
@@ -418,13 +438,23 @@
grep { $_->{desc} ne 'spacer' }
_nohidden(@opts);
- my $short = join q{},
- sort { lc $a cmp lc $b or $a cmp $b }
- grep { /^.$/ }
+ my @options =
map { split /\|/ }
map { scalar __PACKAGE__->_strip_assignment($_) }
@specs;
+ my %opt_count;
+ $opt_count{$_}++ for @options;
+ my @redundant = sort grep {; $opt_count{$_} > 1 } keys %opt_count;
+
+ warn "Getopt::Long::Descriptive was configured with these ambiguous
options: @redundant\n"
+ if @redundant;
+
+ my $short = join q{},
+ sort { lc $a cmp lc $b or $a cmp $b }
+ grep { /^.$/ }
+ @options;
+
my $long = grep /\b[^|]{2,}/, @specs;
my %replace = (
@@ -437,9 +467,8 @@
);
(my $str = $format) =~ s<%(.)><
- defined $replace{$1}
- ? $replace{$1}
- : Carp::croak("unknown sequence %$1 in first argument to
describe_options")
+ $replace{$1}
+ // Carp::croak("unknown sequence %$1 in first argument to
describe_options")
>ge;
$str =~ s/[\x20\t]{2,}/ /g;
@@ -480,7 +509,7 @@
given_keys => \@given_keys,
parent_of => \%parent_of,
);
- next unless (defined($new) || exists($return{$name}));
+ next unless defined $new || exists $return{$name};
$return{$name} = $new;
if ($is_shortcircuit) {
@@ -702,7 +731,7 @@
=head1 VERSION
-version 0.105
+version 0.109
=head1 SYNOPSIS
@@ -992,7 +1021,7 @@
=head1 CONTRIBUTORS
-=for stopwords Arthur Axel 'fREW' Schmidt Dave Rolsky Diab Jerius Hans Dieter
Pearcey Harley Pig [email protected] Karen Etheridge Michael McClimon Niels Thykier
Olaf Alders Roman Hubacek Smylers Thomas Neumann zhouzhen1
+=for stopwords Arthur Axel 'fREW' Schmidt Dave Rolsky Diab Jerius Hans Dieter
Pearcey Harley Pig [email protected] Karen Etheridge Michael McClimon Niels Thykier
Olaf Alders Ricardo Signes Roman Hubacek Smylers Thomas Neumann zhouzhen1
=over 4
@@ -1042,6 +1071,10 @@
=item *
+Ricardo Signes <[email protected]>
+
+=item *
+
Roman Hubacek <[email protected]>
=item *
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/t/00-report-prereqs.dd
new/Getopt-Long-Descriptive-0.109/t/00-report-prereqs.dd
--- old/Getopt-Long-Descriptive-0.105/t/00-report-prereqs.dd 2020-02-25
23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/t/00-report-prereqs.dd 2021-03-17
00:55:48.000000000 +0100
@@ -1,7 +1,7 @@
do { my $x = {
'configure' => {
'requires' => {
- 'ExtUtils::MakeMaker' => '0'
+ 'ExtUtils::MakeMaker' => '6.78'
}
},
'develop' => {
@@ -22,6 +22,7 @@
'Sub::Exporter' => '0.972',
'Sub::Exporter::Util' => '0',
'overload' => '0',
+ 'perl' => 'v5.10.1',
'strict' => '0',
'warnings' => '0'
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/t/00-report-prereqs.t
new/Getopt-Long-Descriptive-0.109/t/00-report-prereqs.t
--- old/Getopt-Long-Descriptive-0.105/t/00-report-prereqs.t 2020-02-25
23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/t/00-report-prereqs.t 2021-03-17
00:55:48.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
-# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.027
+# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.028
use Test::More tests => 1;
@@ -188,6 +188,6 @@
);
}
-pass;
+pass('Reported prereqs');
# vim: ts=4 sts=4 sw=4 et:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Getopt-Long-Descriptive-0.105/t/descriptive.t
new/Getopt-Long-Descriptive-0.109/t/descriptive.t
--- old/Getopt-Long-Descriptive-0.105/t/descriptive.t 2020-02-25
23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/t/descriptive.t 2021-03-17
00:55:48.000000000 +0100
@@ -2,10 +2,9 @@
use strict;
use warnings;
+use Getopt::Long::Descriptive ;
use Test::More;
-use_ok("Getopt::Long::Descriptive");
-
# test constraints:
# (look at P::V for names, too)
# required => 1
@@ -265,31 +264,31 @@
like(
$usage_text,
- qr/-s STR --string STR\s+string value/,
+ qr/--string STR \(or -s\)\s+string value/,
"Spec =s gets an STR in usage output",
);
like(
$usage_text,
- qr/-S\[=STR\] --ostring\[=STR\]\s+optional string value/,
+ qr/--ostring\[=STR\] \(or -S\)\s+optional string value/,
"Spec :s gets an STR in usage output",
);
like(
$usage_text,
- qr/-l STR\Q...\E --list STR\Q...\E\s+list of strings/,
+ qr/--list STR\Q...\E \(or -l\)\s+list of strings/,
"Spec =s@ gets an STR... in usage output",
);
like(
$usage_text,
- qr/-h KEY=STR\Q...\E --hash KEY=STR\Q...\E\s+hash values/,
+ qr/--hash KEY=STR\Q...\E \(or -h\)\s+hash values/,
"Spec =s% gets an KEY=STR... in usage output",
);
like(
$usage_text,
- qr/-o --\[no-\]optional\s+optional boolean/,
+ qr/--\[no-\]optional \(or -o\)\s+optional boolean/,
"Spec ! gets a [no-] in usage output",
);
}
@@ -365,6 +364,8 @@
{
local @ARGV;
+ local $Getopt::Long::Descriptive::TERM_WIDTH = 80;
+
my ($opt, $usage) = describe_options(
"test %o",
[ foo => "a foo option" ],
@@ -435,6 +436,37 @@
is($@, '', "no error in eval");
}
+{
+ local @ARGV;
+ local $@;
+
+ my @warnings;
+ {
+ local $SIG{__WARN__} = sub { push @warnings, @_ };
+
+ my ($opt, $usage) = describe_options(
+ "%c %o",
+ [ 'force|f' => "you gotta have" ],
+ [ 'faith|f' => "freedom 90" ],
+ );
+ }
+
+ if (@warnings == 1) {
+ pass("got one warning about ambiguity of options");
+ like(
+ $warnings[0],
+ qr/these ambiguous options: f/,
+ "GLD warns on ambiguity for you",
+ );
+ } elsif (! @warnings) {
+ fail("got one warning about ambiguity of options");
+ diag("expected a warning but got none");
+ } else {
+ fail("got one warning about ambiguity of options");
+ diag("warning: $_") for @warnings;
+ }
+}
+
subtest "descriptions for option value types" => sub {
my $p = \&Getopt::Long::Descriptive::Usage::_parse_assignment;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Getopt-Long-Descriptive-0.105/xt/release/changes_has_content.t
new/Getopt-Long-Descriptive-0.109/xt/release/changes_has_content.t
--- old/Getopt-Long-Descriptive-0.105/xt/release/changes_has_content.t
2020-02-25 23:40:39.000000000 +0100
+++ new/Getopt-Long-Descriptive-0.109/xt/release/changes_has_content.t
2021-03-17 00:55:48.000000000 +0100
@@ -2,7 +2,7 @@
note 'Checking Changes';
my $changes_file = 'Changes';
-my $newver = '0.105';
+my $newver = '0.109';
my $trial_token = '-TRIAL';
my $encoding = 'UTF-8';
