diff options
author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-08-21 21:38:00 +0200 |
---|---|---|
committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-08-21 21:38:00 +0200 |
commit | 52cab08b9bb06bcc822b4e8d99455e693b8b64ae (patch) | |
tree | a6fc75d2c5f18b98213e4d126c9aab7a73110fa8 /lib/LXRng/Repo/Git | |
parent | 17034adefacae12d6522eecc4a9e1f6ad04430fc (diff) | |
parent | 7ee74cd1dd28ee902582e71cf8d3ebddd06c0599 (diff) |
Merge branch 'master' of /home/argggh/git/lxrng/
Diffstat (limited to 'lib/LXRng/Repo/Git')
-rw-r--r-- | lib/LXRng/Repo/Git/Directory.pm | 2 | ||||
-rw-r--r-- | lib/LXRng/Repo/Git/Iterator.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/LXRng/Repo/Git/Directory.pm b/lib/LXRng/Repo/Git/Directory.pm index 6b24214..cf46915 100644 --- a/lib/LXRng/Repo/Git/Directory.pm +++ b/lib/LXRng/Repo/Git/Directory.pm @@ -60,7 +60,7 @@ sub contents { my (@dirs, @files); while (<$git>) { chomp; - my ($mode, $type, $ref, $node) = split(" ", $_); + my ($mode, $type, $ref, $node) = split(" ", $_, 4); if ($type eq 'tree') { push(@dirs, LXRng::Repo::Git::Directory->new($$self{'repo'}, $prefix.$node, diff --git a/lib/LXRng/Repo/Git/Iterator.pm b/lib/LXRng/Repo/Git/Iterator.pm index 702b4ca..418142c 100644 --- a/lib/LXRng/Repo/Git/Iterator.pm +++ b/lib/LXRng/Repo/Git/Iterator.pm @@ -28,7 +28,7 @@ sub new { my @refs; my $git = $repo->_git_cmd('ls-tree', '-r', $release); while (<$git>) { - if (/\S+\s+blob\s+(\S+)\s+(\S+)/) { + if (/\S+\s+blob\s+(\S+)\s+(.+)/) { push(@refs, [$2, $1]); } } |