From: Vincent Pit <vince@profvince.com>
Date: Sat, 9 Jan 2010 15:01:13 +0000 (+0100)
Subject: s/specific/kv/ in the array test generator
X-Git-Tag: v0.04~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=f046e35a39c6a5d3db2403a69c15519c6012f64a;p=perl%2Fmodules%2Fautovivification.git

s/specific/kv/ in the array test generator
---

diff --git a/samples/hash2array.pl b/samples/hash2array.pl
index 9fc4a61..3cf38fc 100644
--- a/samples/hash2array.pl
+++ b/samples/hash2array.pl
@@ -90,11 +90,11 @@ close $hash_t;
 close $array_t;
 close $array_fast_t;
 
-open my $hash_specific_t,  '<', 't/22-hash-kv.t';
-open my $array_specific_t, '>', 't/32-array-kv.t';
+open my $hash_kv_t,  '<', 't/22-hash-kv.t';
+open my $array_kv_t, '>', 't/32-array-kv.t';
 
 $in_data = 0;
-while (<$hash_specific_t>) {
+while (<$hash_kv_t>) {
  if (/^__DATA__$/) {
   $in_data = 1;
  } elsif (!$in_data) {
@@ -107,5 +107,5 @@ while (<$hash_specific_t>) {
  } else {
   $_ = convert_testcase($_, 1);
  }
- print $array_specific_t $_;
+ print $array_kv_t $_;
 }