Test and fix for entries not having an object

The 'object' attribute was set by the collapser, but not by the linker
on inflate.

Reported in #46374 by Jake Borevich

lib/KiokuDB/Linker.pm

@@ -211,6 +211,8 @@ sub inflate_data {
 
             $$into = $obj;
         }
+
+        $data->object($$into);
     } elsif ( ref($data) eq 'HASH' ) {
         my %targ;
         $self->register_object( $entry => \%targ ) if $entry;

lib/KiokuDB/Test/Fixture/Small.pm

@@ -6,6 +6,8 @@ use Moose;
 use Test::More;
 use Test::Exception;
 
+use Scalar::Util qw(refaddr);
+
 use KiokuDB::Test::Person;
 use KiokuDB::Test::Employee;
 use KiokuDB::Test::Company;
@@ -84,6 +86,12 @@ sub verify {
 
         isa_ok( $oscar, "KiokuDB::Test::Person" );
 
+        my $entry = $self->directory->live_objects->object_to_entry($joe);
+
+        ok( $entry->has_object, "entry is associated with object" );
+
+        is( refaddr($entry->object), refaddr($joe), "the right object" );
+
         is( $joe->name, "joe", "name" );
 
         ok( my $parents = $joe->parents, "parents" );