X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=t%2Fobject.t;h=d3e766d26d5d402cc665cdba9540c88a88da877a;hb=eefcd42a336641c8927b29d12c5c59443212468f;hp=b176c7793a0b90d0cff9bd694c691a59df1a7a85;hpb=c98fc7d0294e641cf8844306808333bdec4fea2f;p=chaz%2Fp5-File-KDBX diff --git a/t/object.t b/t/object.t index b176c77..d3e766d 100644 --- a/t/object.t +++ b/t/object.t @@ -17,13 +17,13 @@ subtest 'Cloning' => sub { my $entry = File::KDBX::Entry->new; my $copy = $entry->clone; - like exception { $copy->kdbx }, qr/disassociated/, 'Disassociated entry copy is also disassociated'; - cmp_deeply $copy, $entry, 'Disassociated entry and its clone are identical'; + like exception { $copy->kdbx }, qr/disconnected/, 'Disconnected entry copy is also disconnectedisconnected'; + cmp_deeply $copy, $entry, 'Disconnected entry and its clone are identical'; $entry->kdbx($kdbx); $copy = $entry->clone; - is $entry->kdbx, $copy->kdbx, 'Associated entry copy is also associated'; - cmp_deeply $copy, $entry, 'Associated entry and its clone are identical'; + is $entry->kdbx, $copy->kdbx, 'Connected entry copy is also connected'; + cmp_deeply $copy, $entry, 'Connected entry and its clone are identical'; my $txn = $entry->begin_work; $entry->title('foo'); @@ -44,11 +44,11 @@ subtest 'Cloning' => sub { $copy = $entry->clone(reference_username => 1); my $ref = sprintf('{REF:U@I:%s}', format_uuid($entry->uuid)); is $copy->username, $ref, 'Copy has username reference'; - is $copy->expanded_username, $ref, 'Entry copy does not expand username because entry is not in database'; + is $copy->expand_username, $ref, 'Entry copy does not expand username because entry is not in database'; my $group = $kdbx->add_group(label => 'Passwords'); $group->add_entry($entry); - is $copy->expanded_username, $entry->username, + is $copy->expand_username, $entry->username, 'Entry in database and its copy with username ref have same expanded username'; $copy = $entry->clone;