01/10: services: hpcguix-web: Explicitly import (guix build utils).

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 1ce0d7e190784c709abf3346d8d94e7e143569dc
Author: Ludovic Courtès <address@hidden>
Date:   Sat Nov 9 11:33:12 2019 +0100

    services: hpcguix-web: Explicitly import (guix build utils).
    
    * gnu/services/web.scm (%hpcguix-web-activation): Add explicit
    'with-imported-modules'.
---
 gnu/services/web.scm | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/gnu/services/web.scm b/gnu/services/web.scm
index f13e864..d0c9d0d 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 <address@hidden>
-;;; Copyright © 2015, 2016, 2017, 2018 Ludovic Courtès <address@hidden>
+;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2016 ng0 <address@hidden>
 ;;; Copyright © 2016, 2017, 2018 Julien Lepiller <address@hidden>
 ;;; Copyright © 2017 Christopher Baines <address@hidden>
@@ -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")