summaryrefslogtreecommitdiff
path: root/Git/CatFile.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Git/CatFile.hs')
-rw-r--r--Git/CatFile.hs5
1 files changed, 0 insertions, 5 deletions
diff --git a/Git/CatFile.hs b/Git/CatFile.hs
index 2bd50592c..cd531e68f 100644
--- a/Git/CatFile.hs
+++ b/Git/CatFile.hs
@@ -10,7 +10,6 @@ module Git.CatFile (
catFileStart,
catFileStop,
catFile,
- catFileIndex,
catObject,
catObjectDetails,
) where
@@ -41,10 +40,6 @@ catFileStop = CoProcess.stop
catFile :: CatFileHandle -> Branch -> FilePath -> IO L.ByteString
catFile h branch file = catObject h $ Ref $ show branch ++ ":" ++ file
-{- Reads a file from the index. -}
-catFileIndex :: CatFileHandle -> FilePath -> IO L.ByteString
-catFileIndex h file = catObject h $ Ref $ ':' : file
-
{- Uses a running git cat-file read the content of an object.
- Objects that do not exist will have "" returned. -}
catObject :: CatFileHandle -> Ref -> IO L.ByteString