diff options
| -rw-r--r-- | Makefile.PL | 9 | ||||
| -rw-r--r-- | script/webcoso.pl (renamed from webcoso.pl) | 0 | ||||
| -rw-r--r-- | t/whole-01.t | 8 |
3 files changed, 14 insertions, 3 deletions
diff --git a/Makefile.PL b/Makefile.PL new file mode 100644 index 0000000..3ecfbbc --- /dev/null +++ b/Makefile.PL @@ -0,0 +1,9 @@ +use ExtUtils::MakeMaker; + +WriteMakefile( + NAME => 'WebCoso', + VERSION_FROM => 'script/webcoso.pl', + ABSTRACT_FROM => 'script/webcoso.pl', + AUTHOR => 'dakkar@thenautilus.net', + EXE_FILES => ['script/webcoso.pl'], +); diff --git a/webcoso.pl b/script/webcoso.pl index 3552974..3552974 100644 --- a/webcoso.pl +++ b/script/webcoso.pl diff --git a/t/whole-01.t b/t/whole-01.t index 10c9204..054d2ee 100644 --- a/t/whole-01.t +++ b/t/whole-01.t @@ -6,13 +6,15 @@ use Path::Class; chdir file(__FILE__)->parent->parent->stringify; -system($^X,qw(-Ilib webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/ --clean)) +$ENV{PERL5LIB}=join ':',@INC; + +system($^X,qw(blib/script/webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/ --clean)) and die "Problems running webcoso.pl (clean): $?\n"; -system($^X,qw(-Ilib webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/)) +system($^X,qw(blib/script/webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/)) and die "Problems running webcoso.pl: $?\n"; is(system(qw(diff -r -x .svn t/test-site/output/ t/test-site-output/)),0,'output as expected'); -system($^X,qw(-Ilib webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/ --clean)) +system($^X,qw(blib/script/webcoso.pl -s t/test-site/src/ -d t/test-site/output/ -I t/test-site/common/ --clean)) and die "Problems running webcoso.pl (clean): $?\n"; |