]> eyrie.org Git - kerberos/krb5-strength.git/commitdiff
Fix make-c-data for Const::Fast
authorRuss Allbery <eagle@eyrie.org>
Mon, 25 Dec 2023 21:22:35 +0000 (13:22 -0800)
committerRuss Allbery <eagle@eyrie.org>
Mon, 25 Dec 2023 21:22:35 +0000 (13:22 -0800)
The change from Readonly to Const::Fast broke make-c-data because
of how it was using a hash of flags. Use exists explicitly so that
it still works with a read-only hash.

tests/data/passwords/make-c-data

index 1fd2c548946cb78fd4d7455467a70bba3f11e956..41352f30f4bbc65d76d3e7a12933b8a186174817 100755 (executable)
@@ -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';