[REBUILD] Avoid deleting cached Travis status on each build

Raku · Dec 25, 2015 · 734f5b3 · 734f5b3
1 parent 1ff22c1
commit 734f5b3
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/lib/ModulesPerl6/DbBuilder/Dist/PostProcessor/TravisCI.pm b/lib/ModulesPerl6/DbBuilder/Dist/PostProcessor/TravisCI.pm
@@ -21,8 +21,11 @@ sub process {
         and not (
             $dist->{travis_status} and $dist->{travis_status} eq 'unknown'
         );
-    delete $dist->{travis_status}; # toss cached Travis status
-    return unless $dist->{_builder}{has_travis};
+
+    unless ( $dist->{_builder}{has_travis} ) {
+        delete $dist->{travis_status}; # toss cached Travis status
+        return;
+    }
 
     my ( $user, $repo ) = $dist->{_builder}->@{qw/repo_user  repo/};
     return unless length $user and length $repo;