more groundwork for StatelessOpenPGP
no behavior changes
This commit is contained in:
parent
2fb200a110
commit
dd3e779020
5 changed files with 27 additions and 25 deletions
|
@ -3,7 +3,7 @@
|
|||
- Currently using gpg; could later be modified to support different
|
||||
- crypto backends if necessary.
|
||||
-
|
||||
- Copyright 2011-2023 Joey Hess <id@joeyh.name>
|
||||
- Copyright 2011-2024 Joey Hess <id@joeyh.name>
|
||||
-
|
||||
- Licensed under the GNU AGPL version 3 or higher.
|
||||
-}
|
||||
|
@ -43,6 +43,7 @@ import Control.Monad.IO.Class
|
|||
|
||||
import Annex.Common
|
||||
import qualified Utility.Gpg as Gpg
|
||||
import qualified Utility.StatelessOpenPGP as SOP
|
||||
import Types.Crypto
|
||||
import Types.Remote
|
||||
import Types.Key
|
||||
|
@ -195,7 +196,6 @@ readBytes a h = liftIO (L.hGetContents h) >>= a
|
|||
readBytesStrictly :: (MonadIO m) => (S.ByteString -> m a) -> Reader m a
|
||||
readBytesStrictly a h = liftIO (S.hGetContents h) >>= a
|
||||
|
||||
|
||||
{- Runs a Feeder action, that generates content that is symmetrically
|
||||
- encrypted with the Cipher (unless it is empty, in which case
|
||||
- public-key encryption is used) using the given gpg options, and then
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue