diff options
| author | Tom Feist <shabble@cowu.be> | 2010-07-24 17:23:13 +0000 |
|---|---|---|
| committer | Tom Feist <shabble@cowu.be> | 2010-07-24 17:23:13 +0000 |
| commit | 91f126ae4c9ea90336bdeb24001fadca79439edc (patch) | |
| tree | d21b72a82b67b0979aadfa3f6efbbc2586d962b1 /feature-tests/help_a.pl | |
| parent | updated script info to add my url and to change contact details to me (diff) | |
| download | irssi-scripts-91f126ae4c9ea90336bdeb24001fadca79439edc.tar.gz irssi-scripts-91f126ae4c9ea90336bdeb24001fadca79439edc.zip | |
moved most tests to feature-tests/
Diffstat (limited to 'feature-tests/help_a.pl')
| -rw-r--r-- | feature-tests/help_a.pl | 15 |
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; + } + } +); |