diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-09 03:20:06 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-09 03:20:06 +0000 |
commit | 1b882d32f692ce67c7b4fa7e0684fcc65add31dc (patch) | |
tree | a9149363303d03d2c7bbf8909de84607c47c8180 /t | |
parent | 4068bd03d5fe1d4ce94ac9d57fdb058c7832a3f0 (diff) | |
download | perl-1b882d32f692ce67c7b4fa7e0684fcc65add31dc.tar.gz |
fix typo in dbm filters that caused odbm.t to fail
p4raw-id: //depot/perl@3344
Diffstat (limited to 't')
-rwxr-xr-x | t/lib/odbm.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/lib/odbm.t b/t/lib/odbm.t index c5458d5e19..0ef2592c93 100755 --- a/t/lib/odbm.t +++ b/t/lib/odbm.t @@ -215,6 +215,8 @@ EOM sub checkOutput { my($fk, $sk, $fv, $sv) = @_ ; + print "# ", join('|', $fetch_key, $fk, $store_key, $sk, + $fetch_value, $fv, $store_value, $sv, $_), "\n"; return $fetch_key eq $fk && $store_key eq $sk && $fetch_value eq $fv && $store_value eq $sv && |