}
sub updateProject {
    my ($c, $project) = @_;
    my $projectName = $c->request->params->{name};
    die "Invalid project name: $projectName" unless $projectName =~ /^[[:alpha:]]\w*$/;
    
    my $displayName = $c->request->params->{displayname};
    die "Invalid display name: $displayName" unless $displayName =~ /^\w.*\w$/;
    
    $project->name($projectName);
    $project->displayname($displayName);
    $project->description($c->request->params->{description});
    
    $project->update;

    my ( $self, $c, $projectName ) = @_;

    my ( $self, $c, $projectName, $subcommand ) = @_;

    my $isPosted = $c->request->method eq "POST";
    $subcommand = "" unless defined $subcommand;
    if ($subcommand eq "edit") {
        $c->stash->{edit} = 1;
    } elsif ($subcommand eq "submit" && $isPosted) {
        $c->model('DB')->schema->txn_do(sub {
            updateProject($c, $project);
        });
        return $c->res->redirect($c->uri_for("/project", $projectName));
    } elsif ($subcommand eq "delete" && $isPosted) {
        $c->model('DB')->schema->txn_do(sub {
            $project->delete;
        });
        return $c->res->redirect($c->uri_for("/"));
    } elsif ($subcommand eq "") {
    } else {
        return error($c, "Unknown subcommand $subcommand.");
    }

sub createproject :Local {
    my ( $self, $c, $subcommand ) = @_;

    if (defined $subcommand && $subcommand eq "submit") {
        eval {
            my $projectName = $c->request->params->{name};
            $c->model('DB')->schema->txn_do(sub {
                # Note: $projectName is validated in updateProject,
                # which will abort the transaction if the name isn't
                # valid.
                my $project = $c->model('DB::Projects')->create({name => $projectName, displayname => ""});
                updateProject($c, $project);
            });
            return $c->res->redirect($c->uri_for("/project", $projectName));
        };
        if ($@) {
            return error($c, $@);
        }
    }
    
    $c->stash->{template} = 'project.tt';
    $c->stash->{create} = 1;
    $c->stash->{edit} = 1;
}

    my ( $self, $c, $project, $jobName ) = @_;

    my ( $self, $c, $projectName, $jobName ) = @_;

    $c->stash->{projectName} = $project;

    (my $project) = $c->model('DB::Projects')->search({ name => $projectName });
    return error($c, "Project <tt>$projectName</tt> doesn't exist.") if !defined $project;
    $c->stash->{curProject} = $project;

        {finished => 1, project => $project, attrName => $jobName},

        {finished => 1, project => $projectName, attrName => $jobName},

[% USE HTML %]

<p>I'm very sorry, but an error occurred:  <span class="error-msg">[% error %]</span></p>

<p>I'm very sorry, but an error occurred: <span class="error-msg">[% HTML.escape(error) %]</span></p>

}
td {
    vertical-align: top;

    white-space: pre;

/* Editing */
input.string {
    font-family: sans-serif;
    font-size: 100%;
    background-color: #fffff0;
    width: 30em;
}

<h1>All builds for job <tt>[% projectName %]:[% jobName %]</tt></h1>

<h1>All builds for job <tt>[% curProject.name %]:[% jobName %]</tt></h1>

                      [% INCLUDE makeLink uri = c.uri_for('/project' project.name 'edit') title = "Edit" %]

              [% INCLUDE makeLink uri = c.uri_for('/create-project') title = "Create a project" %]

              [% INCLUDE makeLink uri = c.uri_for('/createproject') title = "Create a project" %]

[% USE HTML %]

<h1>Project <tt>[% curProject.name %]</tt></h1>

[% BLOCK maybeEditString %]
  [% IF edit %]
    <input type='text' class='string' [% HTML.attributes(name => param, value => value) %] />
  [% ELSE %]
    [% HTML.escape(value) %]
  [% END %]
[% END %]
[% IF edit %]
  <form action="[% IF create %][% c.uri_for('/createproject/submit') %][% ELSE %][% c.uri_for('/project' curProject.name 'submit') %][% END %]" method="post">
[% END %]
[% IF create %]
  <h1>New Project</h1>
[% ELSE %]
  <h1>Project <tt>[% curProject.name %]</tt></h1>
[% END %]

<h2>General information</h2>

<p><strong>Description:</strong> [% curProject.description %]</p>

<table>
  [% IF edit %]
  <tr>
    <th>Identifier:</th>
    <td><tt>[% INCLUDE maybeEditString param="name" value=curProject.name %]</tt></td>
  </tr>
  [% END %]
  <tr>
    <th>Display name:</th>
    <td>[% INCLUDE maybeEditString param="displayname" value=curProject.displayname %]</td>
  </tr>
  <tr>
    <th>Description:</th>
    <td>[% INCLUDE maybeEditString param="description" value=curProject.description %]</td>
  </tr>
</table>

    [% IF edit %]
    <tr>
      <th>Identifier:</th>
      <td><tt>[% INCLUDE maybeEditString value=jobset.name %]</tt></td>
    </tr>
    [% END %]

      <td>[% jobset.description %]</td>

      <td>[% INCLUDE maybeEditString value=jobset.description %]</td>

      <td><tt>[% jobset.nixexprpath %]</tt> in input <tt>[% jobset.nixexprinput %]</tt></td>

      <td><tt>[% INCLUDE maybeEditString value=jobset.nixexprpath %]</tt> in input <tt>[% INCLUDE maybeEditString value=jobset.nixexprinput %]</tt></td>

          <td><tt>[% input.name %]</tt></td>
          <td><tt>[% input.type %]</tt></td>

          <td><tt>[% INCLUDE maybeEditString value=input.name %]</tt></td>
          <td><tt>
            [% IF edit %]
              <select>
                <option>svn</option>
                <option>cvs</option>
                <option>uri</option>
                <option>string</option>
                <option>path</option>
              </select>
            [% ELSE %]
              [% input.type %]
            [% END %]
          </tt></td>

                <tt>"[% alt.value %]"</tt>

                <tt>
                  [% IF edit %]
                    <input type='text' class='string' value='[% alt.value %]' />
                    <br />
                  [% ELSE %]
                    "[% alt.value %]"
                  [% END %]
                </tt>

                <tt>[% alt.uri %]</tt>

                <tt>[% INCLUDE maybeEditString value=alt.uri %]</tt>

[% IF !edit %]

[% END %]
[% IF edit %]
  <p><input type="submit" value="Apply" /></p>
  </form>
  <form action="[% c.uri_for('/project' curProject.name 'delete') %]" method="post">
    <p><input type="submit" value="Delete this project" /></p>
  </form>
      
[% END %]

    type          text not null, -- "svn", "cvs", "path", "file", "string"

    type          text not null, -- "svn", "cvs", "path", "uri", "string"

insert into jobSets(project, name, description, nixExprInput, nixExprPath) values('patchelf', 'trunk', 'PatchELF', 'patchelfSrc', 'release.nix');

insert into jobSets(project, name, description, nixExprInput, nixExprPath) values('patchelf', 'trunk', 'PatchELF trunk', 'patchelfSrc', 'release.nix');