grahamc/hydra2 - Change FSL2DALB4IYT2DDEX76H6CIIKSKARTGEMBT4HZQRKHOAGTLTLEDQC

Fix getResponsibleAuthors

Created by Eelco Dolstra on November 19, 2014

FSL2DALB4IYT2DDEX76H6CIIKSKARTGEMBT4HZQRKHOAGTLTLEDQC

Dependencies

In channels

main

Change contents

Replacement in src/lib/Hydra/Helper/CatalystUtils.pm at line 17 [5.3469]
B:BD[3.9780] → [4.161:187]
```
    getLatestFinishedEval
```
[3.9780]
[6.4124]
```
    getLatestFinishedEval getFirstEval
```

Insertion in src/lib/Hydra/Helper/CatalystUtils.pm at line 191 [5.3469]

[6.4862]

sub getFirstEval {
    my ($build) = @_;
    return $build->jobsetevals->search(
        { hasnewbuilds => 1},
        { rows => 1, order_by => ["id"] })->single;
}

Insertion in src/lib/Hydra/Helper/CatalystUtils.pm at line 258 [5.3469]
[7.175]
[8.368]
```
    return ({}, 0, []) unless $prevBuild;
```

Replacement in src/lib/Hydra/Helper/CatalystUtils.pm at line 264 [5.3469]

B:BD[7.217] → [7.217:299]

B:BD[7.299] → [2.352:431]

∅:D[9.112] → [7.378:517]

∅:D[2.431] → [7.378:517]

B:BD[7.378] → [7.378:517]

    if ($prevBuild) {
        foreach my $curInput ($build->buildinputs_builds) {
            next unless ($curInput->type eq "git" || $curInput->type eq "hg");
            my $prevInput = $prevBuild->buildinputs_builds->find({ name => $curInput->name });
            next unless defined $prevInput;

[7.217]

[7.517]

    my $prevEval = getFirstEval($prevBuild);
    my $eval = getFirstEval($build);
    foreach my $curInput ($eval->jobsetevalinputs) {
        next unless ($curInput->type eq "git" || $curInput->type eq "hg");
        my $prevInput = $prevEval->jobsetevalinputs->find({ name => $curInput->name });
        next unless defined $prevInput;

Replacement in src/lib/Hydra/Helper/CatalystUtils.pm at line 272 [5.3469]

B:BD[7.518] → [7.518:695]

            next if $curInput->type ne $prevInput->type;
            next if $curInput->uri ne $prevInput->uri;
            next if $curInput->revision eq $prevInput->revision;

[7.518]

[7.695]

        next if $curInput->type ne $prevInput->type;
        next if $curInput->uri ne $prevInput->uri;
        next if $curInput->revision eq $prevInput->revision;

Replacement in src/lib/Hydra/Helper/CatalystUtils.pm at line 276 [5.3469]

B:BD[7.696] → [7.696:913]

            my @commits;
            foreach my $plugin (@{$plugins}) {
                push @commits, @{$plugin->getCommits($curInput->type, $curInput->uri, $prevInput->revision, $curInput->revision)};
            }

[7.696]

[7.913]

        my @commits;
        foreach my $plugin (@{$plugins}) {
            push @commits, @{$plugin->getCommits($curInput->type, $curInput->uri, $prevInput->revision, $curInput->revision)};
        }

Replacement in src/lib/Hydra/Helper/CatalystUtils.pm at line 281 [5.3469]

B:BD[7.914] → [7.914:1098]

B:BD[7.1098] → [2.432:522]

∅:D[2.522] → [7.1098:1142]

B:BD[7.1098] → [7.1098:1142]

            foreach my $commit (@commits) {
                #print STDERR "$commit->{revision} by $commit->{author}\n";
                $authors{$commit->{author}} = $commit->{email};
                push @emailable_authors, $commit->{email} if $curInput->emailresponsible;
                $nrCommits++;
            }

[7.914]

[7.1142]

        foreach my $commit (@commits) {
            #print STDERR "$commit->{revision} by $commit->{author}\n";
            $authors{$commit->{author}} = $commit->{email};
            my $inputSpec = $build->jobset->jobsetinputs->find({ name => $curInput->name });
            push @emailable_authors, $commit->{email} if $inputSpec && $inputSpec->emailresponsible;
            $nrCommits++;