[libmousex-getopt-perl] 01/04: Add patch from CPAN RC to adapt test to Getopt-Long-Descriptive-0.097.

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libmousex-getopt-perl.

commit 46dfdb489711a80f6226ea37938f055625dc8bbf
Author: gregor herrmann <gregoa at debian.org>
Date:   Mon Mar 31 21:02:19 2014 +0200

    Add patch from CPAN RC to adapt test to Getopt-Long-Descriptive-0.097.
    
    Closes: #743086
---
 debian/patches/GLD-0.097.patch | 52 ++++++++++++++++++++++++++++++++++++++++++
 debian/patches/series          |  1 +
 2 files changed, 53 insertions(+)

diff --git a/debian/patches/GLD-0.097.patch b/debian/patches/GLD-0.097.patch
new file mode 100644
index 0000000..2e7780e
--- /dev/null
+++ b/debian/patches/GLD-0.097.patch
@@ -0,0 +1,52 @@
+Bug-Debian: bugs.debian.org/743086
+From 4b40e9a29395ac4cbff41ad3adac2119bf7ce68d Mon Sep 17 00:00:00 2001
+From: Tokuhiro Matsuno <tokuhirom at gmail.com>
+Date: Sat, 8 Mar 2014 09:06:05 +0900
+Subject: [PATCH] GLD 0.097 no longer defaults to no_ignore_case
+ https://rt.cpan.org/Public/Bug/Display.html?id=93593
+
+See also https://github.com/moose/MooseX-Getopt/commit/c8459ee3ab47cdd7e0b1ccde1787fc073d8001d8
+---
+ t/105_uc_bug_more.t | 18 +++++++++---------
+ 1 file changed, 9 insertions(+), 9 deletions(-)
+
+diff --git a/t/105_uc_bug_more.t b/t/105_uc_bug_more.t
+index af95831..14d430f 100644
+--- a/t/105_uc_bug_more.t
++++ b/t/105_uc_bug_more.t
+@@ -14,23 +14,23 @@ foreach my $role (qw/
+     my $meta = Mouse::Meta::Class->create_anon_class(
+         superclasses => ['Mouse::Object'],
+     );
+-    $meta->add_attribute('Debug', traits => ['Getopt'], isa => 'Bool',
++    $meta->add_attribute('debug', traits => ['Getopt'], isa => 'Bool',
+         cmd_aliases => ['d'], is => 'ro');
+     $role->meta->apply($meta);
+ 
+-    ok($meta->name->new_with_options({ argv => ['-d'] })->Debug,
+-        "Debug was set for argv -d on $role");
++    ok($meta->name->new_with_options({ argv => ['-d'] })->debug,
++        "debug was set for argv -d on $role");
+     {
+         local @ARGV = ('-d');
+-        ok($meta->name->new_with_options()->Debug,
+-            "Debug was set for ARGV on $role");
++        ok($meta->name->new_with_options()->debug,
++            "debug was set for ARGV on $role");
+     }
+ 
+-    ok($meta->name->new_with_options({ argv => ['--Debug'] })->Debug,
+-        "Debug was set for argv --Debug on $role");
++    ok($meta->name->new_with_options({ argv => ['--debug'] })->debug,
++        "debug was set for argv --debug on $role");
+ 
+-    ok($meta->name->new_with_options({ argv => ['--debug'] })->Debug,
+-        "Debug was set for argv --debug on $role");
++    ok($meta->name->new_with_options({ argv => ['--debug'] })->debug,
++        "debug was set for argv --debug on $role");
+ }
+ 
+ done_testing;
+-- 
+1.8.5.5
+
diff --git a/debian/patches/series b/debian/patches/series
index 5299247..32bd64b 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
 spelling.patch
+GLD-0.097.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmousex-getopt-perl.git