File tree Expand file tree Collapse file tree 3 files changed +14
-1
lines changed
Expand file tree Collapse file tree 3 files changed +14
-1
lines changed Original file line number Diff line number Diff line change 1- ### Next
1+ ### v2.2.0 2025-03-22 Brussels (Belgium)
22
33- Some minor fixes (by [ xvw] ( https://xvw.lol ) )
44- Update to git-kv 1.0.2 and work around last modified behavior inside a ` Git_kv.change_and_push ` call (by [ reynir] ( https://reyn.ir ) )
5+ - Update ` git ` dependencies (by [ xvw] ( https://xvw.lol ) )
6+ - Fix ` Nel ` representation (by [ xvw] ( https://xvw.lol ) )
7+ - Restore DOC-ci (by [ xvw] ( https://xvw.lol ) )
8+ - Add more helpers for dealing with dynamic dependencies (by [ xvw] ( https://xvw.lol ) )
59
610
711### v2.1.0 2024-12-14 Nantes (France)
Original file line number Diff line number Diff line change 211211module Dynamic = struct
212212 let on_content arr = first (Static. on_content arr)
213213 let on_metadata arr = first (Static. on_metadata arr)
214+ let on_static arr = first arr
214215 let on_dependencies arr = second arr
215216 let keep_content () = lift (fun ((_ , c ), d ) -> (c, d))
216217 let empty_body () = lift (fun (x , d ) -> ((x, " " ), d))
Original file line number Diff line number Diff line change @@ -388,6 +388,14 @@ module Dynamic : sig
388388 (* * [on_metadata arr] lift an arrow to deal only with the associated metadata
389389 of a task. *)
390390
391+ val on_static :
392+ ('meta_in * 'content_in , 'meta_out * 'content_out ) t
393+ -> ( ('meta_in * 'content_in ) * Deps .t
394+ , ('meta_out * 'content_out ) * Deps .t )
395+ t
396+ (* * [on_static arr] lift an arrow to deal only with the static part (the
397+ couple [meta/content]). *)
398+
391399 val on_dependencies :
392400 (Deps .t , Deps .t ) t
393401 -> (('meta * 'content ) * Deps .t , ('meta * 'content ) * Deps .t ) t
You can’t perform that action at this time.
0 commit comments