From 06547524e83b2a3128ef52ecf384864edc450796 Mon Sep 17 00:00:00 2001 From: Martin Mares Date: Thu, 26 Jun 2008 22:44:45 +0200 Subject: [PATCH] Configure: better guard against undef's returned by backticks. --- lib/perl/Configure.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/perl/Configure.pm b/lib/perl/Configure.pm index 4ab9e727..cf082cca 100644 --- a/lib/perl/Configure.pm +++ b/lib/perl/Configure.pm @@ -200,6 +200,7 @@ sub Finish() { sub TryCmd($) { my ($cmd) = @_; my $res = `$cmd`; + defined $res or return; chomp $res; return $res unless $?; return; -- 2.39.2