BitBucketStatus: $build -> $topbuild, $b -> $build (perlcritic)

Dependencies

• [2] HNW36OMG Use build id for bitbucket Key
• [3] OI2FTIMY Add BitBucket plugin
• [4] 5WNGKHLZ Plugins: Add isEnabled method
• [5] UGF7DRW3 Skip the input if the emailResponsible field is disabled

Change contents

• replacement in src/lib/Hydra/Plugin/BitBucketStatus.pm at line 25
  [3.336]→[3.336:389](∅→∅)
  − my ($self, $build, $dependents, $finished) = @_;
  [3.336]

  [3.389]
  + my ($self, $topbuild, $dependents, $finished) = @_;
• replacement in src/lib/Hydra/Plugin/BitBucketStatus.pm at line 29
  [3.516]→[3.516:640](∅→∅)
  − foreach my $b ($build, @{$dependents}) {

  − my $jobName = showJobName $b;

  − my $evals = $build->jobsetevals;
  [3.516]

  [3.640]
  + foreach my $build ($topbuild, @{$dependents}) {

  + my $jobName = showJobName $build;

  + my $evals = $topbuild->jobsetevals;
• replacement in src/lib/Hydra/Plugin/BitBucketStatus.pm at line 35
  [3.726]→[3.726:864](∅→∅)
  − state => $finished ? toBitBucketState($b->buildstatus) : "INPROGRESS",

  − url => "$baseurl/build/" . $b->id,
  [3.726]

  [3.864]
  + state => $finished ? toBitBucketState($tbuild->buildstatus) : "INPROGRESS",

  + url => "$baseurl/build/" . $tbuild->id,
• replacement in src/lib/Hydra/Plugin/BitBucketStatus.pm at line 38
  [3.898]→[2.0:31](∅→∅),[2.31]→[3.931:1005](∅→∅),[3.931]→[3.931:1005](∅→∅)
  − key => $b->id,

  − description => "Hydra build #" . $b->id . " of $jobName",
  [3.898]

  [3.1005]
  + key => $tbuild->id,

  + description => "Hydra build #" . $tbuild->id . " of $jobName",