simplify

Don't need to check key server for --gpgkeyid backup, because the same
switch has to be provided at restore time.

1 files changed, 1 insertions, 8 deletions

diff --git a/Gpg.hs b/Gpg.hs
index 4a0633a..cbb7991 100644
--- a/Gpg.hs
+++ b/Gpg.hs
@@ -3,7 +3,7 @@
  - Licensed under the GNU AGPL version 3 or higher.
  -}
 
-{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE OverloadedStrings, BangPatterns #-}
 
 module Gpg where
 
@@ -55,10 +55,3 @@ getSecretKey (KeyId kid) = do
 		_ -> error "gpg --export-secret-key failed"
   where
 	ps = ["--batch", "--export-secret-key", BU8.toString kid]
-
--- | 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