summaryrefslogtreecommitdiff
path: root/Annex/Link.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Annex/Link.hs')
-rw-r--r--Annex/Link.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Annex/Link.hs b/Annex/Link.hs
index 4ee85aac9..b191bce6f 100644
--- a/Annex/Link.hs
+++ b/Annex/Link.hs
@@ -117,9 +117,6 @@ stageSymlink file sha =
hashPointerFile :: Key -> Annex Sha
hashPointerFile key = hashBlob (formatPointer key)
-hashPointerFile' :: Git.HashObject.HashObjectHandle -> Key -> Annex Sha
-hashPointerFile' h = liftIO . Git.HashObject.hashBlob h . formatPointer
-
{- Stages a pointer file, using a Sha of its content -}
stagePointerFile :: FilePath -> Sha -> Annex ()
stagePointerFile file sha =