From 5ff889a36afc4929df5876918bb1257ddfb75fee Mon Sep 17 00:00:00 2001
From: Sylvain Ribstein <sylvain.ribstein@nomadic-labs.com>
Date: Thu, 29 Feb 2024 15:44:44 +0100
Subject: [PATCH] client: Public_key.of_source parse uri to return public key

---
 src/lib_client_base/client_keys.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/lib_client_base/client_keys.ml b/src/lib_client_base/client_keys.ml
index 38be6d62cfa7..d55b1809b678 100644
--- a/src/lib_client_base/client_keys.ml
+++ b/src/lib_client_base/client_keys.ml
@@ -811,7 +811,8 @@ module Make (Signature : Signature_S) :
     let of_source s =
       let open Lwt_result_syntax in
       let*? pk_uri = make_pk_uri @@ Uri.of_string s in
-      return (pk_uri, None)
+      let public_key = Signature.Public_key.of_b58check_opt (Uri.path pk_uri) in
+      return (pk_uri, public_key)
 
     let to_source (t, _) = Lwt.return_ok (Uri.to_string t)
 
-- 
GitLab