This commit is contained in:
Joey Hess 2017-10-30 12:28:44 -04:00
parent 0743ee1bbc
commit c7fe7760d1
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -139,7 +139,7 @@ tree :: Ref -> Repo -> IO (Maybe Sha)
tree (Ref ref) = extractSha <$$> pipeReadStrict
[ Param "rev-parse", Param ref' ]
where
ref' = if ':' `isInfixOf` ref
ref' = if ":" `isInfixOf` ref
then ref
-- de-reference commit objects to the tree
else ref ++ ":"