File Coverage

blib/lib/Thunderhorse/AppController.pm

Criterion	Covered	Total	%
statement	19	19	100.0
branch	3	4	75.0
condition	2	3	66.6
subroutine	4	4	100.0
pod			n/a
total	28	30	93.3

package Thunderhorse::AppController;
$Thunderhorse::AppController::VERSION = '0.102';
use v5.40;
use Mooish::Base -standard;

extends 'Thunderhorse::Controller';

sub _run_method ($self, $method, @args)
{
	die "no such method $method"
		unless ref $self;

	if ($self->app->can($method)) {
		return $self->app->$method(@args);
	}

	return $self->SUPER::_run_method($method, @args);
}

sub _can_method ($self, $method)
{
	# this returns app's can on purpose, to achieve app method being run by
	# controller object.
	return $self->app->can($method)
		// $self->SUPER::_can_method($method);
}

__END__