Skip to content

Commit 39ac111

Browse files
authored
Merge pull request #65 from xhtmlboi/pre-release-2-2-0
Pre release 2 2 0
2 parents 6eca8b4 + 2a58b1c commit 39ac111

File tree

3 files changed

+14
-1
lines changed

3 files changed

+14
-1
lines changed

CHANGES.md

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,11 @@
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)

lib/core/task.ml

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -211,6 +211,7 @@ end
211211
module 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))

lib/core/task.mli

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff 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

0 commit comments

Comments
 (0)