use string comp for exact matching

diff --git a/scripts/go.pl b/scripts/go.pl
index 315e687f3e6f572eadb6b573d3648bd2c621386c..1892c1a41ad7eff44aeca5700819cee3f09eeef9 100644 (file)
--- a/scripts/go.pl
+++ b/scripts/go.pl
@@ -84,7 +84,7 @@ sub cmd_go
        my @matches;
        foreach my $w (Irssi::windows) {
                my $name = $w->get_active_name();
-               if ($name =~ /$re$/) {
+               if (fc $name eq fc $chan) {
                        $w->set_active();
                        return;
                } elsif ($name =~ /$re/) {