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