forked from lix-project/hydra
Merge pull request #887 from helsinki-systems/feat/eval-overview-duration
Show evaluation time in the evaluations overview
This commit is contained in:
commit
e02f34722f
|
@ -3,13 +3,14 @@ package Hydra::View::TT;
|
|||
use strict;
|
||||
use base 'Catalyst::View::TT';
|
||||
use Hydra::Helper::Nix;
|
||||
use Time::Seconds;
|
||||
|
||||
__PACKAGE__->config(
|
||||
TEMPLATE_EXTENSION => '.tt',
|
||||
ENCODING => 'utf-8',
|
||||
PRE_CHOMP => 1,
|
||||
POST_CHOMP => 1,
|
||||
expose_methods => [qw/buildLogExists buildStepLogExists jobExists stripSSHUser/]);
|
||||
expose_methods => [qw/buildLogExists buildStepLogExists jobExists relativeDuration stripSSHUser/]);
|
||||
|
||||
sub buildLogExists {
|
||||
my ($self, $c, $build) = @_;
|
||||
|
@ -25,6 +26,27 @@ sub buildStepLogExists {
|
|||
return defined findLog($c, $step->drvpath, @outPaths);
|
||||
}
|
||||
|
||||
=head2 relativeDuration
|
||||
|
||||
Given an integer of seconds, return an English representation of the
|
||||
duration as a string.
|
||||
|
||||
Arguments:
|
||||
|
||||
=over 1
|
||||
|
||||
=item C<$seconds>
|
||||
|
||||
An integer number of seconds
|
||||
|
||||
=back
|
||||
|
||||
=cut
|
||||
sub relativeDuration {
|
||||
my ($self, $c, $seconds) = @_;
|
||||
return Time::Seconds->new($seconds)->pretty();
|
||||
}
|
||||
|
||||
sub stripSSHUser {
|
||||
my ($self, $c, $name) = @_;
|
||||
if ($name =~ /^.*@(.*)$/) {
|
||||
|
|
|
@ -88,6 +88,7 @@
|
|||
<td>
|
||||
[% IF latestEval %]
|
||||
[% INCLUDE renderDateTime timestamp = latestEval.timestamp %]
|
||||
(took [% relativeDuration (latestEval.checkouttime + latestEval.evaltime) %])
|
||||
[% ELSE %]
|
||||
<em>never</em>
|
||||
[% END %]
|
||||
|
|
Loading…
Reference in a new issue