diff options
| author | Tom Feist <shabble@metavore.org> | 2010-12-04 05:56:23 +0000 |
|---|---|---|
| committer | Tom Feist <shabble@metavore.org> | 2010-12-04 05:56:23 +0000 |
| commit | 9d069cbd82975cb0ba5adc0d50442566e5cf04fe (patch) | |
| tree | 1805b55aca70366c4d580a00aa54578cee3198be | |
| parent | template: update template with personal details, add additional imports (diff) | |
| download | irssi-scripts-9d069cbd82975cb0ba5adc0d50442566e5cf04fe.tar.gz irssi-scripts-9d069cbd82975cb0ba5adc0d50442566e5cf04fe.zip | |
easy_exec: add author info block, Dump() function to call Data::Dumper
| -rw-r--r-- | feature-tests/easy_exec.pl | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/feature-tests/easy_exec.pl b/feature-tests/easy_exec.pl index 76cd79f..dbcd101 100644 --- a/feature-tests/easy_exec.pl +++ b/feature-tests/easy_exec.pl @@ -1,6 +1,7 @@ use strict; use warnings; +# export everything. use Irssi (@Irssi::EXPORT_OK); use Irssi::Irc; use Irssi::TextUI; @@ -9,10 +10,11 @@ use Data::Dumper; our $VERSION = '0.1'; our %IRSSI = ( - authors => '', - contact => '', - name => '', - description => '', + authors => 'shabble', + contact => 'shabble+irssi@metavore.org', + name => 'easy_exec', + description => 'drop-in replacement for /script exec which imports' + . ' all of the Irssi:: namespace for easier testing', license => 'Public Domain', ); @@ -23,3 +25,11 @@ sub better_exec { eval $args; Irssi::signal_stop(); } + +sub Dump { + print Dumper(\@_); +} + +sub test() { + print "This is a test"; +} |