aboutsummaryrefslogtreecommitdiffstats
path: root/feature-tests/help_b.pl
blob: 8b57a45a3407e02e4a0aa854d5fe69f515a29143 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
use strict;
use warnings;

use Irssi;

our $help = "this is help for b";

Irssi::command_bind('help', sub {
        if ($_[0] eq 'test_b') {
            Irssi::print($help, MSGLEVEL_CLIENTCRAP);
            Irssi::signal_stop();
            return;
        }
  }
);