>From 3e255b93e0fe37c0ba0d1ae2ea318d761541290d Mon Sep 17 00:00:00 2001
From: Paul Howarth <paul@xxxxxxxxxxxx>
Date: Thu, 2 Apr 2015 08:21:08 +0100
Subject: Update to 0.36
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
- New upstream release 0.36
- Fix tests that follow GLD changes
(https://github.com/gfx/mousex-getopt/pull/6)
- This release by GFUJI â?? update source URL and directory case
diff --git a/mousex-getopt-0.35-G:L:D-0.099.patch b/mousex-getopt-0.35-G:L:D-0.099.patch
deleted file mode 100644
index 8eefc99..0000000
--- a/mousex-getopt-0.35-G:L:D-0.099.patch
+++ /dev/null
@@ -1,61 +0,0 @@
---- t/104_override_usage.t
-+++ t/104_override_usage.t
-@@ -43,10 +43,17 @@ use Test::Exception;
- my $exp = [
- 'Unknown option: q
- ',
-+ $Getopt::Long::Descriptive::VERSION < 0.099 ?
- qq{usage: 104_override_usage.t [-?] [long options...]
- \t-? --usage --help Prints this usage information.
- \t--foo A foo
- }
-+ :
-+ qq{usage: 104_override_usage.t [-?] [long options...]
-+\t-? --usage --help Prints this usage information.
-+\t--foo INT A foo
-+}
-+
- ];
-
- is_deeply \@MyScript::exception, $exp;
---- 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-? --usage --help Prints this usage information.\E.\s+--configfile/ms,
-+ qr/^usage: [\d\w]+\Q.t [-?] [long options...]\E.\s+\Q-? --usage --help\E\s+\QPrints this usage information.\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-? --usage --help Prints this usage information.\E$/ms,
-+ qr/^usage: (?:[\d\w]+)\Q.t [-?] [long options...]\E.^\t\Q-? --usage --help\E\s+\QPrints this usage information.\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
-@@ -34,6 +34,16 @@ usage: 110_sort_usage_by_attr_order.t [-
- --bar Documentation for "bar"
- --baz Documentation for "baz"
- USAGE
-+if ( $Getopt::Long::Descriptive::VERSION >= 0.099 )
-+{
-+$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');
-
diff --git a/perl-MouseX-Getopt.spec b/perl-MouseX-Getopt.spec
index 84441fe..9a0f0ef 100644
--- a/perl-MouseX-Getopt.spec
+++ b/perl-MouseX-Getopt.spec
@@ -1,19 +1,15 @@
Name: perl-MouseX-Getopt
Summary: Mouse role for processing command line options
-Version: 0.35
-Release: 7%{?dist}
+Version: 0.36
+Release: 1%{?dist}
License: GPL+ or Artistic
-# Hotfix release with different case, expected to revert to normal in subsequent releases
-#URL: http://search.cpan.org/dist/MouseX-Getopt/
-URL: http://search.cpan.org/dist/mousex-getopt/
-Source0: http://search.cpan.org/CPAN/authors/id/T/TO/TOKUHIROM/mousex-getopt-%{version}.tar.gz
-Patch0: mousex-getopt-0.35-G:L:D-0.099.patch
+URL: http://search.cpan.org/dist/MouseX-Getopt/
+Source0: http://search.cpan.org/CPAN/authors/id/G/GF/GFUJI/MouseX-Getopt-%{version}.tar.gz
BuildArch: noarch
# Module Build
BuildRequires: perl
-BuildRequires: perl(CPAN::Meta)
-BuildRequires: perl(CPAN::Meta::Prereqs)
BuildRequires: perl(File::Basename)
+BuildRequires: perl(File::Copy)
BuildRequires: perl(File::Spec)
BuildRequires: perl(Module::Build) >= 0.38
BuildRequires: perl(strict)
@@ -52,12 +48,7 @@ This is a Mouse role that provides an alternate constructor for creating
objects using parameters passed in from the command line.
%prep
-%setup -q -n mousex-getopt-%{version}
-
-# Fix FTBFS with Geopt::Long::Descriptive â?¥ 0.99 (#1189458)
-# https://github.com/gfx/mousex-getopt/issues/5
-# https://github.com/gfx/mousex-getopt/pull/6
-%patch0
+%setup -q -n MouseX-Getopt-%{version}
%build
perl Build.PL --installdirs=vendor
@@ -70,7 +61,7 @@ perl Build.PL --installdirs=vendor
./Build test
%files
-# Note: malformed LICENSE file in 0.35 not shipped
+# Note: malformed LICENSE file in 0.35 .. 0.36 not shipped
# https://github.com/gfx/mousex-getopt/issues/2
%doc Changes README.md
%{perl_vendorlib}/MouseX/
@@ -86,6 +77,12 @@ perl Build.PL --installdirs=vendor
%{_mandir}/man3/MouseX::Getopt::Strict.3*
%changelog
+* Thu Apr 2 2015 Paul Howarth <paul@xxxxxxxxxxxx> - 0.36-1
+- Update to 0.36
+ - Fix tests that follow GLD changes
+ (https://github.com/gfx/mousex-getopt/pull/6)
+- This release by GFUJI â?? update source URL and directory case
+
* Thu Feb 5 2015 Paul Howarth <paul@xxxxxxxxxxxx> - 0.35-7
- Fix FTBFS with Geopt::Long::Descriptive â?¥ 0.99 (#1189458)
https://github.com/gfx/mousex-getopt/issues/5
@@ -116,7 +113,7 @@ perl Build.PL --installdirs=vendor
* Thu Apr 17 2014 Paul Howarth <paul@xxxxxxxxxxxx> - 0.35-1
- Update to 0.35
- GLD 0.097 no longer defaults to no_ignore_case (CPAN RT#93593)
-- This release by TOKUHIROM -> update source URL and directory case
+- This release by TOKUHIROM â?? update source URL and directory case
- Switch to Module::Build flow
- Release tests no longer included
diff --git a/sources b/sources
index 7dbe0cc..d70904b 100644
--- a/sources
+++ b/sources
@@ -1 +1 @@
-3f28242f250d350fc493b626f5dd6fa3 mousex-getopt-0.35.tar.gz
+6e4e4a14c431d1d7d253650947ae9072 MouseX-Getopt-0.36.tar.gz
--
cgit v0.10.2
http://pkgs.fedoraproject.org/cgit/perl-MouseX-Getopt.git/commit/?h=master&id=3e255b93e0fe37c0ba0d1ae2ea318d761541290d
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
