From 7b198d5966ee8f486425dd625fae485bc250975d Mon Sep 17 00:00:00 2001 From: Tokuhiro Matsuno Date: Thu, 2 Jul 2009 14:29:49 +0900 Subject: s/Preferred/Prefer/g suggested by kazuho++ --- perl/pack.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl/pack.c') diff --git a/perl/pack.c b/perl/pack.c index aee3bd6..c2d871a 100644 --- a/perl/pack.c +++ b/perl/pack.c @@ -132,7 +132,7 @@ static void _msgpack_pack_sv(enc_t *enc, SV* val) { STRLEN len; char * cval = SvPV(val, len); - SV* pref_int = get_sv("Data::MessagePack::PreferredInteger", 0); + SV* pref_int = get_sv("Data::MessagePack::PreferInteger", 0); if (pref_int && SvTRUE(pref_int) && looks_like_int(cval, len) && SvUV(val) < U32_MAX) { PACK_WRAPPER(uint32)(enc, SvUV(val)); return; -- cgit v1.2.1