Skip to content

Commit d7fa562

Browse files
committed
Merge pull request #1 from wchristian/master
make sure zlib data is always read as-is
2 parents 566ccf5 + 8e1ada8 commit d7fa562

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lib/Git/PurePerl/Loose.pm

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,7 @@ sub get_object {
2020
= file( $self->directory, substr( $sha1, 0, 2 ), substr( $sha1, 2 ) );
2121
return unless -f $filename;
2222

23-
my $compressed = $filename->slurp;
23+
my $compressed = $filename->slurp( iomode => '<:raw' );
2424
my $data = uncompress($compressed);
2525
my ( $kind, $size, $content ) = $data =~ /^(\w+) (\d+)\0(.+)$/s;
2626
return ( $kind, $size, $content );

0 commit comments

Comments
 (0)