CMS

synrc · Jul 2, 2023 · 0132eab · 0132eab
1 parent 56759fb
commit 0132eab
Show file tree

Hide file tree

Showing 10 changed files with 14,922 additions and 7 deletions.
diff --git a/lib/cert.ex b/lib/cert.ex
@@ -55,9 +55,9 @@ defmodule CA.KEP do
   def oid(x,v), do: {x,v}
 
   def flat(code,{k,v},acc) when is_integer(k), do: [flat(code,v,acc)|acc]
-  def flat(code,{k,v},acc), do: [flat(code,k,acc)|acc]
+  def flat(code,{k,_v},acc), do: [flat(code,k,acc)|acc]
   def flat(code,k,acc) when is_list(k), do: [:lists.map(fn x -> flat(code,x,acc) end, k)|acc]
-  def flat(code,k,acc) when is_binary(k), do: [k|acc]
+  def flat(_code,k,acc) when is_binary(k), do: [k|acc]
 
   def parseCert(cert) do
     {:Certificate, a, _, _} = cert