diff options
author | Richard Levitte <levitte@openssl.org> | 2019-12-01 08:20:09 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2019-12-04 00:19:40 +0100 |
commit | 278de77b881739267d86f96088557af3da966982 (patch) | |
tree | ff03e0a2f673067c13fcd2f381efccc4b56eef87 /configdata.pm.in | |
parent | Update NOTES.ANDROID for newer NDK versions + small fixes. (diff) | |
download | openssl-278de77b881739267d86f96088557af3da966982.tar.xz openssl-278de77b881739267d86f96088557af3da966982.zip |
configdata.pm.in: Don't try to quotify undefined values
Fixes #10503
Reviewed-by: Matthias St. Pierre <Matthias.St.Pierre@ncp-e.com>
(Merged from https://github.com/openssl/openssl/pull/10548)
Diffstat (limited to 'configdata.pm.in')
-rw-r--r-- | configdata.pm.in | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/configdata.pm.in b/configdata.pm.in index 312122686f..71627b48ef 100644 --- a/configdata.pm.in +++ b/configdata.pm.in @@ -245,7 +245,13 @@ _____ foreach (sort keys %target) { next if $_ =~ m|^_| || $_ eq 'template'; my $quotify = sub { - map { (my $x = $_) =~ s|([\\\$\@"])|\\$1|g; "\"$x\""} @_; + map { + if (defined $_) { + (my $x = $_) =~ s|([\\\$\@"])|\\$1|g; "\"$x\"" + } else { + "undef"; + } + } @_; }; print ' ', $_, ' => '; if (ref($target{$_}) eq "ARRAY") { |