DigitalOcean.SSHKey

Documentation

data SSHKey

Constructors

SSHKey

Fields

id :: Integer

fingerprint :: String

publicKey :: String

sshkeyName :: String

Instances

Read SSHKey

Show SSHKey

FromJSON SSHKey

listAllKeys :: Authentication -> MonadIO m => m (Maybe [SSHKey])

List all Keys

do
    tkn <- getEnv DIGITAL_OCEAN_PERSONAL_ACCESS_TOKEN
    maybeKeys <- listAllKeys $ Authentication tkn
    print $ show $ isJust maybeKeys