From a33a45ca5ff0b536b477f0e2bafc6dc0f7652560 Mon Sep 17 00:00:00 2001
From: Sergey Romanov <sromanov-dev@yandex.ru>
Date: Sat, 11 Mar 2017 02:52:35 +0300
Subject: [PATCH] fix GH #9

---
 lib/Cogit/Loose.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Cogit/Loose.pm b/lib/Cogit/Loose.pm
index 758f005..fc120fe 100644
--- a/lib/Cogit/Loose.pm
+++ b/lib/Cogit/Loose.pm
@@ -50,8 +50,8 @@ sub all_sha1s {
     );
     return Data::Stream::Bulk::Filter->new(
         filter => sub {
-            [   map { m{([a-z0-9]{2})[/\\]([a-z0-9]{38})}; $1 . $2 }
-                    grep {m{[/\\][a-z0-9]{2}[/\\]}} @$_
+            [   map { m{[/\\]([a-z0-9]{2})[/\\]([a-z0-9]{38})} ? $1 . $2 : () }
+                    @$_
             ];
         },
         stream => $files,