diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-12 21:34:25 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-12 21:34:25 -0400 |
| commit | 6075fc636dfd9d8c946ed11a58ffa7059dd560d0 (patch) | |
| tree | ba98715faf1752269da6b1d8ccfb04d6178268b1 /Propellor/Types.hs | |
| parent | 39ea83ea2416cf67d3f837cc564472ffbef136f2 (diff) | |
propellor spin
Diffstat (limited to 'Propellor/Types.hs')
| -rw-r--r-- | Propellor/Types.hs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/Propellor/Types.hs b/Propellor/Types.hs index e6e02126..a30b183c 100644 --- a/Propellor/Types.hs +++ b/Propellor/Types.hs @@ -27,6 +27,8 @@ module Propellor.Types , ActionResult(..) , CmdLine(..) , PrivDataField(..) + , GpgKeyId + , SshKeyType(..) ) where import Data.Monoid @@ -162,9 +164,13 @@ data CmdLine -- It's fine to add new fields. data PrivDataField = DockerAuthentication - | SshPrivKey UserName + | SshKey SshKeyType UserName | Password UserName | PrivFile FilePath + | GpgKey GpgKeyId deriving (Read, Show, Ord, Eq) +type GpgKeyId = String +data SshKeyType = SshRsa | SshDsa + deriving (Read, Show, Ord, Eq) |