Unfuck things
bobtfish [Mon, 2 Nov 2009 20:13:21 +0000 (20:13 +0000)]
lib/Gitalist/Model/Git.pm

index 7bbce50..3ae1188 100644 (file)
@@ -269,28 +269,6 @@ sub list_projects {
                                $is_bare ? $obj : $obj->subdir('.git')
                        ),
         };
-    }
->>>>>>> 6ccff25e7c826deca31f450f33049ba7fd62ded9:lib/Gitalist/Model/Git.pm
-
-  my @ret;
-  my $dh = $base->open;
-  while (my $file = $dh->read) {
-    next if $file =~ /^.{1,2}$/;
-
-    my $obj = $base->subdir($file);
-    next unless -d $obj;
-    next unless $self->is_git_repo($obj);
-
-    # XXX Leaky abstraction alert!
-    my $is_bare = !-d $obj->subdir('.git');
-
-    my $name = (File::Spec->splitdir($obj))[-1];
-    push @ret, {
-      name => ($name . ( $is_bare ? '' : '/.git' )),
-      $self->get_project_properties(
-        $is_bare ? $obj : $obj->subdir('.git')
-        ),
-      };
   }
 
   return [sort { $a->{name} cmp $b->{name} } @ret];