diff options
| author | Andrew Cady <d@jerkface.net> | 2019-07-03 18:51:13 -0400 |
|---|---|---|
| committer | Andrew Cady <d@jerkface.net> | 2019-07-04 09:31:49 -0400 |
| commit | f43b5352a547a7a8b8c4641db1e1e4b545531c0a (patch) | |
| tree | c9c981adc55a24e6eeb725ec5b7b1e8604fc8061 /kiki.hs | |
| parent | 2899baa5ea5ffeb05c06990a8fd3762a1693b221 (diff) | |
use a type
Diffstat (limited to 'kiki.hs')
| -rw-r--r-- | kiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
| @@ -359,7 +359,7 @@ show_cert keyspec wkgrip db = do | |||
| 359 | #elif defined(VERSION_dataenc) | 359 | #elif defined(VERSION_dataenc) |
| 360 | qqs = map (Base64.encode . L.unpack) ds | 360 | qqs = map (Base64.encode . L.unpack) ds |
| 361 | #endif | 361 | #endif |
| 362 | pems = map (writePEM "CERTIFICATE") qqs | 362 | pems = map (writePEM PemCertificate) qqs |
| 363 | forM_ pems putStrLn | 363 | forM_ pems putStrLn |
| 364 | _ -> void $ warn (keyspec ++ ": ambiguous") | 364 | _ -> void $ warn (keyspec ++ ": ambiguous") |
| 365 | 365 | ||