X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FApp%2FRgit%2FConfig%2FDefault.pm;h=e34767b96ba7889db056a61d1f505e41f1a3a8e6;hb=ce5091c087229219cf4dc879fb0d2dcab808b885;hp=5917d790d7201f9f4d0ebb6620e421228e0c1c0b;hpb=19bee8f647bfe6c94c5cb3cf6a60d7a43cbca222;p=perl%2Fmodules%2Frgit.git diff --git a/lib/App/Rgit/Config/Default.pm b/lib/App/Rgit/Config/Default.pm index 5917d79..e34767b 100644 --- a/lib/App/Rgit/Config/Default.pm +++ b/lib/App/Rgit/Config/Default.pm @@ -15,11 +15,11 @@ App::Rgit::Config::Default - Default App::Rgit configuration class. =head1 VERSION -Version 0.01 +Version 0.04 =cut -our $VERSION = '0.01'; +our $VERSION = '0.04'; =head1 DESCRIPTION @@ -44,14 +44,13 @@ sub repos { find { wanted => sub { return unless -d $_; - return if $_ eq '.' or $_ eq '..'; my $r = App::Rgit::Repository->new(dir => $File::Find::name); $repos{$r->repo} = $r if $r and not exists $repos{$r->repo}; }, follow => 1 }, $self->root; - $self->{repos} = [ values %repos ]; + $self->{repos} = [ sort { $a->repo cmp $b->repo } values %repos ]; } =head1 SEE ALSO