added checkPresentExportWithContentIdentifier
Ugh, don't like needing to add this, but I can't see a way around it.
This commit is contained in:
parent
3c652e1499
commit
46d33e804a
5 changed files with 130 additions and 92 deletions
|
@ -312,4 +312,12 @@ data ImportActions a = ImportActions
|
|||
--
|
||||
-- If the directory is not empty, it should succeed.
|
||||
, removeExportDirectoryWhenEmpty :: Maybe (ExportDirectory -> a Bool)
|
||||
-- Checks if the specified ContentIdentifier is exported to the
|
||||
-- remote at the specified ExportLocation.
|
||||
-- Throws an exception if the remote cannot be accessed.
|
||||
, checkPresentExportWithContentIdentifier
|
||||
:: Key
|
||||
-> ExportLocation
|
||||
-> [ContentIdentifier]
|
||||
-> a Bool
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue