Client: remove trace of the web client.
This commit is contained in:
parent
b4573fb323
commit
450d0dba4e
@ -11,15 +11,9 @@ type ('a, 'b) lwt_format =
|
|||||||
('a, Format.formatter, unit, 'b Lwt.t) format4
|
('a, Format.formatter, unit, 'b Lwt.t) format4
|
||||||
|
|
||||||
type cfg = {
|
type cfg = {
|
||||||
|
|
||||||
(* webclient options *)
|
|
||||||
web_port : int ;
|
|
||||||
|
|
||||||
(* misc options *)
|
|
||||||
base_dir : string ;
|
base_dir : string ;
|
||||||
force : bool ;
|
force : bool ;
|
||||||
block : Node_rpc_services.Blocks.block ;
|
block : Node_rpc_services.Blocks.block ;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
type context = {
|
type context = {
|
||||||
@ -42,8 +36,6 @@ let default_cfg_of_base_dir base_dir = {
|
|||||||
base_dir ;
|
base_dir ;
|
||||||
force = false ;
|
force = false ;
|
||||||
block = `Prevalidation ;
|
block = `Prevalidation ;
|
||||||
|
|
||||||
web_port = 8080 ;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
let home =
|
let home =
|
||||||
|
@ -11,15 +11,9 @@ type ('a, 'b) lwt_format =
|
|||||||
('a, Format.formatter, unit, 'b Lwt.t) format4
|
('a, Format.formatter, unit, 'b Lwt.t) format4
|
||||||
|
|
||||||
type cfg = {
|
type cfg = {
|
||||||
|
|
||||||
(* webclient options *)
|
|
||||||
web_port : int ;
|
|
||||||
|
|
||||||
(* misc options *)
|
|
||||||
base_dir : string ;
|
base_dir : string ;
|
||||||
force : bool ;
|
force : bool ;
|
||||||
block : Node_rpc_services.Blocks.block ;
|
block : Node_rpc_services.Blocks.block ;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
type context = {
|
type context = {
|
||||||
|
@ -91,7 +91,6 @@ let main () =
|
|||||||
base_dir = parsed_config_file.base_dir ;
|
base_dir = parsed_config_file.base_dir ;
|
||||||
force = parsed_args.force ;
|
force = parsed_args.force ;
|
||||||
block = parsed_args.block ;
|
block = parsed_args.block ;
|
||||||
web_port = Client_commands.default_cfg.web_port ;
|
|
||||||
} in
|
} in
|
||||||
let rpc_config =
|
let rpc_config =
|
||||||
if parsed_args.print_timings then
|
if parsed_args.print_timings then
|
||||||
|
Loading…
Reference in New Issue
Block a user