sub binary : Local {
my ($self, $c) = @_;
$c->res->body(do {
- open(my $fh, '<', $c->path_to('..', 'catalyst_130pix.gif')) or die $!;
+ open(my $fh, '<', $c->path_to('..', '..', 'catalyst_130pix.gif')) or die $!;
binmode($fh);
local $/ = undef; <$fh>;
});