Hello! Jan Nieuwenhuizen <jann...@gnu.org> skribis:
> From 192c442b597e9e54bc7ab787f680861f919b37e1 Mon Sep 17 00:00:00 2001 > From: Jan Nieuwenhuizen <jann...@gnu.org> > Date: Sat, 18 Jun 2016 22:37:48 +0200 > Subject: [PATCH] admin: rottlog: daily > > --- > gnu/packages/admin.scm | 20 +++++++++++++++----- > 1 file changed, 15 insertions(+), 5 deletions(-) > > diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm > index 415a35a..e10483e 100644 > --- a/gnu/packages/admin.scm > +++ b/gnu/packages/admin.scm > @@ -769,11 +769,21 @@ over ssh connections.") > (assoc-ref %outputs "out") > "/etc") > "--localstatedir=/var") > - #:phases (alist-cons-after > - 'install 'install-info > - (lambda _ > - (zero? (system* "make" "install-info"))) > - %standard-phases))) > + #:phases (modify-phases %standard-phases > + (add-after 'build 'set-packdir > + (lambda _ > + (substitute* "rc/rc" > + (("packdir=\"\"") > + "packdir=\"/var/log\"")))) > + (add-after 'install 'install-daily > + (lambda* (#:key outputs #:allow-other-keys) > + (let ((out (assoc-ref outputs "out"))) > + (zero? (system* "mv" > + (string-append out "/etc/weekly") > + (string-append out "/etc/daily")))))) > + (add-after 'install 'install-info > + (lambda _ > + (zero? (system* "make" "install-info"))))))) On closer inspection, it seems to me we should be using --sysconfdir=/etc, but still provide the example config files in OUT/etc. WDYT? Thanks, Ludo’.