From 222d818299c1883df8825d5dec83fc1378c7ed0d Mon Sep 17 00:00:00 2001 From: Harald Hope Date: Wed, 21 Mar 2018 01:20:18 -0700 Subject: [PATCH] bug fixes --- inxi | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) diff --git a/inxi b/inxi index 2d264b8..318f90f 100755 --- a/inxi +++ b/inxi @@ -3191,7 +3191,7 @@ sub update_man { my $man_file_path="$man_file_location/$self_name.1.gz" ; my $output = ''; - my $downloader_man_error=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"; @@ -3209,22 +3209,22 @@ sub update_man { system( 'mandb' ); } } - if ( $dl{'dl'} =~ /tiny|wget/){ - print "Checking Man page download URL...\n"; - download_file('spider', $man_file_url); - $downloader_man_error = $?; - } - if ( $downloader_man_error ){ - if ( $dl{'dl'} =~ /tiny|wget/){ - print "Man file download URL verified: $man_file_url\n"; - } +# if ( $dl{'dl'} =~ /^(tiny|wget)$/){ +# print "Checking Man page download URL...\n"; +# download_file('spider', $man_file_url); +# $b_downloaded = $?; +# } + if ( $b_downloaded ){ +# if ( $dl{'dl'} =~ /^(tiny|wget)$/){ +# print "Man file download URL verified: $man_file_url\n"; +# } 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 ); - $downloader_man_error = $?; - if ( !$downloader_man_error ){ + $b_downloaded = $?; + 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: $downloader_man_error\n"; + print "Check the error messages for what happened. Error: $b_downloaded\n"; } else { print "Download/install of man page successful. Check to make sure it works: man inxi\n";