(bitlbee_blist) Update scripts/bitlbee_blist.pl

Use grep even when only one argument is given to /blist

diff --git a/scripts/bitlbee_blist.pl b/scripts/bitlbee_blist.pl
index f9d3ba4a29a0876202cd2d68c19254aed4ffd6a6..864001ff77983883b038d91a7021088e888aedea 100644 (file)
--- a/scripts/bitlbee_blist.pl
+++ b/scripts/bitlbee_blist.pl
@@ -47,6 +47,7 @@ sub get_channel {
 sub blist {
        my ($args, $server, $winit) = @_;
        ($list, $word) = split(/ /, $args, 2);
+       ($word, $list) = ($list, $word) unless $word;
        $list=lc $list;
        $word=lc $word;
        if($list ne "all" && $list ne "online" && $list ne "offline" &&