forked from hummypkg/webif
fix {queue check} default argument
This commit is contained in:
parent
4a840d89d8
commit
4bb5fd3a30
@ -205,7 +205,7 @@ proc {queue status} {ts} {
|
||||
return $q
|
||||
}
|
||||
|
||||
proc {queue check} {ts {q "all"}} {
|
||||
proc {queue check} {ts {q "any"}} {
|
||||
set queues [split [queue status $ts] ,]
|
||||
if {$q eq "any" && [llength $queues]} {
|
||||
return 1
|
||||
|
Loading…
Reference in New Issue
Block a user