diff options
| -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"; +} | 
