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

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" );
Commit	Line	Data
ed97ee4f	1	use strict;
	2	use warnings;
	3	use FindBin qw/$Bin/;
	4	use lib "$Bin/lib";
	5	use Catalyst::Helper;
	6	use MyTestHelper;
	7
	8	use Test::More tests => 1;
	9
	10	my $helper = bless {}, 'MyTestHelper';
	11
	12	package MyTestHelper;
	13	use FindBin qw/$Bin/;
	14	use Test::More;
	15	use File::Temp qw/tempfile/;
	16
	17	my ($fh, $fn) = tempfile;
	18	close $fh;
	19
	20	ok( $helper->render_sharedir_file('script/myapp_cgi.pl.tt', { appprefix => 'fnargh' }), "sharedir file rendered" );