remove direct mode support from Annex.Content
No longer used. The only possible user of it would be code in Upgrade.V5, so I verified that the parts of Annex.Content it used were not used to manipulate direct mode files.
This commit is contained in:
parent
16f646c9a6
commit
da6f4d8887
8 changed files with 77 additions and 198 deletions
|
@ -90,12 +90,7 @@ fixupReq req@(Req {}) =
|
|||
v <- getAnnexLinkTarget' (getfile r) False
|
||||
case parseLinkTargetOrPointer =<< v of
|
||||
Nothing -> return r
|
||||
Just k -> setfile r <$>
|
||||
withObjectLoc k
|
||||
-- indirect mode
|
||||
return
|
||||
-- direct mode
|
||||
(return . Prelude.head)
|
||||
Just k -> withObjectLoc k (pure . setfile r)
|
||||
_ -> return r
|
||||
|
||||
externalDiffer :: String -> [String] -> Differ
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue