From 58f296ea4f61b0f3d7cd00f538d23e956f2d1318 Mon Sep 17 00:00:00 2001 From: joe Date: Tue, 29 Apr 2014 01:07:45 -0400 Subject: removed obsolete kImports and UsageTag --- KeyRing.hs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'KeyRing.hs') 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 } -- cgit v1.2.3