removed obsolete kImports and UsageTag

1 files changed, 2 insertions, 3 deletions

diff --git a/KeyRing.hs b/KeyRing.hs
index 52635be..58a2d01 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -158,7 +158,7 @@ data InputFile = HomeSec
                | FileDesc Posix.Fd
  deriving (Eq,Ord)
 
-type UsageTag = String
+-- type UsageTag = String
 type Initializer = String
 type PassWordFile = InputFile
 
@@ -167,7 +167,7 @@ type PassWordFile = InputFile
 -- the KF_Match fill/spill KeyFilter styles.  The parameter
 -- to KeyRingFile will be subsumbed by kPassphrases
 data FileType = KeyRingFile (Maybe PassWordFile)
-              | PEMFile UsageTag
+              | PEMFile
               | WalletFile -- (Maybe UsageTag)
               | Hosts
 
@@ -242,7 +242,6 @@ noManip _ _ = []
 
 data KeyRingOperation = KeyRingOperation
     { kFiles :: Map.Map InputFile StreamInfo
-    , kImports :: Map.Map InputFile (KeyRingRuntime -> KeyData -> Maybe Bool)
     , kManip :: KeyRingRuntime -> KeyData -> [PacketUpdate]--[KeyRingAddress PacketUpdate]
     , homeSpec :: Maybe String
     }