Minor cleanup, comments.

1 files changed, 0 insertions, 8 deletions

diff --git a/kiki.hs b/kiki.hs
index 4126a93..6a62312 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -1020,14 +1020,6 @@ parseKeySpecs = map $ \specfile -> do
     let cmd = (drop 1 . reverse . drop 1) bdmcb
     Just (spec,file,cmd)
 
-buildStreamInfo :: KeyFilter -> FileType -> StreamInfo
-buildStreamInfo rtyp ftyp = StreamInfo { typ = ftyp
-                                       , fill = rtyp
-                                       , spill = KF_All
-                                       , access = AutoAccess
-                                       , initializer =NoCreate
-                                       , transforms = [] }
-
 data Export = Export | NoExport deriving Eq
 data Import = Import | NoImport deriving Eq
 data Secret = Secret | NoSecret deriving Eq