diff options
Diffstat (limited to 'Types.hs')
-rw-r--r-- | Types.hs | 12 |
1 files changed, 5 insertions, 7 deletions
@@ -45,18 +45,16 @@ newtype Password = Password B.ByteString newtype Name = Name B.ByteString deriving (Show) --- | The type of the key that is stored in keysafe. -newtype KeyType = KeyType B.ByteString +-- | Source of the secret key stored in keysafe. +data SecretKeySource = GpgKey KeyId | KeyFile FilePath deriving (Show) -gpgKey :: KeyType -gpgKey = KeyType "gpg" - -- | The keyid is any value that is unique to a private key, and can be -- looked up somehow without knowing the private key. -- --- A gpg keyid is the obvious example. -data KeyId = KeyId KeyType B.ByteString +-- A gpg keyid is the obvious example. But, if a gpg key is not +-- stored on the key servers, keysafe will instead use "". +data KeyId = KeyId B.ByteString deriving (Show) data BenchmarkResult t = BenchmarkResult { expectedBenchmark :: t, actualBenchmark :: t } |