convert KeySource to RawFilePath
This commit is contained in:
parent
e468fbc518
commit
c31e1be781
14 changed files with 74 additions and 55 deletions
|
@ -8,6 +8,7 @@
|
|||
module Types.KeySource where
|
||||
|
||||
import Utility.InodeCache
|
||||
import System.FilePath.ByteString (RawFilePath)
|
||||
|
||||
{- When content is in the process of being ingested into the annex,
|
||||
- and a Key generated from it, this data type is used.
|
||||
|
@ -22,8 +23,8 @@ import Utility.InodeCache
|
|||
- files that may be made while they're in the process of being ingested.
|
||||
-}
|
||||
data KeySource = KeySource
|
||||
{ keyFilename :: FilePath
|
||||
, contentLocation :: FilePath
|
||||
{ keyFilename :: RawFilePath
|
||||
, contentLocation :: RawFilePath
|
||||
, inodeCache :: Maybe InodeCache
|
||||
}
|
||||
deriving (Show)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue