move functions to the File::KDBX::XS module

[chaz/p5-File-KDBX-XS] / t / kdf-aes.t

diff --git a/t/kdf-aes.t b/t/kdf-aes.t
index 94ddf820cac6f7fcfd6c8098e8060306989dd72c..32568999da2db32be2647a4990a5db0129a947ee 100644 (file)
--- a/t/kdf-aes.t
+++ b/t/kdf-aes.t
@@ -11,7 +11,7 @@ my $seed        = "\1" x 16;
 my $rounds      = 123;
 my $expected    = pack('H*', '7deb990760f2ff0f9b8248d63bfb7264');
 
-my $result = File::KDBX::KDF::AES::_transform_half_xs($key, $seed, $rounds);
+my $result = File::KDBX::XS::kdf_aes_transform_half($key, $seed, $rounds);
 is $result, $expected, 'AES KDF transform works' or diag unpack('H*', $result);
 
 done_testing;