Rename get_project to get_repository
Zachary Stevens [Sat, 19 Dec 2009 02:37:49 +0000 (02:37 +0000)]
lib/Gitalist/Controller/Root.pm
lib/Gitalist/Git/CollectionOfRepositories.pm
lib/Gitalist/Git/CollectionOfRepositories/FromDirectory.pm
lib/Gitalist/Git/CollectionOfRepositories/FromListOfDirectories.pm
t/02git_CollectionOfRepositories_FromDirectory.t

index 98a5418..1567377 100644 (file)
@@ -624,7 +624,7 @@ sub base : Chained('/root') PathPart('') CaptureArgs(0) {
   my $project = $c->req->param('p');
   if (defined $project) {
     eval {
-      $c->stash(Repository => $c->model('GitRepos')->get_project($project));
+      $c->stash(Repository => $c->model('GitRepos')->get_repository($project));
     };
     if ($@) {
       $c->detach('/error_404');
index c45a5d7..031a659 100644 (file)
@@ -12,7 +12,7 @@ role Gitalist::Git::CollectionOfRepositories {
         required => 1,
         lazy_build => 1,
     );
-    method get_project (NonEmptySimpleStr $name) {
+    method get_repository (NonEmptySimpleStr $name) {
         my $path = $self->_get_path_for_project_name($name);
         die "Not a valid git repository."
             unless $self->_is_git_repo($path);
index 8eaf947..2638839 100644 (file)
@@ -32,7 +32,7 @@ class Gitalist::Git::CollectionOfRepositories::FromDirectory
         while (my $dir_entry = $dh->read) {
             # try to get a project for each entry in repo_dir
              eval {
-                 my $p = $self->get_project($dir_entry);
+                 my $p = $self->get_repository($dir_entry);
                  push @ret, $p;
             };
          }
@@ -51,7 +51,7 @@ Gitalist::Git::CollectionOfRepositories::FromDirectory - Model of a repository d
     my $repo = Gitalist::Git::CollectionOfRepositories::FromDirectory->new( repo_dir => $Dir );
     my $project_list = $repo->projects;
     my $first_project = $project_list->[0];
-    my $named_project = $repo->get_project('Gitalist');
+    my $named_project = $repo->get_repository('Gitalist');
 
 =head1 DESCRIPTION
 
@@ -71,7 +71,7 @@ An array of all L<Gitalist::Git::Repository>s found in C<repo_dir>.
 
 =head1 METHODS
 
-=head2 get_project (Str $name)
+=head2 get_repository (Str $name)
 
 Returns a L<Gitalist::Git::Repository> for the given name.
 If C<$name> is not a valid git repository under C<$repo_dir>, an exception
index fae7da0..ee25e8a 100644 (file)
@@ -27,7 +27,7 @@ class Gitalist::Git::CollectionOfRepositories::FromListOfDirectories with Gitali
 
     ## Builders
     method _build_projects {
-        [ map { $self->get_project($_) } $self->repos->flatten ];
+        [ map { $self->get_repository($_) } $self->repos->flatten ];
     }
 }                               # end class
 
index 247ad25..c1f1ac8 100644 (file)
@@ -32,25 +32,25 @@ isa_ok($project_list->[0], 'Gitalist::Git::Repository');
 is($project_list->[0]->{name}, 'bare.git', 'list_projects has correct name for "bare.git" repo' );
 
 dies_ok {
-    my $project = $repo->get_project('NoSuchRepository');
+    my $project = $repo->get_repository('NoSuchRepository');
 } 'throws exception for invalid project';
 
 dies_ok {
-    my $project = $repo->get_project();
+    my $project = $repo->get_repository();
 } 'throws exception for no project';
 
 dies_ok {
-    my $project = $repo->get_project('../../../');
+    my $project = $repo->get_repository('../../../');
 } 'throws exception for directory traversal';
 
-my $project = $repo->get_project('repo1');
+my $project = $repo->get_repository('repo1');
 isa_ok($project, 'Gitalist::Git::Repository');
 
 
-# check for bug where get_project blew up if repo_dir
+# check for bug where get_repository blew up if repo_dir
 # was a relative path
 lives_ok {
     my $repo2_dir = "$Bin/lib/../lib/repositories";
     my $repo2 = Gitalist::Git::CollectionOfRepositories::FromDirectory->new( repo_dir => $repo2_dir );
-    my $repo2_proj = $repo2->get_project('repo1');
+    my $repo2_proj = $repo2->get_repository('repo1');
 } 'relative repo_dir properly handled';