fixing inline pod documentation for the debian package. (missing whatis entry)
[catagits/Gitalist.git] / lib / Gitalist / Controller / Fragment / Repository.pm
CommitLineData
ecb0ebe7 1package Gitalist::Controller::Fragment::Repository;
2use Moose;
3use namespace::autoclean;
4
b6ec181b 5BEGIN { extends 'Gitalist::Controller' }
b9423b8e 6with qw/
7 Gitalist::URIStructure::Repository
8 Gitalist::URIStructure::Fragment::WithLog
9/;
ecb0ebe7 10
066e9aa4 11sub base : Chained('/fragment/base') PathPart('') CaptureArgs(0) {}
ecb0ebe7 12
ecb0ebe7 13after heads => sub {
14 my ($self, $c) = @_;
15 $c->stash(
16 heads => $c->stash->{Repository}->heads,
17 );
18};
19
2298d93f 20=encoding UTF-8
21
22=head1 NAME
23
24Gitalist::Controller::Fragment::Repository - Fragment::Repository module for Gitalist::Controller
25
5cb2f569 26=head2 tags
27
28The current list of tags in the repo.
29
30=cut
31
32after tags => sub {
33 my ( $self, $c ) = @_;
34 $c->stash(
35 tags => $c->stash->{Repository}->tags,
36 );
ecb0ebe7 37};
38
39__PACKAGE__->meta->make_immutable;