mirror of
https://github.com/webmin/webmin.git
synced 2026-03-20 08:40:24 +00:00
Fix perl warning
This commit is contained in:
@@ -103,7 +103,7 @@ sub get_bind_version
|
||||
{
|
||||
if (&has_command($config{'named_path'})) {
|
||||
my $out = &backquote_command("$config{'named_path'} -v 2>&1");
|
||||
if ($out =~ /(bind|named)\s+([0-9\.]+)/i) {
|
||||
if ($out && $out =~ /(bind|named)\s+([0-9\.]+)/i) {
|
||||
return $2;
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user