remove unused code
This commit is contained in:
parent
992fe446ad
commit
b88ecb36dd
1 changed files with 0 additions and 1 deletions
|
@ -304,7 +304,6 @@ catObjectStreamLsTree l want repo reader = withCatFileStream False repo $
|
||||||
forM_ l $ \ti -> case want ti of
|
forM_ l $ \ti -> case want ti of
|
||||||
Nothing -> return ()
|
Nothing -> return ()
|
||||||
Just v -> do
|
Just v -> do
|
||||||
let f = LsTree.file ti
|
|
||||||
let sha = LsTree.sha ti
|
let sha = LsTree.sha ti
|
||||||
liftIO $ writeChan c (sha, v)
|
liftIO $ writeChan c (sha, v)
|
||||||
S8.hPutStrLn h (fromRef' sha)
|
S8.hPutStrLn h (fromRef' sha)
|
||||||
|
|
Loading…
Reference in a new issue