jon.recoil.org / merlin-js
this repo has no description
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Merge pull request #6 from jonludlam/fix-static-example

Fix generation of static cmis to match protocol

authored by

Ulysse and committed by
GitHub dae7fe35 f15bd021

+2 -2
+1 -1
example/dynamic.ml
··· 16 16 "Unix"; 17 17 "UnixLabels"; 18 18 ] in 19 - let dcs_url = "/stdlib/" in 19 + let dcs_url = "stdlib/" in 20 20 let dcs_file_prefixes = ["stdlib__"] in 21 21 { Protocol.static_cmis = []; 22 22 dynamic_cmis = Some {
+1 -1
src/worker/static/gen_static.ml
··· 19 19 let dir = Unix.opendir stdlib in 20 20 iter_cmi ~f:(fun file -> 21 21 let fullpath = Filename.concat stdlib file in 22 - let module_name = Filename.basename file |> String.capitalize_ascii in 22 + let module_name = Filename.basename file |> String.capitalize_ascii |> Filename.remove_extension in 23 23 Printf.fprintf out "{sc_name=%S; sc_content=[%%blob %S]};" module_name fullpath) dir; 24 24 Printf.fprintf out "]\n"; 25 25