package Git::Wrapper::File::RawModification; { $Git::Wrapper::File::RawModification::VERSION = '0.027'; } # ABSTRACT: Modification of a file in a commit use 5.006; use strict; use warnings; sub new { my ($class, $filename, $type, $perms_from, $perms_to, $blob_from, $blob_to) = @_; return bless { filename => $filename, type => $type, perms_from => $perms_from, perms_to => $perms_to, blob_from => $blob_from, blob_to => $blob_to, } => $class; } sub filename { shift->{filename} } sub type { shift->{type} } sub perms_from { shift->{perms_from} } sub perms_to { shift->{perms_to} } sub blob_from { shift->{blob_from} } sub blob_to { shift->{blob_to} } 1; __END__ =pod =head1 NAME Git::Wrapper::File::RawModification - Modification of a file in a commit =head1 VERSION version 0.027 =head1 METHODS =head2 new Constructor =head2 filename =head2 type =head2 perms_from =head2 perms_to =head2 blob_from =head2 blob_to =head1 SEE ALSO =head2 L =head1 REPORTING BUGS & OTHER WAYS TO CONTRIBUTE The code for this module is maintained on GitHub, at L. If you have a patch, feel free to fork the repository and submit a pull request. If you find a bug, please open an issue on the project at GitHub. (We also watch the L queue for Git::Wrapper, so feel free to use that bug reporting system if you prefer) =head1 AUTHORS =over 4 =item * Hans Dieter Pearcey =item * Chris Prather =item * John SJ Anderson =back =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2008 by Hans Dieter Pearcey. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut