Home
last modified time | relevance | path

Searched refs:getTopFilePath (Results 1 – 22 of 22) sorted by relevance

/dports/devel/hs-git-annex/git-annex-8.20210903/Git/
H A DFilePath.hs21 getTopFilePath,
41 newtype TopFilePath = TopFilePath { getTopFilePath :: RawFilePath } function
53 fromRef' b <> ":" <> getTopFilePath f
57 fromTopFilePath p repo = P.combine (repoPath repo) (getTopFilePath p)
H A DDiffTree.hs40 let f' = getTopFilePath f
43 else f' `dirContains` getTopFilePath (file diff)
H A DUpdateIndex.hs136 indexPath = toInternalGitPath . getTopFilePath
H A DLsTree.hs155 ] <> (S.cons (fromIntegral (ord '\t')) (getTopFilePath (file ti)))
H A DTree.hs124 , takeFileName (fromRawFilePath (getTopFilePath f))
383 gitPath = fromRawFilePath . getTopFilePath
/dports/devel/hs-git-annex/git-annex-8.20210903/Database/Keys/
H A DSQL.hs89 af = SFilePath (getTopFilePath f)
105 af = SFilePath (getTopFilePath f)
111 af = SFilePath (getTopFilePath f)
/dports/devel/hs-git-annex/git-annex-8.20210903/Command/
H A DExport.hs274 f = getTopFilePath (Git.LsTree.file ti)
337 f' = getTopFilePath f
347 f' = getTopFilePath f
396 oldloc = mkExportLocation $ getTopFilePath oldf
404 f' = getTopFilePath f
418 f' = getTopFilePath f
515 getTopFilePath topf
H A DView.hs118 fromRawFilePath $ (top P.</> getTopFilePath p)
H A DFind.hs84 start o si (getTopFilePath topf) key
H A DFsck.hs348 unless (getTopFilePath f `elem` map getTopFilePath afs) $
/dports/devel/hs-git-annex/git-annex-8.20210903/Logs/
H A DSmudge.hs23 serializeKey' k <> " " <> getTopFilePath f
/dports/devel/hs-git-annex/git-annex-8.20210903/Remote/
H A DBorg.hs280 ( getTopFilePath (LsTree.file ti)
282 (getTopFilePath (LsTree.file ti))
292 mkImportLocation $ getTopFilePath $ LsTree.file ti
/dports/devel/hs-git-annex/git-annex-8.20210903/Backend/
H A DWORM.hs44 relf <- fromRawFilePath . getTopFilePath
/dports/devel/hs-git-annex/git-annex-8.20210903/Assistant/Threads/
H A DConfigMonitor.hs95 extract treeitem = (getTopFilePath $ LsTree.file treeitem, LsTree.sha treeitem)
/dports/devel/hs-git-annex/git-annex-8.20210903/Annex/
H A DView.hs372 let f = fromRawFilePath $ getTopFilePath topf
378 | "." `B.isPrefixOf` getTopFilePath topf =
417 (void . commandAction . a (fromRawFilePath $ getTopFilePath $ DiffTree.file item))
H A DImport.hs146 <> getTopFilePath dir
298 maybe lf (\sd -> getTopFilePath sd P.</> lf) msubdir
593 getTopFilePath subdir P.</> fromImportLocation loc
720 getTopFilePath dir P.</> fromImportLocation loc
H A DFileMatcher.hs97 matchfile <- getTopFilePath <$> inRepo (toTopFilePath file)
H A DAdjustedBranch.hs578 norm = normalise . fromRawFilePath . getTopFilePath
H A DBranch.hs834 catObjectStreamLsTree l (select' . getTopFilePath . Git.LsTree.file) g go'
/dports/devel/hs-git-annex/git-annex-8.20210903/Database/
H A DContentIdentifier.hs165 go ti = case extLogFileKey remoteContentIdentifierExt (getTopFilePath (DiffTree.file ti)) of
H A DExport.hs222 loc = mkExportLocation $ getTopFilePath $ Git.DiffTree.file i
/dports/devel/hs-git-annex/git-annex-8.20210903/CmdLine/
H A DSeek.hs198 getTopFilePath topf