diff options
Diffstat (limited to 'src/v1.erl')
-rw-r--r-- | src/v1.erl | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -25,8 +25,12 @@ Roots = catlfish:known_roots(), case x509:normalise_chain(Roots, [LeafCert|CertChain]) of {ok, [Leaf | Chain]} -> + io:format("[info] adding ~p~n", + [x509:cert_string(LeafCert)]), catlfish:add_chain(Leaf, Chain); {Err, Msg} -> + io:format("[info] rejecting ~p: ~p~n", + [x509:cert_string(LeafCert), Err]), html("add-chain: ", [Msg, Err]) end; Invalid -> |