From 23ae3589be6273b9fe7b0925a2b290e0e48f38d6 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Tue, 2 Jul 2019 23:56:37 -0400 Subject: Todo stub and help for new command "spawn". --- lib/Kiki.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib') diff --git a/lib/Kiki.hs b/lib/Kiki.hs index 6481b58..5201dac 100644 --- a/lib/Kiki.hs +++ b/lib/Kiki.hs @@ -148,6 +148,10 @@ outputReport report = do forM_ report $ \(fname,act) -> do putStrLn $ fname ++ ": " ++ reportString act +spawn :: CommonArgsParsed -> SymmetricAlgorithm -> FilePath -> IO () +spawn cmn cipher path = do + putStrLn "TODO: implement keygen.sh replacement.sh" + importAndRefresh :: (FilePath -> FilePath) -> CommonArgsParsed -> SymmetricAlgorithm -> IO () importAndRefresh root cmn cipher = do let rootdir = do guard (root "x" /= "x") -- cgit v1.2.3