small bug, creates out put glitch, but not error

This commit is contained in:
Harald Hope 2023-11-02 18:46:12 -07:00
parent 4b5bdd7114
commit bf13ee49a8

5
inxi
View file

@ -50,7 +50,7 @@ use POSIX qw(ceil uname strftime ttyname);
## INXI INFO ## ## INXI INFO ##
my $self_name='inxi'; my $self_name='inxi';
my $self_version='3.3.31'; my $self_version='3.3.31';
my $self_date='2023-10-31'; my $self_date='2023-11-02';
my $self_patch='00'; my $self_patch='00';
## END INXI INFO ## ## END INXI INFO ##
@ -2711,7 +2711,8 @@ sub download_file {
sub get_file_http_tiny { sub get_file_http_tiny {
my ($type,$url,$file,$ua) = @_; my ($type,$url,$file,$ua) = @_;
$ua = ($ua && $dl{'ua'}) ? $dl{'ua'} . $ua: ''; $ua = ($ua && $dl{'ua'}) ? $dl{'ua'} . $ua: '';
my %headers = ($ua) ? ('agent' => $ua) : undef; my %headers;
%headers = ('agent' => $ua) if $ua;
my $tiny = HTTP::Tiny->new(%headers); my $tiny = HTTP::Tiny->new(%headers);
# note: default is no verify, so default here actually is to verify unless overridden # note: default is no verify, so default here actually is to verify unless overridden
$tiny->verify_SSL => 1 if !$use{'no-ssl'}; $tiny->verify_SSL => 1 if !$use{'no-ssl'};