Re: [PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-09 Thread Ludovic Courtès
Hi, Vincent Legoll skribis: >> +(define (ntp-service-activation config) >> + "Return the activation gexp for config" >> + #~(begin >> + (use-modules (guix build utils)) >> + >> + (define %user >> +(getpw "ntpd")) >> + >> + (let ((directory "/var/run/ntpd")) >> +

Re: [PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-08 Thread John Darrington
On Thu, Sep 08, 2016 at 08:57:57AM +0200, Vincent Legoll wrote: Hello, > +(define (ntp-service-activation config) > + "Return the activation gexp for config" > + #~(begin > + (use-modules (guix build utils)) > + > + (define %user > +

Re: [PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-08 Thread Vincent Legoll
> I think you need to look a little harder, because the answer to both your > (very valid) questions is : I copied it from other, existing examples. Ah, couldn't have seen it, I only read the patch, not the entire file... You copied it from : tor-hidden-service-activation ? So, can an old-scheme

Re: [PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-08 Thread Vincent Legoll
Hello, > +(define (ntp-service-activation config) > + "Return the activation gexp for config" > + #~(begin > + (use-modules (guix build utils)) > + > + (define %user > +(getpw "ntpd")) > + > + (let ((directory "/var/run/ntpd")) > + (mkdir-p directory) > +

Re: [PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-07 Thread Ludovic Courtès
John Darrington skribis: > Fixes bug #24366 Rather: Fixes . (See ‘git log’ for examples.) > > > > * gnu/services/networking.scm (ntp-shepherd-service): Create new > directory at startup. Please mention the new variables and changes. > +(define (ntp-service-activ

[PATCH] gnu: Use a directory owned by ntpd user for drift file.

2016-09-07 Thread John Darrington
Fixes bug #24366 * gnu/services/networking.scm (ntp-shepherd-service): Create new directory at startup. --- gnu/services/networking.scm | 20 ++-- 1 file changed, 18 insertions(+), 2 deletions(-) diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm index 71f4