Commit | Line | Data |
ecb0ebe7 |
1 | package Gitalist::Controller::Fragment::Repository; |
2 | use Moose; |
3 | use namespace::autoclean; |
4 | |
5 | BEGIN { extends 'Catalyst::Controller' } |
6 | with 'Gitalist::URIStructure::Repository'; |
7 | |
066e9aa4 |
8 | sub base : Chained('/fragment/base') PathPart('') CaptureArgs(0) {} |
ecb0ebe7 |
9 | |
10 | after shortlog => sub { |
11 | my ($self, $c) = @_; |
5cb2f569 |
12 | my $repository = $c->stash->{Repository}; |
13 | # my $commit = $self->_get_object($c, $c->req->param('hb')); |
14 | # my $filename = $c->req->param('f') || ''; |
15 | |
16 | my %logargs = ( |
17 | sha1 => $repository->head_hash, # $commit->sha1 |
18 | count => 25, #Gitalist->config->{paging}{log} || 25, |
19 | # ($filename ? (file => $filename) : ()) |
20 | ); |
21 | |
22 | my $page = $c->req->param('pg') || 0; |
23 | $logargs{skip} = $c->req->param('pg') * $logargs{count} |
24 | if $c->req->param('pg'); |
25 | $c->stash( |
26 | # commit => $commit, |
27 | log_lines => [$repository->list_revs(%logargs)], |
28 | # refs => $repository->references, |
29 | # page => $page, |
30 | # filename => $filename, |
31 | ); |
ecb0ebe7 |
32 | }; |
33 | |
34 | after heads => sub { |
35 | my ($self, $c) = @_; |
36 | $c->stash( |
37 | heads => $c->stash->{Repository}->heads, |
38 | ); |
39 | }; |
40 | |
5cb2f569 |
41 | =head2 tags |
42 | |
43 | The current list of tags in the repo. |
44 | |
45 | =cut |
46 | |
47 | after tags => sub { |
48 | my ( $self, $c ) = @_; |
49 | $c->stash( |
50 | tags => $c->stash->{Repository}->tags, |
51 | ); |
ecb0ebe7 |
52 | }; |
53 | |
54 | __PACKAGE__->meta->make_immutable; |