[perl] コントローラがどのテンプレを表示したかをテストする
Module::Spy をつかう。
my $render = spy_on('Text::Xslate', 'render');
# コントローラをよぶ
...;
my $tmpl = $render->calls_first->[1];
ok { $tmpl eq 'my/index.tt' };
Module::Spy をつかう。
my $render = spy_on('Text::Xslate', 'render');
# コントローラをよぶ
...;
my $tmpl = $render->calls_first->[1];
ok { $tmpl eq 'my/index.tt' };