Fix make-c-data for Const::Fast

[kerberos/krb5-strength.git] / tests / data / passwords / make-c-data

diff --git a/tests/data/passwords/make-c-data b/tests/data/passwords/make-c-data
index 1fd2c548946cb78fd4d7455467a70bba3f11e956..41352f30f4bbc65d76d3e7a12933b8a186174817 100755 (executable)
--- a/tests/data/passwords/make-c-data
+++ b/tests/data/passwords/make-c-data
@@ -116,7 +116,7 @@ sub output_test {
     say_fh($fh, $prefix, "{\n");
     for my $attr (@ATTRIBUTES) {
         my $value = $test_ref->{$attr};
-        if ($IS_LITERAL_ATTRIBUTE{$attr}) {
+        if (exists($IS_LITERAL_ATTRIBUTE{$attr})) {
             $value //= 0;
         } else {
             $value = defined($value) ? qq{"$value"} : 'NULL';