[libtest-bdd-cucumber-perl] 05/05: 0.22

[Intrigeri]

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

intrigeri pushed a commit to annotated tag 0.22
in repository libtest-bdd-cucumber-perl.

commit db6766ef8153f004dc91a8967509dc53ad77ed8b
Author: Peter Sergeant <pete at clueball.com>
Date:   Wed Jun 4 23:40:43 2014 +0100

    0.22
---
 CHANGES                                                         | 7 +++++++
 dist.ini                                                        | 2 +-
 examples/tagged-digest/features/step_definitions/basic_steps.pl | 4 ++--
 3 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/CHANGES b/CHANGES
index 1f09cae..39453ac 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,4 +1,11 @@
 -----
+0.22: 04 Jun 2014
+    - Some PerlCritic-ish fixes from Paul Cochrane
+    - Updated copyrights, again from Paul Cochrane
+    - There's some weird-ass bug with $1 not getting set properly, sometimes,
+      on perl's older than 5.14. I can't reproduce, and virtually identical
+      examples act differently. Also I can't reproduce it. Rewritten the test
+      itself to go via ->matches
 0.21: 03 Jun 2014
     - Now works with 5.10.0 again
 0.20: 03 Jun 2014
diff --git a/dist.ini b/dist.ini
index 480b2f2..f4ff872 100644
--- a/dist.ini
+++ b/dist.ini
@@ -1,5 +1,5 @@
 name      = Test-BDD-Cucumber
-version   = 0.21
+version   = 0.22
 abstract  = Feature-complete Cucumber-style testing in Perl
 main_module = lib/Test/BDD/Cucumber.pm
 author    = ['Peter Sergeant <pete at clueball.com>','Ben Rogers <ben at bdr.org>']
diff --git a/examples/tagged-digest/features/step_definitions/basic_steps.pl b/examples/tagged-digest/features/step_definitions/basic_steps.pl
index 2c2e040..4825e36 100755
--- a/examples/tagged-digest/features/step_definitions/basic_steps.pl
+++ b/examples/tagged-digest/features/step_definitions/basic_steps.pl
@@ -9,13 +9,13 @@ use Test::BDD::Cucumber::StepFile;
 
 Given qr/a usable "(\w+)" class/, sub { use_ok( $1 ); };
 Given qr/a Digest (\S+) object/, sub {
-    my $object = Digest->new($1);
+    my $object = Digest->new( C->matches->[0] );
     ok( $object, "Object created" );
     S->{'object'} = $object;
 };
 
 When qr/I've added "(.+)" to the object/, sub {
-    S->{'object'}->add( $1 );
+    S->{'object'}->add( C->matches->[0] );
 };
 
 When "I've added the following to the object", sub {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtest-bdd-cucumber-perl.git