diff options
| author | ivan <ivan> | 2001-10-12 15:26:22 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-12 15:26:22 +0000 |
| commit | 87b5424ee8f16f824865cd7dbf1efde8da3bd429 (patch) | |
| tree | 42e426fe9deb0590501da3ed226e6fa747e80bd3 /httemplate | |
| parent | f8e860c838ee6a59eaefe261fa629825ffbec422 (diff) | |
add (as yet inactive) retry & remove links
Diffstat (limited to 'httemplate')
| -rwxr-xr-x | httemplate/browse/queue.cgi | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/httemplate/browse/queue.cgi b/httemplate/browse/queue.cgi index 86d4a20f1..7a55cf3cf 100755 --- a/httemplate/browse/queue.cgi +++ b/httemplate/browse/queue.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: queue.cgi,v 1.1 2001-09-11 04:44:58 ivan Exp $ --> +#<!-- $Id: queue.cgi,v 1.2 2001-10-12 15:26:22 ivan Exp $ --> use strict; use vars qw( $cgi $p ); # $part_referral ); @@ -35,13 +35,19 @@ foreach my $queue ( sort { my($hashref)=$queue->hashref; my $args = join(' ', $queue->args); my $date = time2str( "%a %b %e %T %Y", $queue->_date ); + my $status = $hashref->{status}; + if ( $status eq 'failed' || $status eq 'locked' ) { + $status .= + qq! ( <A HREF="$p/edit/queue.cgi?jobnum=$jobnum&action=new">retry</A> |!. + qq! <A HREF="$p/edit/queue.cgi?jobnum$jobnum&action=del">remove </A> )'; + } print <<END; <TR> <TD>$hashref->{jobnum}</TD> <TD>$hashref->{job}</TD> <TD>$args</TD> <TD>$date</TD> - <TD>$hashref->{status}</TD> + <TD>$status</TD> </TR> END |