diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-06-08 20:23:08 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-06-12 23:34:14 +0200 |
| commit | 254ea3f945e8bc44f8c3a4159302f24f4fe5f216 (patch) | |
| tree | f99002ca3294b2d1329a887673723a22dbe5caca /gnu/services/admin.scm | |
| parent | 81fa2229ecb80a8ae90c8e24771e1df880e75383 (diff) | |
| download | gnu-guix-254ea3f945e8bc44f8c3a4159302f24f4fe5f216.tar gnu-guix-254ea3f945e8bc44f8c3a4159302f24f4fe5f216.tar.gz | |
services: rottlog: Make extensible.
* gnu/services/admin.scm (rottlog-service-type)[compose, extend]: New
fields.
* doc/guix.texi (Log Rotation): Mention extension.
Diffstat (limited to 'gnu/services/admin.scm')
| -rw-r--r-- | gnu/services/admin.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gnu/services/admin.scm b/gnu/services/admin.scm index 99f3b1da16..b9e3fa70a4 100644 --- a/gnu/services/admin.scm +++ b/gnu/services/admin.scm @@ -164,6 +164,12 @@ for ROTATION." ;; the documentation. (service-extension profile-service-type (compose list rottlog-rottlog)))) + (compose concatenate) + (extend (lambda (config rotations) + (rottlog-configuration + (inherit config) + (rotations (append (rottlog-rotations config) + rotations))))) (default-value (rottlog-configuration)))) ;;; admin.scm ends here |