X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FApp%2FRgit%2FConfig%2FDefault.pm;h=8630fb61f759c49df6efe99b27b476ddb5e64c53;hb=17bcb9a2dcb825086561f0c410ae5cbf6f7eb7c7;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..8630fb6 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.02 =cut -our $VERSION = '0.01'; +our $VERSION = '0.02'; =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