Test::Mojoでuser agentの変更で失敗したこと。

Test::MojoのSYNOPSISに

my $ua = $t->ua;
$t = $t->ua(Mojo::UserAgent->new);

と書いてあったので、

「$t->uaにMojo::UserAgentいれればいいんだなー?」とか思って。

my $t = Test::Mojo->new("MyApp");
my $ua = Mojo::UserAgent->new;
$ua->name("Mozilla/5.0 (Linux;....");
$t->ua($ua)
$t->get_ok("/")->status_is("200");

とかしたんだけれど、これは駄目だった。
MyAppからとってきた時に、ua自体にいろいろデータをいれられていたので、
それを置き換える形になってしまいNG。

$t->uaは、デフォルトでMojo::UserAgentとのことで。

my $t = Test::Mojo->new("MyApp");
$t->ua->name("Mozilla/5.0 (Linux;....");
$t->get_ok("/")->status_is("200");

としたら期待通りだった。
ミスったミスった。