diff options
Diffstat (limited to 'lib/Kiki.hs')
-rw-r--r-- | lib/Kiki.hs | 4 |
1 files changed, 4 insertions, 0 deletions
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 | |||
148 | forM_ report $ \(fname,act) -> do | 148 | forM_ report $ \(fname,act) -> do |
149 | putStrLn $ fname ++ ": " ++ reportString act | 149 | putStrLn $ fname ++ ": " ++ reportString act |
150 | 150 | ||
151 | spawn :: CommonArgsParsed -> SymmetricAlgorithm -> FilePath -> IO () | ||
152 | spawn cmn cipher path = do | ||
153 | putStrLn "TODO: implement keygen.sh replacement.sh" | ||
154 | |||
151 | importAndRefresh :: (FilePath -> FilePath) -> CommonArgsParsed -> SymmetricAlgorithm -> IO () | 155 | importAndRefresh :: (FilePath -> FilePath) -> CommonArgsParsed -> SymmetricAlgorithm -> IO () |
152 | importAndRefresh root cmn cipher = do | 156 | importAndRefresh root cmn cipher = do |
153 | let rootdir = do guard (root "x" /= "x") | 157 | let rootdir = do guard (root "x" /= "x") |