From: Michael Stapelberg Date: Sat, 9 Apr 2016 09:55:25 +0000 (+0200) Subject: cleanup-bintray: keep the most recent, not delete the most recent X-Git-Tag: 4.13~99 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=12c073e2ee62289d73ff54d0dbab4245695ce416;p=i3%2Fi3 cleanup-bintray: keep the most recent, not delete the most recent --- diff --git a/travis/cleanup-bintray.pl b/travis/cleanup-bintray.pl index d150d1ed..296ae388 100755 --- a/travis/cleanup-bintray.pl +++ b/travis/cleanup-bintray.pl @@ -25,7 +25,7 @@ my $client = HTTP::Tiny->new( my $resp = $client->get($apiurl); die "Getting versions failed: HTTP status $resp->{status} (content: $resp->{content})" unless $resp->{success}; my $decoded = decode_json($resp->{content}); -my @versions = sort @{$decoded->{versions}}; +my @versions = reverse sort @{$decoded->{versions}}; # Keep the most recent 5 versions. splice(@versions, 0, 5);