more bug fixes, none relevant to distros

This commit is contained in:
Harald Hope 2018-03-21 01:28:26 -07:00
parent 222d818299
commit 5f30b3856c

8
inxi
View file

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