update method/attribute parsing
[gitmo/MooseX-AutoDoc.git] / t / 001-basic.t
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";