From 12c073e2ee62289d73ff54d0dbab4245695ce416 Mon Sep 17 00:00:00 2001 From: Michael Stapelberg Date: Sat, 9 Apr 2016 11:55:25 +0200 Subject: [PATCH] cleanup-bintray: keep the most recent, not delete the most recent --- travis/cleanup-bintray.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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);