Compare commits

...

2 Commits

Author SHA1 Message Date
Carlos Salguero
3ebe939ce7 Fixed small error displaying the advices 2018-10-26 16:08:59 -03:00
Carlos Salguero
b33e63cdf2 Replaced HTTP::Micro by HTTP::Tiny 2018-10-26 16:02:34 -03:00
20 changed files with 23227 additions and 9298 deletions

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

1401
lib/HTTP/Tiny.pm Normal file

File diff suppressed because it is too large Load Diff

View File

@@ -45,7 +45,7 @@ use FindBin qw();
eval {
require Percona::Toolkit;
require HTTP::Micro;
require HTTP::Tiny;
};
my $home = $ENV{HOME} || $ENV{HOMEPATH} || $ENV{USERPROFILE} || '.';
@@ -171,7 +171,7 @@ sub version_check {
else {
print "\n# A software update is available:\n";
}
print join("\n", map { "# * $_" } @$advice), "\n\n";
print join("\n", map { "# * ".($_ || '') } @$advice), "\n\n";
}
};
if ( $EVAL_ERROR ) {
@@ -384,7 +384,7 @@ sub pingback {
my $instances = $args{instances};
# Optional args
my $ua = $args{ua} || HTTP::Micro->new( timeout => 3 );
my $ua = $args{ua} || HTTP::Tiny->new( timeout => 3 );
# GET https://upgrade.percona.com, the server will return
# a plaintext list of items/programs it wants the tool