shlist

commit 8b5c7aad9078243a4b992292cf8c9a2d58d4f412
parent 88550543bc78a147f2b963089c634bf25075d306
Author: kyle <kyle@getaddrinfo.net>
Date:   Sun, 22 Nov 2015 22:15:48 -0700

sl: squash a warning

Diffstat:
M
sl
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/sl b/sl
@@ -456,7 +456,7 @@ sub msg_list_request
 
 		while (my ($list_id, $list_name) =
 			$get_lists_sth->fetchrow_array()) {
-            if ($list_id ~~ @direct_list_ids) {
+            if (grep {$_ eq $list_id} @direct_list_ids) {
                 next;
             }
 		    print "info: $addr: found mutual friends list '$list_name'\n";