src/pg.ml

@@ -97,12 +97,11 @@ let activate_signing_key =
   in
   fun (module Conn : CONN) exchange_signkey ->
     let Signkey.
-          { pub; stamp_start; stamp_expire; stamp_end; master_sig= _; sign= _ }
-        =
+          { pub; stamp_start; stamp_expire; stamp_end; master_sig; sign= _ } =
       exchange_signkey
     in
-    (*let master_sig = master_sig |> Option.get in*)
-    let master_sig = EddsaSignature.of_octets (String.make 64 'x') in
+    (* TODO master_sig *)
+    let master_sig = master_sig |> Option.get in
     Conn.exec insert_signkey
       (pub, stamp_start, stamp_expire, stamp_end, master_sig)
 
@@ -151,6 +150,7 @@ let add_denomination_key =
           } =
       denom
     in
+    (* TODO master_sig *)
     let master_sig = master_sig |> Option.get in
     Conn.exec denomination_insert
       ( h_pub,

src/signkey.ml

@@ -1,5 +1,7 @@
 open Crypto
 
+(* TODO master_sig
+   not sur how to handle master_sig initialization *)
 type t = {
   pub: EddsaPublicKey.t;
   stamp_start: Ptime.t;