Rename ::Repo to ::CollectionOfProjects::FromDirectory
Zachary Stevens [Fri, 18 Dec 2009 23:00:37 +0000 (23:00 +0000)]
lib/Gitalist/Git/CollectionOfProjects/FromDirectory.pm [moved from lib/Gitalist/Git/Repo.pm with 87% similarity]
lib/Gitalist/Model/GitRepos.pm
t/02git_CollectionOfProjects_FromDirectory.t [moved from t/02git_repo.t with 83% similarity]

similarity index 87%
rename from lib/Gitalist/Git/Repo.pm
rename to lib/Gitalist/Git/CollectionOfProjects/FromDirectory.pm
index 42f4c1d..b9ab1c1 100644 (file)
@@ -1,6 +1,7 @@
 use MooseX::Declare;
 
-class Gitalist::Git::Repo with Gitalist::Git::CollectionOfProjects {
+class Gitalist::Git::CollectionOfProjects::FromDirectory
+    with Gitalist::Git::CollectionOfProjects {
     use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
     use MooseX::Types::Path::Class qw/Dir/;
 
@@ -43,11 +44,11 @@ __END__
 
 =head1 NAME
 
-Gitalist::Git::Repo - Model of a repository directory
+Gitalist::Git::CollectionOfProjects::FromDirectory - Model of a repository directory
 
 =head1 SYNOPSIS
 
-    my $repo = Gitalist::Git::Repo->new( repo_dir => $Dir );
+    my $repo = Gitalist::Git::CollectionOfProjects::FromDirectory->new( repo_dir => $Dir );
     my $project_list = $repo->projects;
     my $first_project = $project_list->[0];
     my $named_project = $repo->get_project('Gitalist');
index 6fd502d..610e025 100644 (file)
@@ -1,7 +1,7 @@
 package Gitalist::Model::GitRepos;
 
 use Moose;
-use Gitalist::Git::Repo;
+use Gitalist::Git::CollectionOfProjects::FromDirectory;
 use Gitalist::Git::CollectionOfProjects::FromListOfDirectories;
 use MooseX::Types::Moose qw/Maybe ArrayRef/;
 use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
@@ -71,7 +71,7 @@ sub build_per_context_instance {
         Gitalist::Git::CollectionOfProjects::FromListOfDirectories->new(repos => $self->repos);
     }
     else {
-        Gitalist::Git::Repo->new(repo_dir => $self->repo_dir);
+        Gitalist::Git::CollectionOfProjects::FromDirectory->new(repo_dir => $self->repo_dir);
     }
 }
 
similarity index 83%
rename from t/02git_repo.t
rename to t/02git_CollectionOfProjects_FromDirectory.t
index 2344d8d..01c7696 100644 (file)
@@ -6,11 +6,11 @@ use Test::Exception;
 
 use Data::Dumper;
 
-BEGIN { use_ok 'Gitalist::Git::Repo' }
+BEGIN { use_ok 'Gitalist::Git::CollectionOfProjects::FromDirectory' }
 
 my $repo_dir = "$Bin/lib/repositories";
-my $repo = Gitalist::Git::Repo->new( repo_dir => $repo_dir );
-isa_ok($repo, 'Gitalist::Git::Repo');
+my $repo = Gitalist::Git::CollectionOfProjects::FromDirectory->new( repo_dir => $repo_dir );
+isa_ok($repo, 'Gitalist::Git::CollectionOfProjects::FromDirectory');
 
 is($repo->repo_dir, $repo_dir, "repo->repo_dir is correct" );
 
@@ -51,6 +51,6 @@ isa_ok($project, 'Gitalist::Git::Project');
 # was a relative path
 lives_ok {
     my $repo2_dir = "$Bin/lib/../lib/repositories";
-    my $repo2 = Gitalist::Git::Repo->new( repo_dir => $repo2_dir );
+    my $repo2 = Gitalist::Git::CollectionOfProjects::FromDirectory->new( repo_dir => $repo2_dir );
     my $repo2_proj = $repo2->get_project('repo1');
 } 'relative repo_dir properly handled';