Fill out recycle bin functionality

[chaz/p5-File-KDBX] / t / entry.t

diff --git a/t/entry.t b/t/entry.t
index 3a6267d4a4059301f1d110fef993a80261e8a6ba..988e71214c0ba441315798fb12bfcc2cfe24cb6a 100644 (file)
--- a/t/entry.t
+++ b/t/entry.t
@@ -18,7 +18,7 @@ subtest 'Construction' => sub {
     is $entry->{username}, 'foo', 'username is in the object still';
     is $entry->username, '', 'username is not the UserName string';
 
-    like exception { $entry->kdbx }, qr/disassociated from a KDBX database/, 'Dies if disassociated';
+    like exception { $entry->kdbx }, qr/disconnected/, 'Dies if disconnected';
     $entry->kdbx(my $kdbx = File::KDBX->new);
     is $entry->kdbx, $kdbx, 'Set a database after instantiation';