Started support for deleting subkeys

1 files changed, 4 insertions, 0 deletions

diff --git a/KeyRing.hs b/KeyRing.hs
index 75e19b3..30e0382 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -399,6 +399,9 @@ data Transform =
         -- A tor-style UID is one of the following form:
         --
         -- > Anonymous <root@HOSTNAME.onion>
+        | DeleteSubKey String
+        -- ^ Delete the subkey specified by the given fingerprint and any
+        -- associated signatures on that key.
  deriving (Eq,Ord)
 
 -- | This type describes an idempotent transformation (merge or import) on a
@@ -624,6 +627,7 @@ data KikiReportAction =
         | UnableToExport KeyAlgorithm String
         | FailedFileWrite
         | HostsDiff ByteString
+        | DeletedPacket Packet
  deriving Show
 
 uncamel :: String -> String