refactor: remove pointless module alias (#8097)

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
ocaml · Jul 3, 2023 · 56623a3 · 56623a3
1 parent 2c8c7a4
commit 56623a3
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/src/dune_rules/pkg_rules.ml b/src/dune_rules/pkg_rules.ml
@@ -30,8 +30,6 @@ let sys_poll =
       let+ os_family = sys_poll_memo Sys_poll.os_family in
       { os_version; os_distribution; os_family })
 
-module Source = Dune_pkg.Lock_dir.Source
-
 module Variable = struct
   type value = OpamVariable.variable_contents =
     | B of bool
@@ -1214,7 +1212,7 @@ let gen_rules context_name (pkg : Pkg.t) =
     List.map pkg.info.extra_sources ~f:(fun (local, fetch) ->
         let extra_source = Paths.extra_source pkg.paths local in
         let rule =
-          match (fetch : Source.t) with
+          match (fetch : Lock_dir.Source.t) with
           | External_copy (loc, src) ->
             ( loc
             , Action_builder.copy ~src:(Path.external_ src) ~dst:extra_source )