icli: Accept filters for -lq, too

1 files changed, 4 insertions, 2 deletions

diff --git a/bin/icli b/bin/icli
index e65e4b9..259e22e 100755
--- a/bin/icli
+++ b/bin/icli
@@ -184,8 +184,10 @@ sub display_queue {
 	                 (values %{$data->{hosts}},
 	                  map { @{$_} } values %{$data->{services}});
 
-	if (@for_hosts) {
-		@queue = grep { $_->{host_name} ~~ \@for_hosts } @queue;
+	@queue = grep { $_->{host_name} ~~ \@list_hosts } @queue;
+
+	if (@list_services) {
+		@queue = grep { $_->{service_description} ~~ \@list_services } @queue;
 	}
 
 	printf(