This file documents the revision history for Perl extension Gitalist.
-0.01 2009-08-04 16:36:40
- - initial revision, generated by Catalyst
+0.000000_01 UNRELEASED
+ - Initial release to CPAN
package Gitalist;
use Moose;
-use namespace::autoclean;
-
+BEGIN { require 5.008006; }
use Catalyst::Runtime 5.80;
+use namespace::autoclean;
extends 'Catalyst';
StackTrace
/;
-our $VERSION = '0.01';
+our $VERSION = '0.000000_01';
+$VERSION = eval $VERSION;
__PACKAGE__->config(
name => 'Gitalist',
default_model => 'GitRepos',
);
-# Start the application
__PACKAGE__->setup();
around uri_for => sub {
return $uri;
};
+1;
+
+__END__
+
=head1 NAME
-Gitalist - Transitional project to convert gitweb.cgi to a Catalyst app
+Gitalist - A modern git web viewer
=head1 SYNOPSIS
script/gitalist_server.pl
-
=head1 INSTALL
As Gitalist follows the usual Perl module format the usual approach
make install
If you're running a git checkout of Gitalist then you'll additionally
-need the author modules. I<NB: As no distribution exists one will
-presently need the author modules>.
+need the author modules.
=head1 DESCRIPTION
Gitalist is a web frontend for git repositories based on gitweb.cgi
-and backed by Catalyst. It doesn't yet have the full functionality of
-gitweb.cgi but it does have a few small additions at this stage.
+and backed by Catalyst.
=head2 History
Licensed under GNU GPL v2
=cut
-
-1;
return $age_str;
}
+__PACKAGE__->meta->make_immutable;
+
+__END__
+
-=head1 AUTHOR
+=head1 AUTHORS
-Dan Brook
+See L<Gitalist> for authors.
=head1 LICENSE
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
+See L<Gitalist> for the license.
=cut
-
-__PACKAGE__->meta->make_immutable;
sub _build__util { confess(shift() . " cannot build _util") }
1;
+
+__END__
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
}
} # end class
+
+
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
class Gitalist::Git::Object::Blob extends Gitalist::Git::Object {
has '+type' => ( default => 'blob' );
}
+
+1;
+
+__END__
+
+=head1 NAME
+
+Gitalist::Git::Object::Blob
+
+=head1 DESCRIPTION
+
+Gitalist::Git::Object::Blob.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
return \@filedata;
}
}
+
+
+1;
+
+__END__
+
+=head1 NAME
+
+Gitalist::Git::Object::Commit
+
+=head1 DESCRIPTION
+
+Gitalist::Git::Object::Commit.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
}
}
+
+1;
+
+
+1;
+
+__END__
+
+=head1 NAME
+
+Gitalist::Git::Object::HasTree
+
+=head1 DESCRIPTION
+
+Gitalist::Git::Object::HasTree.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
);
}
+
+1;
+
+__END__
+
+__END__
+
+=head1 NAME
+
+Gitalist::Git::Object::Tag
+
+=head1 DESCRIPTION
+
+Gitalist::Git::Object::Tag.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
],
);
}
+
+1;
+
+__END__
+
+
+=head1 NAME
+
+Gitalist::Git::Object::Tree
+
+=head1 DESCRIPTION
+
+Gitalist::Git::Object::Tree.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
map split(/\n/, $_, 6), split /\0/, $output;
}
+} # end class
+
+__END__
+
=head1 SEE ALSO
L<Gitalist::Git::Util> L<Gitalist::Git::Object>
-=head1 AUTHORS AND COPYRIGHT
-
- Catalyst application:
- (C) 2009 Venda Ltd and Dan Brook <dbrook@venda.com>
+=head1 AUTHORS
- Original gitweb.cgi from which this was derived:
- (C) 2005-2006, Kay Sievers <kay.sievers@vrfy.org>
- (C) 2005, Christian Gierke
+See L<Gitalist> for authors.
=head1 LICENSE
-FIXME - Is this going to be GPLv2 as per gitweb? If so this is broken..
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
+See L<Gitalist> for the license.
=cut
-
-} # end class
method _is_git_repo ($dir) {
return -f $dir->file('HEAD') || -f $dir->file('.git', 'HEAD');
}
+} # end class
+__END__
=head1 SEE ALSO
L<Gitalist::Git::Project>
-=head1 AUTHORS AND COPYRIGHT
-
- Catalyst application:
- (C) 2009 Venda Ltd and Dan Brook <dbrook@venda.com>
+=head1 AUTHORS
- Original gitweb.cgi from which this was derived:
- (C) 2005-2006, Kay Sievers <kay.sievers@vrfy.org>
- (C) 2005, Christian Gierke
+See L<Gitalist> for authors.
=head1 LICENSE
-FIXME - Is this going to be GPLv2 as per gitweb? If so this is broken..
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
+See L<Gitalist> for the license.
=cut
-
-
-} # end class
}
} # end class
+
+__END__
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
+
__PACKAGE__->meta->make_immutable;
+__END__
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut
use Template::Plugin::Cycle;
+__PACKAGE__->config(
+ TEMPLATE_EXTENSION => '.tt2',
+ WRAPPER => 'default.tt2',
+);
+
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
+
+__END__
+
=head1 NAME
-Gitalist::View::Default - Catalyst View
+Gitalist::View::Default - HTML View
=head1 DESCRIPTION
-Catalyst View.
+HTML View.
-=head1 AUTHOR
+=head1 AUTHORS
-Dan Brook
+See L<Gitalist> for authors.
=head1 LICENSE
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
+See L<Gitalist> for the license.
=cut
-
-__PACKAGE__->config(
- TEMPLATE_EXTENSION => '.tt2',
- WRAPPER => 'default.tt2',
-);
-
-__PACKAGE__->meta->make_immutable(inline_constructor => 0);
package Gitalist::View::SyntaxHighlight;
use Moose;
-use Gitalist; # ->path_to
use namespace::autoclean;
extends 'Catalyst::View';
}
__PACKAGE__->meta->make_immutable;
+
+__END__
+
+=head1 NAME
+
+Gitalist::View::SyntaxHighlight - Responsible for syntax highlighting code
+
+=head1 DESCRIPTION
+
+Catalyst View for Syntax highlighting.
+
+=head1 AUTHORS
+
+See L<Gitalist> for authors.
+
+=head1 LICENSE
+
+See L<Gitalist> for the license.
+
+=cut