balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Make register key .. as delegate “idempotent”

Browse Source
This commit is contained in:
Sebastien Mondet 2018-12-14 10:27:08 -05:00
parent 577f26d723
commit 8772b23235
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/proto_alpha/lib_client_commands/client_proto_context_commands.ml
View File

@ -505,8 +505,14 @@ let commands version () =
register_as_delegate cctxt register_as_delegate cctxt
~chain:`Main ~block:cctxt#block ?confirmations:cctxt#confirmations ~chain:`Main ~block:cctxt#block ?confirmations:cctxt#confirmations
~dry_run ~fee_parameter ~dry_run ~fee_parameter
?fee ~manager_sk:src_sk src_pk >>=? fun _res -> ?fee ~manager_sk:src_sk src_pk
>>= function
| Ok _ -> return_unit
| Error (Alpha_environment.Ecoproto_error
Proto_alpha.Proto.Delegate_storage.Active_delegate :: []) ->
cctxt#message "Delegate already activated." >>= fun () ->
return_unit return_unit
| Error el -> Lwt.return (Error el)
end; end;
] @ ] @
(if version = (Some `Mainnet) then [] else [ (if version = (Some `Mainnet) then [] else [