From 6230b5acb6f422175887a1124cafe6f1ebdfffb7 Mon Sep 17 00:00:00 2001 From: Martin Mares Date: Mon, 31 Oct 2011 17:06:35 +0100 Subject: [PATCH] bprun: Use job names --- bprun | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/bprun b/bprun index 65dd089..b64a08d 100755 --- a/bprun +++ b/bprun @@ -161,7 +161,8 @@ sub redraw_slot($) { my $mach = $s->{'Host'}; my $stat = $s->{'Status'} // "?"; my $jid = $s->{'Job'} // ""; - my $text = sprintf("%-20s %-10s %s", $mach, $stat, $jid); + my $jname = $queue->job_name($jid); + my $text = sprintf("%-20s %-10s %s", $mach, $stat, $jname); $C->addnstr($s->{'Row'}, 0, $text, $C->getmaxx); $C->clrtoeol; $C->refresh; -- 2.39.2