X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=t%2Fentry.t;h=f08b683036af4f71eed1d627bde8149a31c660a7;hp=8a6d5ebdb15b251c8bb2e96c4adb826ea293be18;hb=eefcd42a336641c8927b29d12c5c59443212468f;hpb=cec3705c27fbb9fd9bdfead7103480294b673ed1 diff --git a/t/entry.t b/t/entry.t index 8a6d5eb..f08b683 100644 --- a/t/entry.t +++ b/t/entry.t @@ -133,14 +133,14 @@ subtest 'Update UUID' => sub { my $entry2 = $kdbx->add_entry(label => 'Bar'); $entry2->url(sprintf('{REF:T@I:%s} {REF:T@I:%s}', $entry1->id, lc($entry1->id))); - is $entry2->expanded_url, 'Foo Foo', 'Field reference expands' + is $entry2->expand_url, 'Foo Foo', 'Field reference expands' or diag explain $entry2->url; $entry1->uuid("\1" x 16); is $entry2->url, '{REF:T@I:01010101010101010101010101010101} {REF:T@I:01010101010101010101010101010101}', 'Replace field references when an entry UUID is changed'; - is $entry2->expanded_url, 'Foo Foo', 'Field reference expands after UUID is changed' + is $entry2->expand_url, 'Foo Foo', 'Field reference expands after UUID is changed' or diag explain $entry2->url; };