diff options
| author | Tom Feist <shabble@metavore.org> | 2011-01-09 17:45:26 +0000 |
|---|---|---|
| committer | Tom Feist <shabble@metavore.org> | 2011-01-09 17:45:26 +0000 |
| commit | d124b925e8fb9dd2be5db5e8fc9d15031f4a9e68 (patch) | |
| tree | 3406de9964837af12e26cb84aa9fda89bc5044ed /modules/perl_plus/perl_plus_impl.c | |
| parent | cloned test module to start work on a useful module (diff) | |
| download | irssi-scripts-d124b925e8fb9dd2be5db5e8fc9d15031f4a9e68.tar.gz irssi-scripts-d124b925e8fb9dd2be5db5e8fc9d15031f4a9e68.zip | |
added new module stub for attemping to extend perl API
Diffstat (limited to 'modules/perl_plus/perl_plus_impl.c')
| -rw-r--r-- | modules/perl_plus/perl_plus_impl.c | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/modules/perl_plus/perl_plus_impl.c b/modules/perl_plus/perl_plus_impl.c new file mode 100644 index 0000000..b53e6f5 --- /dev/null +++ b/modules/perl_plus/perl_plus_impl.c @@ -0,0 +1,18 @@ +#include <perl_plus_irssi.h> +#include <perl_plus_impl.h> +#include <perl_plus_core.h> + +void print_load_message(void) { + + printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, + "Hello, World. xxx \"%s\"", MODULE_NAME); + +} + +void print_unload_message(void) { + + printtext(NULL, NULL, MSGLEVEL_CLIENTERROR, + "Goodbye, Cruel World. ~signed \"%s\"", MODULE_NAME); + +} + |