Shell: fix test network creation
This commit is contained in:
parent
a0a2d6b004
commit
ccad901f33
@ -885,7 +885,10 @@ end
|
|||||||
let may_create_chain state chain genesis =
|
let may_create_chain state chain genesis =
|
||||||
Chain.get state chain >>= function
|
Chain.get state chain >>= function
|
||||||
| Ok chain -> Lwt.return chain
|
| Ok chain -> Lwt.return chain
|
||||||
| Error _ -> Chain.create state genesis
|
| Error _ ->
|
||||||
|
Chain.create
|
||||||
|
~allow_forked_chain:true
|
||||||
|
state genesis
|
||||||
|
|
||||||
let read
|
let read
|
||||||
?patch_context
|
?patch_context
|
||||||
|
Loading…
Reference in New Issue
Block a user