aboutsummaryrefslogtreecommitdiffstats
path: root/feature-tests/help_a.pl
diff options
context:
space:
mode:
Diffstat (limited to 'feature-tests/help_a.pl')
-rw-r--r--feature-tests/help_a.pl15
1 files changed, 15 insertions, 0 deletions
diff --git a/feature-tests/help_a.pl b/feature-tests/help_a.pl
new file mode 100644
index 0000000..53d902c
--- /dev/null
+++ b/feature-tests/help_a.pl
@@ -0,0 +1,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;
+ }
+ }
+);