lib/Gitalist/Controller/Commit.pm

   1 package Gitalist::Controller::Commit;
   2
   3 use Moose;
   4 use Moose::Autobox;
   5 use Try::Tiny qw/try catch/;
   6 use namespace::autoclean;
   7
   8 BEGIN { extends 'Catalyst::Controller' }
   9
  10 sub base : Chained('/repository/find') PathPart('') CaptureArgs(0) {}
  11
  12 sub find : Chained('base') PathPart('') CaptureArgs(1) {
  13     my ($self, $c, $sha1part) = @_;
  14     $c->stash->{Commit} = $c->stash->{Repository}->get_object($sha1part)
  15         or $c->detach('/error404', "Couldn't find a object for '$sha1part' in XXXX!");
  16 }
  17
  18 sub diff : Chained('find') Args(0) {}
  19
  20 sub tree : Chained('find') Args(0) {}
  21
  22 sub commit : Chained('find') Args(0) {}
  23
  24 __PACKAGE__->meta->make_immutable;