[catagits/CatalystX-Declare.git] / t / lib / TestApp / ControllerRole / Parameterized.pm

use CatalystX::Declare;

controller_role TestApp::ControllerRole::Parameterized (Str :$message) {

    method get_message { $message }

    final action greet under base {
        $ctx->response->body( join ':', $self->get_message, $message );
    }
}
Commit	Line	Data
c2a8165b	1	use CatalystX::Declare;
	2
	3	controller_role TestApp::ControllerRole::Parameterized (Str :$message) {
	4
	5	method get_message { $message }
	6
	7	final action greet under base {
c2a8165b	8	$ctx->response->body( join ':', $self->get_message, $message );
	9	}
	10	}