grahamc/hydra2 - Change S5NPXZG34PZZ5FIIAQ2IO72G6PAQC4JZ2WS2CVKTO623BNQKGMHAC

Fix indentation

Created by Eelco Dolstra on January 23, 2013

S5NPXZG34PZZ5FIIAQ2IO72G6PAQC4JZ2WS2CVKTO623BNQKGMHAC

Dependencies

In channels

main

Change contents

Replacement in tests/evaluation-tests.pl at line 29 [6.804]

B:BD[5.906] → [5.906:1123]

B:BD[5.1123] → [2.52:210]

  ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
  my $newbuild = $db->resultset('Builds')->find($build->id);
  my $expected = $build->job->name eq "fails" ? 1 : 0;
  ok($newbuild->finished == 1 && $newbuild->buildstatus == $expected, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus $expected");

[5.906]

[5.1270]

    ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
    my $newbuild = $db->resultset('Builds')->find($build->id);
    my $expected = $build->job->name eq "fails" ? 1 : 0;
    ok($newbuild->finished == 1 && $newbuild->buildstatus == $expected, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus $expected");

Replacement in tests/evaluation-tests.pl at line 41 [6.804]

B:BD[7.245] → [7.245:407]

B:BD[7.407] → [2.211:353]

  ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
  my $newbuild = $db->resultset('Builds')->find($build->id);
  ok($newbuild->finished == 1 && $newbuild->buildstatus == 0, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus 0");

[7.245]

[7.538]

    ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
    my $newbuild = $db->resultset('Builds')->find($build->id);
    ok($newbuild->finished == 1 && $newbuild->buildstatus == 0, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus 0");

Replacement in tests/evaluation-tests.pl at line 49 [6.804]

B:BD[7.887] → [7.887:1049]

B:BD[7.1049] → [2.354:496]

  ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
  my $newbuild = $db->resultset('Builds')->find($build->id);
  ok($newbuild->finished == 1 && $newbuild->buildstatus == 0, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus 0");

[7.887]

[7.1180]

    ok(runBuild($build), "Build '".$build->job->name."' from jobs/basic.nix should exit with code 0");
    my $newbuild = $db->resultset('Builds')->find($build->id);
    ok($newbuild->finished == 1 && $newbuild->buildstatus == 0, "Build '".$build->job->name."' from jobs/basic.nix should have buildstatus 0");

Replacement in tests/evaluation-tests.pl at line 109 [6.804]

B:BD[4.1791] → [4.1791:2025]

  my $scmName = $scm->{"name"};
  my $nixexpr = $scm->{"nixexpr"};
  my $type = $scm->{"type"};
  my $uri = $scm->{"uri"};
  my $update = $scm->{"update"};
  $jobset = createJobsetWithOneInput($scmName, $nixexpr, "src", $type, $uri);

[4.1791]

[8.0]

    my $scmName = $scm->{"name"};
    my $nixexpr = $scm->{"nixexpr"};
    my $type = $scm->{"type"};
    my $uri = $scm->{"uri"};
    my $update = $scm->{"update"};
    $jobset = createJobsetWithOneInput($scmName, $nixexpr, "src", $type, $uri);

Replacement in tests/evaluation-tests.pl at line 116 [6.804]

B:BD[8.1] → [4.2026:2150]

  my $state = 0;
  my $q = 0;
  my ($loop, $updated) = updateRepository($scmName, $update);
  while($loop) {
    my $c = 0;

[8.1]

[9.5291]

    my $state = 0;
    my $q = 0;
    my ($loop, $updated) = updateRepository($scmName, $update);
    while($loop) {
        my $c = 0;

Replacement in tests/evaluation-tests.pl at line 122 [6.804]

B:BD[9.5292] → [4.2151:2312]

    # Verify that it can be fetched and possibly queued.
    ok(evalSucceeds($jobset),                  "$scmName:$state.$c: Evaluating nix-expression."); $c++;

[9.5292]

[4.2312]

        # Verify that it can be fetched and possibly queued.
        ok(evalSucceeds($jobset),                  "$scmName:$state.$c: Evaluating nix-expression."); $c++;

Replacement in tests/evaluation-tests.pl at line 125 [6.804]

B:BD[4.2313] → [4.2313:2657]

    # Verify that the evaluation has queued a new job and evaluate again to ...
    if ($updated) {
        $q++;
        ok(nrQueuedBuildsForJobset($jobset) == $q, "$scmName:$state.$c: Expect $q jobs in the queue."); $c++;
        ok(evalSucceeds($jobset),                  "$scmName:$state.$c: Evaluating nix-expression again."); $c++;
    }

[4.2313]

[4.2657]

        # Verify that the evaluation has queued a new job and evaluate again to ...
        if ($updated) {
            $q++;
            ok(nrQueuedBuildsForJobset($jobset) == $q, "$scmName:$state.$c: Expect $q jobs in the queue."); $c++;
            ok(evalSucceeds($jobset),                  "$scmName:$state.$c: Evaluating nix-expression again."); $c++;
        }

Replacement in tests/evaluation-tests.pl at line 132 [6.804]

B:BD[4.2658] → [4.2658:2827]

    # ... check that it is deterministic and not queued again.
    ok(nrQueuedBuildsForJobset($jobset) == $q, "$scmName:$state.$c: Expect $q jobs in the queue."); $c++;

[4.2658]

[4.2827]

        # ... check that it is deterministic and not queued again.
        ok(nrQueuedBuildsForJobset($jobset) == $q, "$scmName:$state.$c: Expect $q jobs in the queue."); $c++;

Replacement in tests/evaluation-tests.pl at line 135 [6.804]

B:BD[4.2828] → [4.2828:2935]

    $state++;
    ($loop, $updated) = updateRepository($scmName, $update, getcwd . "/$scmName-repo/");
  }

[4.2828]

[9.5394]

        $state++;
        ($loop, $updated) = updateRepository($scmName, $update, getcwd . "/$scmName-repo/");
    }

Replacement in tests/query-all-tables.pl at line 13 [10.291]

B:BD[10.560] → [11.31:79]

B:BD[11.79] → [12.31:257]

B:BD[12.257] → [3.324:335]

∅:D[3.335] → [12.258:351]

B:BD[11.153] → [12.258:351]

∅:D[11.244] → [10.718:722]

∅:D[12.351] → [10.718:722]

B:BD[10.718] → [10.718:722]

  my $title = "Basic select query for $source";
  if ($source eq "SchemaVersion") {
      ok(scalar($db->resultset($source)->all) == 1, $title);
  } elsif( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) {
      ok(scalar($db->resultset($source)->all) == 0, $title);
  } else {
      ok(scalar($db->resultset($source)->search({},{ bind => ["", "", ""] })) == 0, $title);
  }

[10.560]

[10.722]

    my $title = "Basic select query for $source";
    if ($source eq "SchemaVersion") {
        ok(scalar($db->resultset($source)->all) == 1, $title);
    } elsif( $source !~ m/^(LatestSucceeded|JobStatus|ActiveJobs)/) {
        ok(scalar($db->resultset($source)->all) == 0, $title);
    } else {
        ok(scalar($db->resultset($source)->search({},{ bind => ["", "", ""] })) == 0, $title);
    }

Deletion in tests/query-all-tables.pl at line 22 [10.291]
B:BD[10.724] → [11.245:246]