summaryrefslogtreecommitdiff
path: root/src/v1.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/v1.erl')
-rw-r--r--src/v1.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/v1.erl b/src/v1.erl
index 4468f17..e51aacf 100644
--- a/src/v1.erl
+++ b/src/v1.erl
@@ -21,7 +21,7 @@ request(post, "ct/v1/add-chain", Input) ->
Roots = catlfish:known_roots(),
case x509:normalise_chain(Roots, [LeafCert|CertChain]) of
{ok, [Leaf | Chain]} ->
- catlfish:add_chain(Leaf, Chain);
+ success(catlfish:add_chain(Leaf, Chain));
{Err, Msg} ->
html("add-chain: ", [Msg, Err])
end;
@@ -30,7 +30,7 @@ request(post, "ct/v1/add-chain", Input) ->
end;
_ -> html("add-chain: missing input: chain", Input)
end,
- success(R);
+ R;
request(post, "ct/v1/add-pre-chain", _Input) ->
niy();