@@ -, +, @@ to_json - Reproduce problem above - Apply patch - Verify that Home > Patron > Update records displays without error - Approve! - Run: $ sudo koha-shell kohadev k$ cd kohaclone k$ prove t/db_dependent/Koha/Patron/Modifications.t - Apply the patch - Run the tests again: k$ prove t/db_dependent/Koha/Patron/Modifications.t --- Koha/Patron/Modification.pm | 2 +- Koha/Patron/Modifications.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) --- a/Koha/Patron/Modification.pm +++ a/Koha/Patron/Modification.pm @@ -104,7 +104,7 @@ sub approve { # Take care of extended attributes if ( $self->extended_attributes ) { - $extended_attributes = try { decode_json( $self->extended_attributes ) } + $extended_attributes = try { from_json( $self->extended_attributes ) } catch { Koha::Exceptions::Patron::Modification::InvalidData->throw( 'The passed extended_attributes is not valid JSON'); --- a/Koha/Patron/Modifications.pm +++ a/Koha/Patron/Modifications.pm @@ -97,7 +97,7 @@ sub pending { while ( my $row = $sth->fetchrow_hashref() ) { foreach my $key ( keys %$row ) { if ( defined $row->{$key} && $key eq 'extended_attributes' ) { - my $attributes = decode_json( $row->{$key} ); + my $attributes = from_json( $row->{$key} ); my @pending_attributes; foreach my $attr ( @{$attributes} ) { push @pending_attributes, --