Compare commits
31 Commits
perl-Mouse
...
rawhide
Author | SHA1 | Date | |
---|---|---|---|
|
46547ef370 | ||
|
f9fdcddfce | ||
|
66999c5818 | ||
|
443bfe299e | ||
|
f73dcaa55b | ||
|
3204c9bbc0 | ||
|
0016b350cb | ||
|
8960e51b59 | ||
|
a34ed4f99e | ||
|
06271027bc | ||
|
9fb99f9c85 | ||
|
7ae0167764 | ||
|
f2e9d9a69f | ||
|
b4bc3ae118 | ||
|
07b6a0c263 | ||
|
aa8ce22a66 | ||
|
cd672bc0b3 | ||
|
5846bc2b7d | ||
|
f37abef7aa | ||
|
87383fdabc | ||
|
055f84f8d5 | ||
|
735d49b4c1 | ||
|
4045aa4ac0 | ||
|
947a295300 | ||
|
b68935d112 | ||
|
213d85c65a | ||
|
d1fa405aaf | ||
|
00ae13a292 | ||
|
e8bb8e96fa | ||
|
6de081721a | ||
|
cbffaa7b79 |
@ -1,47 +0,0 @@
|
|||||||
--- t/104_override_usage.t
|
|
||||||
+++ t/104_override_usage.t
|
|
||||||
@@ -49,10 +49,16 @@ use Test::Exception;
|
|
||||||
\t--foo A foo
|
|
||||||
}
|
|
||||||
:
|
|
||||||
+ $Getopt::Long::Descriptive::VERSION == 0.099 ?
|
|
||||||
qq{usage: 104_override_usage.t [-?] [long options...]
|
|
||||||
\t-? --usage --help Prints this usage information.
|
|
||||||
\t--foo INT A foo
|
|
||||||
}
|
|
||||||
+ :
|
|
||||||
+ qq{usage: 104_override_usage.t [-?] [long options...]
|
|
||||||
+\t-? --usage --help Prints this usage information.
|
|
||||||
+\t--foo INT A foo
|
|
||||||
+}
|
|
||||||
|
|
||||||
];
|
|
||||||
|
|
||||||
--- t/110_sort_usage_by_attr_order.t
|
|
||||||
+++ t/110_sort_usage_by_attr_order.t
|
|
||||||
@@ -34,7 +34,7 @@ usage: 110_sort_usage_by_attr_order.t [-
|
|
||||||
--bar Documentation for "bar"
|
|
||||||
--baz Documentation for "baz"
|
|
||||||
USAGE
|
|
||||||
-if ( $Getopt::Long::Descriptive::VERSION >= 0.099 )
|
|
||||||
+if ( $Getopt::Long::Descriptive::VERSION == 0.099 )
|
|
||||||
{
|
|
||||||
$expected = <<'USAGE';
|
|
||||||
usage: 110_sort_usage_by_attr_order.t [-?] [long options...]
|
|
||||||
@@ -44,6 +44,16 @@ usage: 110_sort_usage_by_attr_order.t [-
|
|
||||||
--baz STR Documentation for "baz"
|
|
||||||
USAGE
|
|
||||||
}
|
|
||||||
+if ( $Getopt::Long::Descriptive::VERSION >= 0.100 )
|
|
||||||
+{
|
|
||||||
+$expected = <<'USAGE';
|
|
||||||
+usage: 110_sort_usage_by_attr_order.t [-?] [long options...]
|
|
||||||
+ -? --usage --help Prints this usage information.
|
|
||||||
+ --foo STR Documentation for "foo"
|
|
||||||
+ --bar STR Documentation for "bar"
|
|
||||||
+ --baz STR Documentation for "baz"
|
|
||||||
+USAGE
|
|
||||||
+}
|
|
||||||
$expected =~ s/^[ ]{4}/\t/xmsg;
|
|
||||||
is($obj->usage->text, $expected, 'Usage text has nicely sorted options');
|
|
||||||
|
|
64
MouseX-Getopt-0.38-GLD-0.107.patch
Normal file
64
MouseX-Getopt-0.38-GLD-0.107.patch
Normal file
@ -0,0 +1,64 @@
|
|||||||
|
--- t/104_override_usage.t
|
||||||
|
+++ t/104_override_usage.t
|
||||||
|
@@ -61,10 +61,18 @@ use Test::Exception;
|
||||||
|
\t--foo INT A foo
|
||||||
|
}
|
||||||
|
:
|
||||||
|
+ # Note: Getopt::Long::Descriptive 0.106 not supported
|
||||||
|
+ $Getopt::Long::Descriptive::VERSION < 0.107 ?
|
||||||
|
qq{usage: 104_override_usage.t [-?] [long options...]
|
||||||
|
\t-? --[no-]usage --[no-]help Prints this usage information.
|
||||||
|
\t--foo INT A foo
|
||||||
|
}
|
||||||
|
+ :
|
||||||
|
+ qq{usage: 104_override_usage.t [-?] [long options...]
|
||||||
|
+\t--[no-]help (or -?) Prints this usage information.
|
||||||
|
+\t aka --usage
|
||||||
|
+\t--foo INT A foo
|
||||||
|
+}
|
||||||
|
|
||||||
|
];
|
||||||
|
|
||||||
|
--- t/107_no_auto_help.t
|
||||||
|
+++ t/107_no_auto_help.t
|
||||||
|
@@ -60,7 +60,7 @@ END {
|
||||||
|
warning_like {
|
||||||
|
throws_ok { Class->new_with_options }
|
||||||
|
#usage: 107_no_auto_help.t [-?] [long options...]
|
||||||
|
- qr/^usage: [\d\w]+\Q.t [-?] [long options...]\E.\s+\Q-? --\E(\[no-\])?usage --(\[no-\])?\Qhelp\E\s+\QPrints this usage information.\E.\s+--configfile/ms,
|
||||||
|
+ qr/^usage: [\d\w]+\Q.t [-?] [long options...]\E.\s+(\Q-? --\E(\[no-\])?usage )?--(\[no-\])?\Qhelp\E(\Q (or -?)\E)?\s+\QPrints this usage information.\E.(\s+\Qaka --usage\E.)?\s+--configfile/ms,
|
||||||
|
'usage information looks good';
|
||||||
|
}
|
||||||
|
qr/^Specified configfile \'this_value_unimportant\' does not exist, is empty, or is not readable$/,
|
||||||
|
--- t/109_help_flag.t
|
||||||
|
+++ t/109_help_flag.t
|
||||||
|
@@ -40,7 +40,7 @@ foreach my $args ( ['--help'], ['--usage
|
||||||
|
local @ARGV = @$args;
|
||||||
|
|
||||||
|
throws_ok { MyClass->new_with_options() }
|
||||||
|
- qr/^usage: (?:[\d\w]+)\Q.t [-?] [long options...]\E.^\t\Q-? --\E(\[no-\])?usage --(\[no-\])?help\s+\QPrints this usage information.\E$/ms,
|
||||||
|
+ qr/^usage: (?:[\d\w]+)\Q.t [-?] [long options...]\E.^\s+(\Q-? --\E(\[no-\])?usage )?--(\[no-\])?help(\Q (or -?)\E)?\s+Prints ?(.\s+)?\Qthis usage information.\E.(\s+\Qaka --usage\E.)?$/ms,
|
||||||
|
'Help request detected; usage information properly printed';
|
||||||
|
}
|
||||||
|
|
||||||
|
--- t/110_sort_usage_by_attr_order.t
|
||||||
|
+++ t/110_sort_usage_by_attr_order.t
|
||||||
|
@@ -64,6 +64,18 @@ usage: 110_sort_usage_by_attr_order.t [-
|
||||||
|
--baz STR Documentation for "baz"
|
||||||
|
USAGE
|
||||||
|
}
|
||||||
|
+# Note: Getopt::Long::Descriptive 0.106 not supported
|
||||||
|
+if ( $Getopt::Long::Descriptive::VERSION >= 0.107 )
|
||||||
|
+{
|
||||||
|
+$expected = <<'USAGE';
|
||||||
|
+usage: 110_sort_usage_by_attr_order.t [-?] [long options...]
|
||||||
|
+ --[no-]help (or -?) Prints this usage information.
|
||||||
|
+ aka --usage
|
||||||
|
+ --foo STR Documentation for "foo"
|
||||||
|
+ --bar STR Documentation for "bar"
|
||||||
|
+ --baz STR Documentation for "baz"
|
||||||
|
+USAGE
|
||||||
|
+}
|
||||||
|
$expected =~ s/^[ ]{4}/\t/xmsg;
|
||||||
|
is($obj->usage->text, $expected, 'Usage text has nicely sorted options');
|
||||||
|
|
@ -1,21 +1,17 @@
|
|||||||
Name: perl-MouseX-Getopt
|
Name: perl-MouseX-Getopt
|
||||||
Summary: Mouse role for processing command line options
|
Summary: Mouse role for processing command line options
|
||||||
Version: 0.36
|
Version: 0.38
|
||||||
Release: 8%{?dist}
|
Release: 19%{?dist}
|
||||||
License: GPL+ or Artistic
|
License: GPL+ or Artistic
|
||||||
URL: http://search.cpan.org/dist/MouseX-Getopt/
|
URL: https://metacpan.org/release/MouseX-Getopt
|
||||||
Source0: http://search.cpan.org/CPAN/authors/id/G/GF/GFUJI/MouseX-Getopt-%{version}.tar.gz
|
Source0: https://cpan.metacpan.org/modules/by-module/MouseX/MouseX-Getopt-%{version}.tar.gz
|
||||||
Patch0: MouseX-Getopt-0.36-GLD-spacing.patch
|
Patch0: MouseX-Getopt-0.38-GLD-0.107.patch
|
||||||
BuildArch: noarch
|
BuildArch: noarch
|
||||||
# Module Build
|
# Module Build
|
||||||
BuildRequires: perl
|
|
||||||
BuildRequires: perl-generators
|
BuildRequires: perl-generators
|
||||||
BuildRequires: perl(File::Basename)
|
BuildRequires: perl-interpreter
|
||||||
BuildRequires: perl(File::Copy)
|
BuildRequires: perl(Module::Build::Tiny) >= 0.035
|
||||||
BuildRequires: perl(File::Spec)
|
|
||||||
BuildRequires: perl(Module::Build) >= 0.38
|
|
||||||
BuildRequires: perl(strict)
|
BuildRequires: perl(strict)
|
||||||
BuildRequires: perl(utf8)
|
|
||||||
BuildRequires: perl(warnings)
|
BuildRequires: perl(warnings)
|
||||||
# Module Runtime
|
# Module Runtime
|
||||||
BuildRequires: perl(Carp)
|
BuildRequires: perl(Carp)
|
||||||
@ -26,6 +22,7 @@ BuildRequires: perl(Mouse::Meta::Attribute)
|
|||||||
BuildRequires: perl(Mouse::Role)
|
BuildRequires: perl(Mouse::Role)
|
||||||
BuildRequires: perl(Mouse::Util::TypeConstraints)
|
BuildRequires: perl(Mouse::Util::TypeConstraints)
|
||||||
# Test Suite
|
# Test Suite
|
||||||
|
BuildRequires: perl(File::Spec)
|
||||||
BuildRequires: perl(Mouse::Meta::Class)
|
BuildRequires: perl(Mouse::Meta::Class)
|
||||||
BuildRequires: perl(Scalar::Util)
|
BuildRequires: perl(Scalar::Util)
|
||||||
BuildRequires: perl(Test::Exception) >= 0.21
|
BuildRequires: perl(Test::Exception) >= 0.21
|
||||||
@ -52,8 +49,7 @@ objects using parameters passed in from the command line.
|
|||||||
%prep
|
%prep
|
||||||
%setup -q -n MouseX-Getopt-%{version}
|
%setup -q -n MouseX-Getopt-%{version}
|
||||||
|
|
||||||
# Fix tests for GLD help output again
|
# Fix compatibility with GLD 0.107
|
||||||
# https://github.com/gfx/mousex-getopt/pull/10
|
|
||||||
%patch0
|
%patch0
|
||||||
|
|
||||||
%build
|
%build
|
||||||
@ -67,7 +63,7 @@ perl Build.PL --installdirs=vendor
|
|||||||
./Build test
|
./Build test
|
||||||
|
|
||||||
%files
|
%files
|
||||||
# Note: malformed LICENSE file in 0.35 .. 0.36 not shipped
|
# Note: malformed LICENSE file in 0.35 .. 0.38 not shipped
|
||||||
# https://github.com/gfx/mousex-getopt/issues/2
|
# https://github.com/gfx/mousex-getopt/issues/2
|
||||||
%doc Changes README.md
|
%doc Changes README.md
|
||||||
%{perl_vendorlib}/MouseX/
|
%{perl_vendorlib}/MouseX/
|
||||||
@ -83,6 +79,96 @@ perl Build.PL --installdirs=vendor
|
|||||||
%{_mandir}/man3/MouseX::Getopt::Strict.3*
|
%{_mandir}/man3/MouseX::Getopt::Strict.3*
|
||||||
|
|
||||||
%changelog
|
%changelog
|
||||||
|
* Fri Jul 22 2022 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-19
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_37_Mass_Rebuild
|
||||||
|
|
||||||
|
* Fri Jun 03 2022 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-18
|
||||||
|
- Perl 5.36 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Wed Jun 01 2022 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-17
|
||||||
|
- Perl 5.36 rebuild
|
||||||
|
|
||||||
|
* Fri Jan 21 2022 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-16
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_36_Mass_Rebuild
|
||||||
|
|
||||||
|
* Thu Jul 22 2021 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-15
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_35_Mass_Rebuild
|
||||||
|
|
||||||
|
* Mon May 24 2021 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-14
|
||||||
|
- Perl 5.34 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Sun May 23 2021 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-13
|
||||||
|
- Perl 5.34 rebuild
|
||||||
|
|
||||||
|
* Mon Mar 15 2021 Paul Howarth <paul@city-fan.org> - 0.38-12
|
||||||
|
- Fix compatibility with GLD 0.107
|
||||||
|
|
||||||
|
* Sat Mar 13 2021 Paul Howarth <paul@city-fan.org> - 0.38-11
|
||||||
|
- Fix compatibility with GLD 0.106
|
||||||
|
|
||||||
|
* Wed Jan 27 2021 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-10
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild
|
||||||
|
|
||||||
|
* Tue Jul 28 2020 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-9
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild
|
||||||
|
|
||||||
|
* Fri Jun 26 2020 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-8
|
||||||
|
- Perl 5.32 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Tue Jun 23 2020 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-7
|
||||||
|
- Perl 5.32 rebuild
|
||||||
|
|
||||||
|
* Thu Jan 30 2020 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-6
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild
|
||||||
|
|
||||||
|
* Fri Jul 26 2019 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-5
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild
|
||||||
|
|
||||||
|
* Sun Jun 02 2019 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-4
|
||||||
|
- Perl 5.30 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Fri May 31 2019 Jitka Plesnikova <jplesnik@redhat.com> - 0.38-3
|
||||||
|
- Perl 5.30 rebuild
|
||||||
|
|
||||||
|
* Fri Feb 01 2019 Fedora Release Engineering <releng@fedoraproject.org> - 0.38-2
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild
|
||||||
|
|
||||||
|
* Mon Jan 28 2019 Paul Howarth <paul@city-fan.org> - 0.38-1
|
||||||
|
- Update to 0.38
|
||||||
|
- Cope with GLD output changes in version 0.103 (GH#13)
|
||||||
|
|
||||||
|
* Tue Aug 21 2018 Paul Howarth <paul@city-fan.org> - 0.37-10
|
||||||
|
- Fix compatibility with GLD 0.103 (GH#12, GH#13)
|
||||||
|
|
||||||
|
* Fri Jul 13 2018 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-9
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild
|
||||||
|
|
||||||
|
* Sun Jul 01 2018 Jitka Plesnikova <jplesnik@redhat.com> - 0.37-8
|
||||||
|
- Perl 5.28 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Sat Jun 30 2018 Jitka Plesnikova <jplesnik@redhat.com> - 0.37-7
|
||||||
|
- Perl 5.28 rebuild
|
||||||
|
|
||||||
|
* Thu Feb 08 2018 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-6
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild
|
||||||
|
|
||||||
|
* Thu Jul 27 2017 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-5
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild
|
||||||
|
|
||||||
|
* Wed Jun 07 2017 Jitka Plesnikova <jplesnik@redhat.com> - 0.37-4
|
||||||
|
- Perl 5.26 re-rebuild of bootstrapped packages
|
||||||
|
|
||||||
|
* Tue Jun 06 2017 Jitka Plesnikova <jplesnik@redhat.com> - 0.37-3
|
||||||
|
- Perl 5.26 rebuild
|
||||||
|
|
||||||
|
* Sat Feb 11 2017 Fedora Release Engineering <releng@fedoraproject.org> - 0.37-2
|
||||||
|
- Rebuilt for https://fedoraproject.org/wiki/Fedora_26_Mass_Rebuild
|
||||||
|
|
||||||
|
* Wed Jul 13 2016 Paul Howarth <paul@city-fan.org> - 0.37-1
|
||||||
|
- Update to 0.37
|
||||||
|
- Cope with GLD output changes in version 0.100 (GH#10)
|
||||||
|
- Switch to Module::Build::Tiny flow
|
||||||
|
|
||||||
* Tue Jul 12 2016 Paul Howarth <paul@city-fan.org> - 0.36-8
|
* Tue Jul 12 2016 Paul Howarth <paul@city-fan.org> - 0.36-8
|
||||||
- Fix FTBFS with Geopt::Long::Descriptive 0.100
|
- Fix FTBFS with Geopt::Long::Descriptive 0.100
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user