fixing inline pod documentation for the debian package. (missing whatis entry)

[catagits/Gitalist.git] / lib / Gitalist / Controller / Fragment / Repository.pm

diff --git a/lib/Gitalist/Controller/Fragment/Repository.pm b/lib/Gitalist/Controller/Fragment/Repository.pm
index 135cb8f..4f64c5c 100644 (file)
--- a/lib/Gitalist/Controller/Fragment/Repository.pm
+++ b/lib/Gitalist/Controller/Fragment/Repository.pm
@@ -3,34 +3,13 @@ use Moose;
 use namespace::autoclean;
 
 BEGIN { extends 'Gitalist::Controller' }
-with 'Gitalist::URIStructure::Repository';
+with qw/
+    Gitalist::URIStructure::Repository
+    Gitalist::URIStructure::Fragment::WithLog
+/;
 
 sub base : Chained('/fragment/base') PathPart('') CaptureArgs(0) {}
 
-after log => sub {
-    my ($self, $c) = @_;
-    my $repository  = $c->stash->{Repository};
-#    my $commit   =  $self->_get_object($c, $c->req->param('hb'));
-#    my $filename = $c->req->param('f') || '';
-
-    my %logargs = (
-       sha1   => $repository->head_hash, # $commit->sha1
-       count  => 25, #Gitalist->config->{paging}{log} || 25,
-#       ($filename ? (file => $filename) : ())
-    );
-
-    my $page = $c->req->param('pg') || 0;
-    $logargs{skip} = $c->req->param('pg') * $logargs{count}
-        if $c->req->param('pg');
-    $c->stash(
-#       commit    => $commit,
-       log_lines => [$repository->list_revs(%logargs)],
-#       refs      => $repository->references,
-#       page      => $page,
-#       filename  => $filename,
-    );
-};
-
 after heads => sub {
     my ($self, $c) = @_;
     $c->stash(
@@ -38,6 +17,12 @@ after heads => sub {
     );
 };
 
+=encoding UTF-8
+
+=head1 NAME
+
+Gitalist::Controller::Fragment::Repository - Fragment::Repository module for Gitalist::Controller
+
 =head2 tags
 
 The current list of tags in the repo.