From: Eric Bollengier Date: Fri, 17 Jul 2009 09:36:06 +0000 (+0000) Subject: Optimize a bit the running job view X-Git-Tag: Release-3.0.2~17 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=9ed4dd502060737513409503d22c48b7edbf1c95;p=bacula%2Fbacula Optimize a bit the running job view git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@9049 91ce42f0-d328-0410-95d8-f526ca767f89 --- diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm index 30f1841310..6c31a8ba60 100644 --- a/gui/bweb/lib/Bweb.pm +++ b/gui/bweb/lib/Bweb.pm @@ -4021,13 +4021,14 @@ sub display_running_job my $query = " SELECT Client.Name AS name, Job.Name AS jobname, - Job.Level AS level, Type AS type + Job.Level AS level, Type AS type, JobStatus AS jobstatus FROM Job INNER JOIN Client USING (ClientId) $filter WHERE Job.JobId = $arg->{jobid} "; my $row = $self->dbh_selectrow_hashref($query); - + my $status = $row->{jobstatus}; + if ($row) { $arg->{client} = $row->{name}; } else { @@ -4052,8 +4053,10 @@ SELECT corr_jobbytes, jobbytes, corr_jobfiles, jobfiles $row->{jobbytes} = $row->{jobfiles} = 0; } } - my $cli = new Bweb::Client(name => $arg->{client}); - $cli->display_running_job($self, $arg->{jobid}, $row); + if ($status =~ /[RBSmMsjlL]/) { + my $cli = new Bweb::Client(name => $arg->{client}); + $cli->display_running_job($self, $arg->{jobid}, $row); + } if ($arg->{jobid}) { $self->get_job_log(); } diff --git a/gui/bweb/technotes-3.0 b/gui/bweb/technotes-3.0 index fa9fa94f22..339870c129 100644 --- a/gui/bweb/technotes-3.0 +++ b/gui/bweb/technotes-3.0 @@ -1,4 +1,5 @@ 17Jul09 +ebl Optimize a bit the running job view ebl Fix bresto relocation box 06Jul09 ebl Display command output by default