more command line interface improvements

1 files changed, 6 insertions, 3 deletions

diff --git a/Gpg.hs b/Gpg.hs
index bf4cbe6..9794395 100644
--- a/Gpg.hs
+++ b/Gpg.hs
@@ -8,14 +8,17 @@ module Gpg where
 import Types
 import System.Process
 
--- | Converts an input KeyId, which can be short, or even a name or email,
--- to a long-form gpg KeyId of a secret key.
-getFullKeyId :: KeyId -> IO (Maybe KeyId)
+listSecretKeys :: IO [(Name, KeyId)]
+listSecretKeys = undefined
 -- gpg --batch --with-colons --list-secret-keys
 -- extract from eg, sec::4096:1:C910D9222512E3C7:...
 
+getSecretKey :: KeyId -> IO SecretKey
+getSecretKey = undefined
+
 -- | Check if a given gpg key is present on the keyserver.
 -- (Without downloading the key.)
 knownByKeyServer :: KeyId -> IO Bool
+knownByKeyServer kid = undefined
 -- gpg --batch --with-colons --search-keys 2>/dev/null
 -- check if output includes pub: line