summary refs log tree commit diff
diff options
context:
space:
mode:
authorEuAndreh via Guix-patches via <guix-patches@gnu.org>2022-10-17 17:57:18 -0300
committerChristopher Baines <mail@cbaines.net>2022-10-18 10:48:14 +0100
commit117b0a65c832dcec592a64284910c01f595aa84a (patch)
tree40c5349a00372dd9f7cafbe0ba39ee265fa623e9
parent3c7d4fdc30530f35005d2555a50bbe9fa4b12da7 (diff)
downloadguix-117b0a65c832dcec592a64284910c01f595aa84a.tar.gz
services: nginx: Use nginx-action over inline gexp.
* gnu/services/web.scm (nginx-shepherd-service): Use the simpler
"nginx-action" helper, for the same reload side-effect.

Signed-off-by: Christopher Baines <mail@cbaines.net>
-rw-r--r--gnu/services/web.scm8
1 files changed, 1 insertions, 7 deletions
diff --git a/gnu/services/web.scm b/gnu/services/web.scm
index 227a577de3..7fde8824b3 100644
--- a/gnu/services/web.scm
+++ b/gnu/services/web.scm
@@ -820,13 +820,7 @@ of index files."
                (shepherd-action
                  (name 'reload)
                  (documentation "Reload NGINX configuration file and restart worker processes.")
-                 (procedure
-                   #~(lambda (pid)
-                       (if pid
-                         (begin
-                           (kill pid SIGHUP)
-                           (format #t "Service NGINX (PID ~a) has been reloaded." pid))
-                         (format #t "Service NGINX is not running."))))))))))))
+                 (procedure (nginx-action "-s" "reload"))))))))))
 
 (define nginx-service-type
   (service-type (name 'nginx)