X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=t%2Fcrypt.t;h=abb6dc6fc341bcaedbab7773dbf4de91bdcb5f00;hp=69a52efb33dfad5a75382be33bd3e2847f8f78f9;hb=5950244f5eaeda8ec5f83b236552217ec5d480cb;hpb=8e03ecf8069596b2a3bf7c21a6d72860b06986ff

diff --git a/t/crypt.t b/t/crypt.t
index 69a52ef..abb6dc6 100644
--- a/t/crypt.t
+++ b/t/crypt.t
@@ -40,7 +40,7 @@ subtest 'Error handling' => sub {
     pipe(my $read, my $write) or die "pipe failed: $!";
     $read = File::KDBX::IO::Crypt->new($read, cipher => $block_cipher);
 
-    print $write "blah blah blah!\1";
+    print $write "blah blah blah!"; # should produce: FATAL: cipher text length has to be multiple of 16 (15)
     close($write) or die "close failed: $!";
 
     is $read->error, '', 'Read handle starts out fine';