Commit | Line | Data |
3890b670 |
1 | #!/usr/bin/perl -w |
2 | |
3 | use strict; |
4 | use warnings; |
5 | use MooseX::AutoDoc; |
6 | use FindBin '$Bin'; |
7 | use lib "$Bin/lib"; |
8 | |
9 | use Test::More tests => 6; |
10 | |
11 | BEGIN{ |
12 | use_ok("AutoDocTest1"); |
13 | } |
14 | |
15 | ok( |
16 | defined(my $autodoc = eval {MooseX::AutoDoc->new}), |
17 | "Was instantiated successfully" |
18 | ); |
19 | die "Failed to instantiate MooseX::AutoDoc" unless $autodoc; |
20 | |
21 | ok( |
22 | defined(my $view = eval {$autodoc->view}), |
23 | "Was instantiated successfully" |
24 | ); |
25 | die "Failed to instantiate MooseX::AutoDoc::View::TT" unless $view; |
26 | can_ok $view, "render_class", "render_role"; |
27 | |
28 | ok length($view->role_template), "Role template appears to have been loaded successfully"; |
29 | ok length($view->class_template), "Class template appears to have been loaded successfully"; |