diff options
| author | Karl Williamson <khw@cpan.org> | 2017-03-09 13:13:07 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2017-10-24 08:14:08 -0600 |
| commit | 083b2a61ee6281f67b6d6a21ad5d27e6219df60f (patch) | |
| tree | 19277306a3682affdd69bcc12a1e4b1c58306ca0 /ext/Hash-Util-FieldHash | |
| parent | 5bad3c4f3a4515aaa622eecdf6f5a84fcaff7ed9 (diff) | |
| download | perl-083b2a61ee6281f67b6d6a21ad5d27e6219df60f.tar.gz | |
Convert strcmp into strEQ, strNE
The latter two are easier to read
Diffstat (limited to 'ext/Hash-Util-FieldHash')
| -rw-r--r-- | ext/Hash-Util-FieldHash/FieldHash.xs | 2 | ||||
| -rw-r--r-- | ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/Hash-Util-FieldHash/FieldHash.xs b/ext/Hash-Util-FieldHash/FieldHash.xs index 2fcb612525..9cfd87a694 100644 --- a/ext/Hash-Util-FieldHash/FieldHash.xs +++ b/ext/Hash-Util-FieldHash/FieldHash.xs @@ -431,7 +431,7 @@ OUTPUT: void CLONE(char* classname) CODE: - if (0 == strcmp(classname, "Hash::Util::FieldHash")) { + if (strEQ(classname, "Hash::Util::FieldHash")) { HUF_global(aTHX_ HUF_CLONE); HUF_fix_objects(aTHX); } diff --git a/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm b/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm index 0d0b7921c3..7b39cca450 100644 --- a/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm +++ b/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm @@ -5,7 +5,7 @@ use strict; use warnings; use Scalar::Util qw( reftype); -our $VERSION = '1.19'; +our $VERSION = '1.20'; require Exporter; our @ISA = qw(Exporter); |