From 685cb594a19b0396367c5d5f0b6e0cba69eecd6e Mon Sep 17 00:00:00 2001 From: joe Date: Tue, 26 Apr 2016 02:25:14 -0400 Subject: remove debug prints --- lib/Kiki.hs | 5 ----- 1 file changed, 5 deletions(-) (limited to 'lib/Kiki.hs') diff --git a/lib/Kiki.hs b/lib/Kiki.hs index 1682811..0684830 100644 --- a/lib/Kiki.hs +++ b/lib/Kiki.hs @@ -102,11 +102,6 @@ importAndRefresh root cmn = do -- ssl = Just "mkdir -p \"$(dirname $file)\" && openssl genrsa -out $file 1024" (home,secring,pubring,mbwk) <- unconditionally $ getHomeDir homespec osHomeDir <- if bUnprivileged then getHomeDirectory else return "/root" - putStrLn $ "gnupg home = " ++ show (home,secring,pubring,mbwk) - putStrLn $ "os home = " ++ show osHomeDir - -- gnupg home = ("TESTS/tmpgh","TESTS/tmpgh/secring.gpg","TESTS/tmpgh/pubring.gpg",Nothing) - -- os home = "/root" - -- Generate secring.gpg if it does not exist... gotsec <- doesFileExist secring -- cgit v1.2.3