added tests for new methods

[catagits/Catalyst-Devel.git] / t / render_share_dir_file.t

diff --git a/t/render_share_dir_file.t b/t/render_share_dir_file.t
new file mode 100644 (file)
index 0000000..a53cf65
--- /dev/null
+++ b/t/render_share_dir_file.t
@@ -0,0 +1,20 @@
+use strict;
+use warnings;
+use FindBin qw/$Bin/;
+use lib "$Bin/lib";
+use Catalyst::Helper;
+use MyTestHelper;
+
+use Test::More tests => 1;
+
+my $helper = bless {}, 'MyTestHelper';
+
+package MyTestHelper;
+use FindBin qw/$Bin/;
+use Test::More;
+use File::Temp qw/tempfile/;
+
+my ($fh, $fn) = tempfile;
+close $fh;
+
+ok( $helper->render_sharedir_file('script/myapp_cgi.pl.tt',  { appprefix  => 'fnargh' }), "sharedir file rendered" );