X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FGitalist%2FGit%2FCollectionOfRepositories%2FFromDirectoryRecursive.pm;fp=lib%2FGitalist%2FGit%2FCollectionOfRepositories%2FFromDirectoryRecursive.pm;h=fc17eedcec3f710153eb97a01d1571b4cbfc0c94;hb=634770da1dfc088c407ef337692a034307cacadb;hp=cba9de4c923baeef423ddc6db57c0c54872545a2;hpb=9b762ea6c774fc3c50066bda70d2ed298bc635ad;p=catagits%2FGitalist.git diff --git a/lib/Gitalist/Git/CollectionOfRepositories/FromDirectoryRecursive.pm b/lib/Gitalist/Git/CollectionOfRepositories/FromDirectoryRecursive.pm index cba9de4..fc17eed 100644 --- a/lib/Gitalist/Git/CollectionOfRepositories/FromDirectoryRecursive.pm +++ b/lib/Gitalist/Git/CollectionOfRepositories/FromDirectoryRecursive.pm @@ -33,10 +33,15 @@ class Gitalist::Git::CollectionOfRepositories::FromDirectoryRecursive return $repo->path; } + method _get_repo_name (NonEmptySimpleStr $name) { + # strip off the repo_dir part from a path + return Path::Class::Dir->new($name)->relative($self->repo_dir)->stringify; + } + ## Builders method _build_repositories { return [ - map Gitalist::Git::Repository->new($_), $self->_find_repos( $self->repo_dir ) + map { Gitalist::Git::Repository->new($_, $self->_get_repo_name("$_")) } $self->_find_repos( $self->repo_dir ) ]; } } # end class