rename files from Daemon to Backend

This commit is contained in:
Oliver Gorwits
2017-05-06 16:30:22 +01:00
parent 86a605ba68
commit 4e35b904b0
33 changed files with 1612 additions and 13 deletions

View File

@@ -0,0 +1,54 @@
package App::Netdisco::Backend::Job;
use Moo;
use namespace::clean;
foreach my $slot (qw/
job
entered
started
finished
device
port
action
subaction
status
username
userip
log
debug
/) {
has $slot => (
is => 'rw',
);
}
=head1 METHODS
=head2 summary
An attempt to make a meaningful statement about the job.
=cut
sub summary {
my $job = shift;
return join ' ',
$job->action,
($job->device || ''),
($job->port || '');
# ($job->subaction ? (q{'}. $job->subaction .q{'}) : '');
}
=head1 ADDITIONAL COLUMNS
=head2 extra
Alias for the C<subaction> column.
=cut
sub extra { (shift)->subaction }
1;