Fix incorrectly constructed query list to restore purging completed entries

A constant list included an item that needed to be evaluated.

webif/lib/queue.class

@@ -146,7 +146,7 @@ proc {queue dbqueryl} {query_list {txn_mode ""}} {
 
 proc {queue startup} {{days 7}} {
 	if {$days == 0} { set days 7 }
-	return [queue dbqueryl { { {
+	return [queue dbqueryl [list { {
 		update queue
 		set status = 'INTERRUPTED',
 		log = 'Job will be retried automatically.',
@@ -163,12 +163,12 @@ proc {queue startup} {{days 7}} {
 		update queue
 		set status = 'PENDING'
 		where status = 'DEFER'
-	} } { {
+	} } [list {
 		delete from queue
 		where status in ('COMPLETE', 'FAILED')
 		and submitted < %s
 	} [expr [clock seconds] - 86400 * $days]
-	} } ]
+	] ] ]
 }
 
 proc {queue fetch} {file action} {