diff --git a/src/lib/Hydra.pm b/src/lib/Hydra.pm index 0f76a2e9..7d5232d0 100644 --- a/src/lib/Hydra.pm +++ b/src/lib/Hydra.pm @@ -22,9 +22,6 @@ our $VERSION = '0.01'; __PACKAGE__->config( name => 'Hydra', default_view => "TT", - session => { - storage => Hydra::Model::DB::getHydraPath . "/session_data" - }, authentication => { default_realm => "dbic", realms => { @@ -49,6 +46,7 @@ __PACKAGE__->config( }, 'Plugin::Session' => { expires => 3600 * 24 * 2, + storage => Hydra::Model::DB::getHydraPath . "/session_data" }, ); diff --git a/src/lib/Hydra/Controller/Admin.pm b/src/lib/Hydra/Controller/Admin.pm index e8898597..c09d6cf1 100644 --- a/src/lib/Hydra/Controller/Admin.pm +++ b/src/lib/Hydra/Controller/Admin.pm @@ -15,6 +15,7 @@ use Email::Sender::Simple qw(sendmail); use Email::Sender::Transport::SMTP; use Config::General; + sub nixMachines { my ($c) = @_; my $result = "# GENERATED BY HYDRA\n"; @@ -32,6 +33,7 @@ sub nixMachines { return $result; } + sub saveNixMachines { my ($c) = @_; @@ -42,12 +44,14 @@ sub saveNixMachines { close (NIXMACHINES); } + sub admin : Chained('/') PathPart('admin') CaptureArgs(0) { my ($self, $c) = @_; requireAdmin($c); $c->stash->{admin} = 1; } + sub index : Chained('admin') PathPart('') Args(0) { my ($self, $c) = @_; $c->stash->{machines} = [$c->model('DB::BuildMachines')->search( @@ -62,7 +66,8 @@ sub index : Chained('admin') PathPart('') Args(0) { , order_by => [ 'machine', 'stepnr' ] } ) ]; $c->stash->{template} = 'admin.tt'; - } +} + sub updateUser { my ($c, $user) = @_; @@ -88,6 +93,16 @@ sub updateUser { } } + +sub create_user : Chained('admin') PathPart('create-user') Args(0) { + my ($self, $c) = @_; + + requireAdmin($c); + + error($c, "Not implemented yet!"); # FIXME +} + + sub user : Chained('admin') PathPart('user') CaptureArgs(1) { my ($self, $c, $username) = @_; @@ -99,6 +114,7 @@ sub user : Chained('admin') PathPart('user') CaptureArgs(1) { $c->stash->{user} = $user; } + sub users : Chained('admin') PathPart('users') Args(0) { my ($self, $c) = @_; $c->stash->{users} = [$c->model('DB::Users')->search({}, {order_by => "username"})]; @@ -106,6 +122,7 @@ sub users : Chained('admin') PathPart('users') Args(0) { $c->stash->{template} = 'users.tt'; } + sub user_edit : Chained('user') PathPart('edit') Args(0) { my ($self, $c) = @_; @@ -113,16 +130,23 @@ sub user_edit : Chained('user') PathPart('edit') Args(0) { $c->stash->{edit} = 1; } + sub user_edit_submit : Chained('user') PathPart('submit') Args(0) { my ($self, $c) = @_; requirePost($c); txn_do($c->model('DB')->schema, sub { - updateUser($c, $c->stash->{user}) ; + if (($c->request->params->{submit} || "") eq "delete") { + $c->stash->{user}->delete; + } else { + updateUser($c, $c->stash->{user}); + } }); + $c->res->redirect("/admin/users"); } + sub sendemail { my ($to, $subject, $body) = @_; @@ -141,6 +165,7 @@ sub sendemail { sendmail($email); } + sub reset_password : Chained('user') PathPart('reset-password') Args(0) { my ($self, $c) = @_; @@ -168,6 +193,7 @@ sub reset_password : Chained('user') PathPart('reset-password') Args(0) { $c->res->redirect("/admin/users"); } + sub machines : Chained('admin') PathPart('machines') Args(0) { my ($self, $c) = @_; $c->stash->{machines} = [$c->model('DB::BuildMachines')->search({}, {order_by => "hostname"})]; @@ -176,7 +202,8 @@ sub machines : Chained('admin') PathPart('machines') Args(0) { $c->stash->{nixMachinesWritable} = (-e "/etc/nix.machines" && -w "/etc/nix.machines"); $c->stash->{template} = 'machines.tt'; - } +} + sub machine : Chained('admin') PathPart('machine') CaptureArgs(1) { my ($self, $c, $machineName) = @_; @@ -189,6 +216,7 @@ sub machine : Chained('admin') PathPart('machine') CaptureArgs(1) { $c->stash->{machine} = $machine; } + sub machine_edit : Chained('machine') PathPart('edit') Args(0) { my ($self, $c) = @_; $c->stash->{template} = 'machine.tt'; @@ -196,19 +224,27 @@ sub machine_edit : Chained('machine') PathPart('edit') Args(0) { $c->stash->{edit} = 1; } + sub machine_edit_submit : Chained('machine') PathPart('submit') Args(0) { my ($self, $c) = @_; requirePost($c); txn_do($c->model('DB')->schema, sub { - updateMachine($c, $c->stash->{machine}) ; + if (($c->request->params->{submit} || "") eq "delete") { + $c->stash->{machine}->delete; + } else { + updateMachine($c, $c->stash->{machine}); + } }); + saveNixMachines($c); + $c->res->redirect("/admin/machines"); } + sub updateMachine { - my ($c, $machine) = @_; + my ($c, $machine) = @_; my $hostname = trim $c->request->params->{"hostname"}; my $username = trim $c->request->params->{"username"}; @@ -240,6 +276,7 @@ sub updateMachine { } } + sub create_machine : Chained('admin') PathPart('create-machine') Args(0) { my ($self, $c) = @_; @@ -269,16 +306,6 @@ sub create_machine_submit : Chained('admin') PathPart('create-machine/submit') A $c->res->redirect("/admin/machines"); } -sub machine_delete : Chained('machine') PathPart('delete') Args(0) { - my ($self, $c) = @_; - requirePost($c); - - txn_do($c->model('DB')->schema, sub { - $c->stash->{machine}->delete; - }); - saveNixMachines($c); - $c->res->redirect("/admin/machines"); -} sub machine_enable : Chained('machine') PathPart('enable') Args(0) { my ($self, $c) = @_; @@ -287,6 +314,7 @@ sub machine_enable : Chained('machine') PathPart('enable') Args(0) { $c->res->redirect("/admin/machines"); } + sub machine_disable : Chained('machine') PathPart('disable') Args(0) { my ($self, $c) = @_; $c->stash->{machine}->update({ enabled => 0}); @@ -294,6 +322,7 @@ sub machine_disable : Chained('machine') PathPart('disable') Args(0) { $c->res->redirect("/admin/machines"); } + sub clear_queue_non_current : Chained('admin') Path('clear-queue-non-current') Args(0) { my ($self, $c) = @_; # !!! Mark the builds as cancelled instead. @@ -301,6 +330,7 @@ sub clear_queue_non_current : Chained('admin') Path('clear-queue-non-current') A $c->res->redirect("/admin"); } + sub clear_queue : Chained('admin') Path('clear-queue') Args(0) { my ($self, $c) = @_; # !!! Mark the builds as cancelled instead. @@ -308,6 +338,7 @@ sub clear_queue : Chained('admin') Path('clear-queue') Args(0) { $c->res->redirect("/admin"); } + sub clearfailedcache : Chained('admin') Path('clear-failed-cache') Args(0) { my ($self, $c) = @_; @@ -316,6 +347,7 @@ sub clearfailedcache : Chained('admin') Path('clear-failed-cache') Args(0) { $c->res->redirect("/admin"); } + sub clearvcscache : Chained('admin') Path('clear-vcs-cache') Args(0) { my ($self, $c) = @_; @@ -334,6 +366,7 @@ sub clearvcscache : Chained('admin') Path('clear-vcs-cache') Args(0) { $c->res->redirect("/admin"); } + sub managenews : Chained('admin') Path('news') Args(0) { my ($self, $c) = @_; @@ -342,6 +375,7 @@ sub managenews : Chained('admin') Path('news') Args(0) { $c->stash->{template} = 'news.tt'; } + sub news_submit : Chained('admin') Path('news/submit') Args(0) { my ($self, $c) = @_; @@ -359,6 +393,7 @@ sub news_submit : Chained('admin') Path('news/submit') Args(0) { $c->res->redirect("/admin/news"); } + sub news_delete : Chained('admin') Path('news/delete') Args(1) { my ($self, $c, $id) = @_; @@ -371,6 +406,7 @@ sub news_delete : Chained('admin') Path('news/delete') Args(1) { $c->res->redirect("/admin/news"); } + sub force_eval : Chained('admin') Path('eval') Args(2) { my ($self, $c, $projectName, $jobsetName) = @_; @@ -387,4 +423,5 @@ sub force_eval : Chained('admin') Path('eval') Args(2) { $c->res->redirect("/project/$projectName"); } + 1; diff --git a/src/lib/Hydra/Controller/Build.pm b/src/lib/Hydra/Controller/Build.pm index f9f1825a..b3442f02 100644 --- a/src/lib/Hydra/Controller/Build.pm +++ b/src/lib/Hydra/Controller/Build.pm @@ -351,9 +351,9 @@ sub restart : Chained('build') PathPart Args(0) { requireProjectOwner($c, $build->project); - my $drvpath = $build->drvpath ; + my $drvpath = $build->drvpath; error($c, "This build cannot be restarted.") - unless $build->finished && -f $drvpath ; + unless $build->finished && -f $drvpath; restartBuild($c->model('DB')->schema, $build); diff --git a/src/lib/Hydra/Controller/Jobset.pm b/src/lib/Hydra/Controller/Jobset.pm index 4dc90094..fa968ef3 100644 --- a/src/lib/Hydra/Controller/Jobset.pm +++ b/src/lib/Hydra/Controller/Jobset.pm @@ -221,7 +221,7 @@ sub updateJobset { my ($c, $jobset) = @_; my $jobsetName = trim $c->request->params->{"name"}; - error($c, "Invalid jobset name: $jobsetName") unless $jobsetName =~ /^[[:alpha:]][\w\-]*$/; + error($c, "Invalid jobset name: ‘$jobsetName’") if $jobsetName !~ /^$jobsetNameRE$/; my ($nixExprPath, $nixExprInput) = nixExprPathFromParams $c; @@ -298,13 +298,13 @@ sub clone_submit : Chained('jobset') PathPart('clone/submit') Args(0) { requireProjectOwner($c, $jobset->project); requirePost($c); - my $newjobsetName = trim $c->request->params->{"newjobset"}; - error($c, "Invalid jobset name: $newjobsetName") unless $newjobsetName =~ /^[[:alpha:]][\w\-]*$/; + my $newJobsetName = trim $c->request->params->{"newjobset"}; + error($c, "Invalid jobset name: $newJobsetName") unless $newJobsetName =~ /^[[:alpha:]][\w\-]*$/; - my $newjobset; + my $newJobset; txn_do($c->model('DB')->schema, sub { - $newjobset = $jobset->project->jobsets->create( - { name => $newjobsetName + $newJobset = $jobset->project->jobsets->create( + { name => $newJobsetName , description => $jobset->description , nixexprpath => $jobset->nixexprpath , nixexprinput => $jobset->nixexprinput @@ -314,14 +314,14 @@ sub clone_submit : Chained('jobset') PathPart('clone/submit') Args(0) { }); foreach my $input ($jobset->jobsetinputs) { - my $newinput = $newjobset->jobsetinputs->create({name => $input->name, type => $input->type}); + my $newinput = $newJobset->jobsetinputs->create({name => $input->name, type => $input->type}); foreach my $inputalt ($input->jobsetinputalts) { $newinput->jobsetinputalts->create({altnr => $inputalt->altnr, value => $inputalt->value}); } } }); - $c->res->redirect($c->uri_for($c->controller('Jobset')->action_for("edit"), [$jobset->project->name, $newjobsetName])); + $c->res->redirect($c->uri_for($c->controller('Jobset')->action_for("edit"), [$jobset->project->name, $newJobsetName])); } diff --git a/src/lib/Hydra/Controller/JobsetEval.pm b/src/lib/Hydra/Controller/JobsetEval.pm index 76c85feb..ebfc49be 100644 --- a/src/lib/Hydra/Controller/JobsetEval.pm +++ b/src/lib/Hydra/Controller/JobsetEval.pm @@ -32,13 +32,17 @@ sub view : Chained('eval') PathPart('') Args(0) { # Allow comparing this evaluation against the previous evaluation # (default), an arbitrary evaluation, or the latest completed # evaluation of another jobset. - if (defined $compare && $compare =~ /^\d+$/) { - $eval2 = $c->model('DB::JobsetEvals')->find($compare) - or notFound($c, "Evaluation $compare doesn't exist."); - } elsif (defined $compare && $compare =~ /^($jobNameRE)$/) { - my $j = $c->stash->{project}->jobsets->find({name => $compare}) - or notFound($c, "Jobset $compare doesn't exist."); - $eval2 = getLatestFinishedEval($c, $j); + if (defined $compare) { + if ($compare =~ /^\d+$/) { + $eval2 = $c->model('DB::JobsetEvals')->find($compare) + or notFound($c, "Evaluation $compare doesn't exist."); + } elsif (defined $compare && $compare =~ /^($jobsetNameRE)$/) { + my $j = $c->stash->{project}->jobsets->find({name => $compare}) + or notFound($c, "Jobset $compare doesn't exist."); + $eval2 = getLatestFinishedEval($c, $j); + } else { + notFound($c, "Unknown comparison source ‘$compare’."); + } } else { ($eval2) = $eval->jobset->jobsetevals->search( { hasnewbuilds => 1, id => { '<', $eval->id } }, diff --git a/src/lib/Hydra/Controller/Project.pm b/src/lib/Hydra/Controller/Project.pm index 0b600d41..050a7d40 100644 --- a/src/lib/Hydra/Controller/Project.pm +++ b/src/lib/Hydra/Controller/Project.pm @@ -45,6 +45,11 @@ sub submit : Chained('project') PathPart Args(0) { requireProjectOwner($c, $c->stash->{project}); requirePost($c); + if (($c->request->params->{submit} || "") eq "delete") { + $c->stash->{project}->delete; + $c->res->redirect($c->uri_for("/")); + } + txn_do($c->model('DB')->schema, sub { updateProject($c, $c->stash->{project}); }); @@ -65,6 +70,7 @@ sub hide : Chained('project') PathPart Args(0) { $c->res->redirect($c->uri_for("/")); } + sub unhide : Chained('project') PathPart Args(0) { my ($self, $c) = @_; @@ -77,19 +83,6 @@ sub unhide : Chained('project') PathPart Args(0) { $c->res->redirect($c->uri_for("/")); } -sub delete : Chained('project') PathPart Args(0) { - my ($self, $c) = @_; - - requireProjectOwner($c, $c->stash->{project}); - requirePost($c); - - txn_do($c->model('DB')->schema, sub { - $c->stash->{project}->delete; - }); - - $c->res->redirect($c->uri_for("/")); -} - sub requireMayCreateProjects { my ($c) = @_; @@ -119,6 +112,8 @@ sub create_submit : Path('/create-project/submit') { my $projectName = trim $c->request->params->{name}; + error($c, "Invalid project name: ‘$projectName’") if $projectName !~ /^$projectNameRE$/; + txn_do($c->model('DB')->schema, sub { # Note: $projectName is validated in updateProject, # which will abort the transaction if the name isn't @@ -152,6 +147,8 @@ sub create_jobset_submit : Chained('project') PathPart('create-jobset/submit') A my $jobsetName = trim $c->request->params->{name}; + error($c, "Invalid jobset name: ‘$jobsetName’") if $jobsetName !~ /^$jobsetNameRE$/; + txn_do($c->model('DB')->schema, sub { # Note: $jobsetName is validated in updateProject, which will # abort the transaction if the name isn't valid. @@ -167,12 +164,7 @@ sub create_jobset_submit : Chained('project') PathPart('create-jobset/submit') A sub updateProject { my ($c, $project) = @_; - my $projectName = trim $c->request->params->{name}; - error($c, "Invalid project name: " . ($projectName || "(empty)")) unless $projectName =~ /^[[:alpha:]][\w\-]*$/; - my $displayName = trim $c->request->params->{displayname}; - error($c, "Invalid display name: $displayName") if $displayName eq ""; - my $owner = $project->owner; if ($c->check_user_roles('admin')) { $owner = trim $c->request->params->{owner}; @@ -180,6 +172,12 @@ sub updateProject { unless defined $c->model('DB::Users')->find({username => $owner}); } + my $projectName = trim $c->request->params->{name}; + error($c, "Invalid project name: ‘$projectName’") if $projectName !~ /^$projectNameRE$/; + + my $displayName = trim $c->request->params->{displayname}; + error($c, "Invalid display name: $displayName") if $displayName eq ""; + $project->update( { name => $projectName , displayname => $displayName diff --git a/src/lib/Hydra/Controller/Release.pm b/src/lib/Hydra/Controller/Release.pm index da282a57..89cb2103 100644 --- a/src/lib/Hydra/Controller/Release.pm +++ b/src/lib/Hydra/Controller/Release.pm @@ -52,6 +52,8 @@ sub edit : Chained('release') PathPart('edit') Args(0) { my ($self, $c) = @_; requireProjectOwner($c, $c->stash->{project}); $c->stash->{template} = 'edit-release.tt'; + $c->stash->{members} = [$c->stash->{release}->releasemembers->search({}, + {order_by => ["description"]})]; } diff --git a/src/lib/Hydra/Controller/View.pm b/src/lib/Hydra/Controller/View.pm index a9cb1e05..aa3789cc 100644 --- a/src/lib/Hydra/Controller/View.pm +++ b/src/lib/Hydra/Controller/View.pm @@ -116,6 +116,11 @@ sub edit : Chained('view') PathPart('edit') Args(0) { sub submit : Chained('view') PathPart('submit') Args(0) { my ($self, $c) = @_; requireProjectOwner($c, $c->stash->{project}); + if (($c->request->params->{submit} || "") eq "delete") { + $c->stash->{view}->delete; + $c->res->redirect($c->uri_for($c->controller('Project')->action_for('view'), + [$c->stash->{project}->name])); + } txn_do($c->model('DB')->schema, sub { updateView($c, $c->stash->{view}); }); @@ -123,17 +128,6 @@ sub submit : Chained('view') PathPart('submit') Args(0) { } -sub delete : Chained('view') PathPart('delete') Args(0) { - my ($self, $c) = @_; - requireProjectOwner($c, $c->stash->{project}); - txn_do($c->model('DB')->schema, sub { - $c->stash->{view}->delete; - }); - $c->res->redirect($c->uri_for($c->controller('Project')->action_for('view'), - [$c->stash->{project}->name])); -} - - sub latest : Chained('view') PathPart('latest') { my ($self, $c, @args) = @_; diff --git a/src/lib/Hydra/Helper/AddBuilds.pm b/src/lib/Hydra/Helper/AddBuilds.pm index dd425128..e39cbc79 100644 --- a/src/lib/Hydra/Helper/AddBuilds.pm +++ b/src/lib/Hydra/Helper/AddBuilds.pm @@ -968,5 +968,11 @@ sub restartBuild { , busy => 0 , locker => "" }); + + # Reset the stats for the evals to which this build belongs. + # !!! Should do this in a trigger. + foreach my $m ($build->jobsetevalmembers->all) { + $m->eval->update({nrsucceeded => undef}); + } }); } diff --git a/src/lib/Hydra/Helper/CatalystUtils.pm b/src/lib/Hydra/Helper/CatalystUtils.pm index 80c391ab..a58c9c38 100644 --- a/src/lib/Hydra/Helper/CatalystUtils.pm +++ b/src/lib/Hydra/Helper/CatalystUtils.pm @@ -13,7 +13,7 @@ our @EXPORT = qw( requireLogin requireProjectOwner requireAdmin requirePost isAdmin isProjectOwner trim getLatestFinishedEval - $pathCompRE $relPathRE $relNameRE $jobNameRE $systemRE + $pathCompRE $relPathRE $relNameRE $projectNameRE $jobsetNameRE $jobNameRE $systemRE @buildListColumns ); @@ -181,12 +181,14 @@ sub getLatestFinishedEval { # Security checking of filenames. -Readonly our $pathCompRE => "(?:[A-Za-z0-9-\+\._][A-Za-z0-9-\+\._]*)"; -Readonly our $relPathRE => "(?:$pathCompRE(?:/$pathCompRE)*)"; -Readonly our $relNameRE => "(?:[A-Za-z0-9-][A-Za-z0-9-\.]*)"; -Readonly our $attrNameRE => "(?:[A-Za-z_][A-Za-z0-9_]*)"; -Readonly our $jobNameRE => "(?:$attrNameRE(?:\\.$attrNameRE)*)"; -Readonly our $systemRE => "(?:[a-z0-9_]+-[a-z0-9_]+)"; +Readonly our $pathCompRE => "(?:[A-Za-z0-9-\+\._][A-Za-z0-9-\+\._]*)"; +Readonly our $relPathRE => "(?:$pathCompRE(?:/$pathCompRE)*)"; +Readonly our $relNameRE => "(?:[A-Za-z0-9-][A-Za-z0-9-\.]*)"; +Readonly our $attrNameRE => "(?:[A-Za-z_][A-Za-z0-9_]*)"; +Readonly our $projectNameRE => "(?:[A-Za-z_][A-Za-z0-9-_]*)"; +Readonly our $jobsetNameRE => "(?:[A-Za-z_][A-Za-z0-9-_]*)"; +Readonly our $jobNameRE => "(?:$attrNameRE(?:\\.$attrNameRE)*)"; +Readonly our $systemRE => "(?:[a-z0-9_]+-[a-z0-9_]+)"; 1; diff --git a/src/root/admin.tt b/src/root/admin.tt index d2fab0fa..42c044b2 100644 --- a/src/root/admin.tt +++ b/src/root/admin.tt @@ -1,7 +1,7 @@ [% WRAPPER layout.tt title="Admin" %] [% PROCESS common.tt %] -
Nr | What | Duration | Machine | Status |
---|
This page provides a channel for the Nix package manager. If you have Nix diff --git a/src/root/clone-build.tt b/src/root/clone-build.tt index e44da753..44b6ccb7 100644 --- a/src/root/clone-build.tt +++ b/src/root/clone-build.tt @@ -3,7 +3,7 @@ [% USE HTML %] [% edit=1 %] -
Cloning allows you to perform a build with modified inputs.
diff --git a/src/root/common.tt b/src/root/common.tt index bbf4ced3..c6b14a5e 100644 --- a/src/root/common.tt +++ b/src/root/common.tt @@ -189,7 +189,7 @@ [% BLOCK maybeLink -%] - [% IF uri %] uri) %][% IF confirmmsg %]onclick="javascript:return confirm('[% confirmmsg %]')"[% END %]>[% content %][% ELSE; content; END -%] + [% IF uri %] uri, class => class) %][% IF confirmmsg %]onclick="javascript:return confirm('[% confirmmsg %]')"[% END %]>[% content %][% ELSE; content; END -%] [% END -%] [% BLOCK maybeButton -%] @@ -198,11 +198,24 @@ [% BLOCK renderSelection %] [% IF edit %] - + [% IF radiobuttons %] +- -
-- -
- ++ + [% IF !create %] + + + [% END %] +
- - - [% IF !create %] - -[% flashMsg %]
+[% flashMsg %]
[% END %] [% IF queue.size == 0 %] diff --git a/src/root/release.tt b/src/root/release.tt index d8ca9d37..eb7fbaea 100644 --- a/src/root/release.tt +++ b/src/root/release.tt @@ -3,8 +3,8 @@ [% PROCESS "product-list.tt" %] [% USE HTML %] -Released on [% INCLUDE renderDateTime timestamp = release.timestamp %].
@@ -17,11 +17,11 @@ release.timestamp %]. [% FOREACH m IN members %] --[Create a release] -
+ [% END %] [% END %] diff --git a/src/root/status.tt b/src/root/status.tt index 20677e4a..ee820c2e 100644 --- a/src/root/status.tt +++ b/src/root/status.tt @@ -1,7 +1,7 @@ [% WRAPPER layout.tt title="Hydra status" %] [% PROCESS common.tt %] -[% INCLUDE maybeLink uri = c.uri_for(c.controller('Admin').action_for('user_edit'), [u.username]) content = u.username %] | +[% u.username %] | [% u.fullname %] | [% u.emailaddress %] | [% FOREACH r IN u.userroles %][% r.role %] [% END %] | [% IF u.emailonerror %]Yes[% ELSE %]No[% END %] | -[ [% INCLUDE maybeLink uri = c.uri_for(c.controller('Admin').action_for('reset_password'), [u.username]) content = "Reset password" confirmmsg = "Are you sure you want to reset the password for this user?" %] ] | +[% INCLUDE maybeLink uri = c.uri_for(c.controller('Admin').action_for('reset_password'), [u.username]) content = "Reset password" confirmmsg = "Are you sure you want to reset the password for this user?" class = "btn btn-mini" %] |
[ Add a new user ]
+ [% END %] diff --git a/src/root/view-result.tt b/src/root/view-result.tt index 8ee2e958..96fb80ba 100644 --- a/src/root/view-result.tt +++ b/src/root/view-result.tt @@ -4,7 +4,7 @@ [% PROCESS "product-list.tt" %] [% USE HTML %] -Finished building on [% INCLUDE renderDateTime timestamp = result.timestamp %].
@@ -46,11 +46,13 @@ [% END %] +-[Edit] -[Latest] + Edit + Latest
Showing results [% (page - 1) * resultsPerPage + 1 %] - [% (page - 1) * resultsPerPage + results.size %] out of [% totalResults %].
@@ -65,8 +65,12 @@