bug fixes

This commit is contained in:
Harald Hope 2018-03-21 01:20:18 -07:00
parent a1129aa7ca
commit 222d818299

26
inxi
View file

@ -3191,7 +3191,7 @@ sub update_man {
my $man_file_path="$man_file_location/$self_name.1.gz" ; my $man_file_path="$man_file_location/$self_name.1.gz" ;
my $output = ''; my $output = '';
my $downloader_man_error=1; my $b_downloaded=1;
if ( ! -d $man_file_location ){ if ( ! -d $man_file_location ){
print "The required man directory was not detected on your system.\n"; print "The required man directory was not detected on your system.\n";
print "Unable to continue: $man_file_location\n"; print "Unable to continue: $man_file_location\n";
@ -3209,22 +3209,22 @@ sub update_man {
system( 'mandb' ); system( 'mandb' );
} }
} }
if ( $dl{'dl'} =~ /tiny|wget/){ # if ( $dl{'dl'} =~ /^(tiny|wget)$/){
print "Checking Man page download URL...\n"; # print "Checking Man page download URL...\n";
download_file('spider', $man_file_url); # download_file('spider', $man_file_url);
$downloader_man_error = $?; # $b_downloaded = $?;
} # }
if ( $downloader_man_error ){ if ( $b_downloaded ){
if ( $dl{'dl'} =~ /tiny|wget/){ # if ( $dl{'dl'} =~ /^(tiny|wget)$/){
print "Man file download URL verified: $man_file_url\n"; # print "Man file download URL verified: $man_file_url\n";
} # }
print "Downloading Man page file now.\n"; print "Downloading Man page file now.\n";
# returns perl, 1 for true, 0 for false, even when using shell tool returns # returns perl, 1 for true, 0 for false, even when using shell tool returns
download_file('file', $man_file_url, $man_file_path ); download_file('file', $man_file_url, $man_file_path );
$downloader_man_error = $?; $b_downloaded = $?;
if ( !$downloader_man_error ){ if ( !$b_downloaded ){
print "Oh no! Something went wrong downloading the Man file at: $man_file_url\n"; print "Oh no! Something went wrong downloading the Man file at: $man_file_url\n";
print "Check the error messages for what happened. Error: $downloader_man_error\n"; print "Check the error messages for what happened. Error: $b_downloaded\n";
} }
else { else {
print "Download/install of man page successful. Check to make sure it works: man inxi\n"; print "Download/install of man page successful. Check to make sure it works: man inxi\n";