Skip to content
Closed
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion bin/worker.ml
Original file line number Diff line number Diff line change
Expand Up @@ -129,7 +129,7 @@ module Obuilder_config = struct
| None -> None
| Some store -> Some (Cluster_worker.Obuilder_config.v sandbox_config store)
in
Term.(const make $ Obuilder.Runc_sandbox.cmdliner $ store)
Term.(const make $ Obuilder.Sandbox.cmdliner $ store)
end

let worker_opts_t =
Expand Down
2 changes: 1 addition & 1 deletion worker/cluster_worker.mli
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ type job_spec = [
module Obuilder_config : sig
type t

val v : Obuilder.Runc_sandbox.config -> [ `Btrfs of string | `Rsync of string | `Zfs of string ] -> t
val v : Obuilder.Sandbox.config -> [ `Btrfs of string | `Rsync of string | `Zfs of string ] -> t
end

type build =
Expand Down
4 changes: 2 additions & 2 deletions worker/obuilder_build.ml
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ type builder = Builder : (module Obuilder.BUILDER with type t = 'a) * 'a -> buil
module Config = struct
type t = {
store_spec : [ `Btrfs of string | `Rsync of string | `Zfs of string ];
sandbox_config : Obuilder.Runc_sandbox.config;
sandbox_config : Obuilder.Sandbox.config;
}

let v sandbox_config store_spec = { store_spec; sandbox_config }
Expand All @@ -21,7 +21,7 @@ type t = {
prune_threshold : float option;
}

module Sandbox = Obuilder.Runc_sandbox
module Sandbox = Obuilder.Sandbox
module Fetcher = Obuilder.Docker

let ( / ) = Filename.concat
Expand Down
2 changes: 1 addition & 1 deletion worker/obuilder_build.mli
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ type t
module Config : sig
type t

val v : Obuilder.Runc_sandbox.config -> [ `Btrfs of string | `Rsync of string | `Zfs of string ] -> t
val v : Obuilder.Sandbox.config -> [ `Btrfs of string | `Rsync of string | `Zfs of string ] -> t
end

val create : ?prune_threshold:float -> Config.t -> t Lwt.t
Expand Down