[catagits/Gitalist.git] / lib / Gitalist / ActionRole / FilenameArgs.pm

package Gitalist::ActionRole::FilenameArgs;
use Moose::Role;
use namespace::autoclean;

requires 'execute';

before 'execute' => sub {
    my ($self, $controller, $c, @args) = @_;
    $c->stash->{filename} = join('/', @args) || ''
        unless $c->stash->{filename};
};

1;
Commit	Line	Data
b6ec181b	1	package Gitalist::ActionRole::FilenameArgs;
	2	use Moose::Role;
	3	use namespace::autoclean;
	4
	5	requires 'execute';
	6
	7	before 'execute' => sub {
	8	my ($self, $controller, $c, @args) = @_;
906a2dd2	9	$c->stash->{filename} = join('/', @args) \|\| ''
c4ed9eb3	10	unless $c->stash->{filename};
b6ec181b	11	};
	12
	13	1;
	14