Haddock edits and removed some exports related to the now-removed

kImports interface.

1 files changed, 0 insertions, 8 deletions

diff --git a/kiki.hs b/kiki.hs
index 5ad012a..19d8beb 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -739,14 +739,6 @@ sync bExport bImport bSecret cmdarg args_raw = do
                     keyrings_
         hosts = maybe [] (map decorate) $ Map.lookup "--hosts" margs
                     where decorate fname = (ArgFile fname, buildStreamInfo reftyp Hosts)
-        importStyle = maybe (\_ _ -> subkeysOnly)
-                            (\f rt kd -> f rt kd >> importPublic)
-                        $ mplus import_f importifauth_f
-            where
-                import_f = do Map.lookup "--import" margs
-                              return $ \rt kd -> Just ()
-                importifauth_f = do Map.lookup "--import-if-authentic" margs
-                                    return guardAuthentic
         pubfill = maybe KF_Subkeys id
                         $ mplus import_f importifauth_f
             where