--- CBOR-XS/XS.pm 2020/11/30 20:38:25 1.75 +++ CBOR-XS/XS.pm 2020/12/01 01:49:47 1.76 @@ -66,7 +66,7 @@ use common::sense; -our $VERSION = 1.81; +our $VERSION = 1.82; our @ISA = qw(Exporter); our @EXPORT = qw(encode_cbor decode_cbor); @@ -734,7 +734,7 @@ =item CBOR::XS::as_bool $value Converts a Perl boolean (which can be any kind of scalar) into a CBOR -boolean. Exactly the same, but shorter to write, than: +boolean. Strictly the same, but shorter to write, than: $value ? Types::Serialiser::true : Types::Serialiser::false @@ -775,7 +775,7 @@ sub CBOR::XS::as_float32 ($) { bless [$_[0], 5, undef], CBOR::XS::Tagged:: } sub CBOR::XS::as_float64 ($) { bless [$_[0], 6, undef], CBOR::XS::Tagged:: } -sub CBOR::XS::as_bool ($) { $_[0] ? Types::Serialiser::true : Types::Serialiser::false } +sub CBOR::XS::as_bool ($) { $_[0] ? $Types::Serialiser::true : $Types::Serialiser::false } =head2 OBJECT SERIALISATION