aboutsummaryrefslogtreecommitdiffstats
path: root/feature-tests/help_a.pl
blob: 53d902cf4cbd24a443941f444320348bc95107de (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 a";

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