summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/JSON/PP.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/JSON/PP.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/JSON/PP.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/Master/tlpkg/tlperl/lib/JSON/PP.pm b/Master/tlpkg/tlperl/lib/JSON/PP.pm
index 9f083542851..2475fe1e875 100644
--- a/Master/tlpkg/tlperl/lib/JSON/PP.pm
+++ b/Master/tlpkg/tlperl/lib/JSON/PP.pm
@@ -14,7 +14,7 @@ use JSON::PP::Boolean;
use Carp ();
#use Devel::Peek;
-$JSON::PP::VERSION = '4.04';
+$JSON::PP::VERSION = '4.06';
@JSON::PP::EXPORT = qw(encode_json decode_json from_json to_json);
@@ -201,12 +201,11 @@ sub boolean_values {
my ($false, $true) = @_;
$self->{false} = $false;
$self->{true} = $true;
- return ($false, $true);
} else {
delete $self->{false};
delete $self->{true};
- return;
}
+ return $self;
}
sub get_boolean_values {
@@ -1773,7 +1772,7 @@ JSON::PP - JSON::XS compatible pure-Perl module.
=head1 VERSION
- 4.04
+ 4.05
=head1 DESCRIPTION