diff options
author | joe <joe@jerkface.net> | 2014-05-11 19:55:50 -0400 |
---|---|---|
committer | joe <joe@jerkface.net> | 2014-05-11 19:55:50 -0400 |
commit | a08ae6b0bf2818233fca35ce19fb7a5260f8023a (patch) | |
tree | 8b4d17ecc92396c1ae68644db8e1d3c76711ee84 | |
parent | adec571e0f7e7474575303905f109d4348573a00 (diff) |
removed debug print
-rw-r--r-- | kiki.hs | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -345,7 +345,6 @@ show_torhash pubkey _ = do | |||
345 | 345 | ||
346 | show_cert keyspec wkgrip db = do | 346 | show_cert keyspec wkgrip db = do |
347 | let s = parseSpec wkgrip keyspec | 347 | let s = parseSpec wkgrip keyspec |
348 | putStrLn $ "parsed spec: "++show s | ||
349 | case selectPublicKeyAndSigs s db of | 348 | case selectPublicKeyAndSigs s db of |
350 | [] -> void $ warn (keyspec ++ ": not found") | 349 | [] -> void $ warn (keyspec ++ ": not found") |
351 | [(k,sigs)] -> do | 350 | [(k,sigs)] -> do |