X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FApp%2FRgit.pm;h=975284ff23bc48beb1667b80def20db3e5e941b8;hb=0c3a62e21d624c6076fc69dd2310bea0dd556ab8;hp=f877d7882580e24c9624393b7c8ddd9c4b9bdddc;hpb=67e585ffae69ce0c350a920658738d7864b1d54a;p=perl%2Fmodules%2Frgit.git diff --git a/lib/App/Rgit.pm b/lib/App/Rgit.pm index f877d78..975284f 100644 --- a/lib/App/Rgit.pm +++ b/lib/App/Rgit.pm @@ -15,11 +15,11 @@ App::Rgit - Backend that supports the rgit utility. =head1 VERSION -Version 0.03 +Version 0.05 =cut -our $VERSION = '0.03'; +our $VERSION = '0.05'; =head1 DESCRIPTION @@ -38,13 +38,15 @@ Creates a new L object that's bound to execute the command C<$cmd> on sub new { my ($class, %args) = &validate; my $config = App::Rgit::Config->new( - root => $args{root}, - git => $args{git}, + root => $args{root}, + git => $args{git}, + debug => $args{debug}, ); return unless defined $config; my $command = App::Rgit::Command->new( - cmd => $args{cmd}, - args => $args{args}, + cmd => $args{cmd}, + args => $args{args}, + policy => $args{policy}, ); return unless defined $command; $class->SUPER::new(