diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-11-09 11:33:12 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-11-09 23:04:14 +0100 |
| commit | 1ce0d7e190784c709abf3346d8d94e7e143569dc (patch) | |
| tree | 8a3f948235a4e474e3b8a60780802326a6d33b2e | |
| parent | bbfdaaa655e07fc8ed5c708330ccbc2659fa283c (diff) | |
| download | guix-1ce0d7e190784c709abf3346d8d94e7e143569dc.tar.gz | |
services: hpcguix-web: Explicitly import (guix build utils).
* gnu/services/web.scm (%hpcguix-web-activation): Add explicit 'with-imported-modules'.
| -rw-r--r-- | gnu/services/web.scm | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/gnu/services/web.scm b/gnu/services/web.scm index f13e86482f..d0c9d0df2b 100644 --- a/gnu/services/web.scm +++ b/gnu/services/web.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 David Thompson <davet@gnu.org> -;;; Copyright © 2015, 2016, 2017, 2018 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2016 ng0 <ng0@n0.is> ;;; Copyright © 2016, 2017, 2018 Julien Lepiller <julien@lepiller.eu> ;;; Copyright © 2017 Christopher Baines <mail@cbaines.net> @@ -1047,13 +1047,15 @@ a webserver.") (shell (file-append shadow "/sbin/nologin"))))) (define %hpcguix-web-activation - #~(begin - (use-modules (guix build utils)) - (let ((home-dir "/var/cache/guix/web") - (user (getpwnam "hpcguix-web"))) - (mkdir-p home-dir) - (chown home-dir (passwd:uid user) (passwd:gid user)) - (chmod home-dir #o755)))) + (with-imported-modules '((guix build utils)) + #~(begin + (use-modules (guix build utils)) + + (let ((home-dir "/var/cache/guix/web") + (user (getpwnam "hpcguix-web"))) + (mkdir-p home-dir) + (chown home-dir (passwd:uid user) (passwd:gid user)) + (chmod home-dir #o755))))) (define %hpcguix-web-log-file "/var/log/hpcguix-web.log") |