02/15: services: nginx: Use nginx-action over inline gexp.

[guix-commits]

cbaines pushed a commit to branch master
in repository guix.

commit 117b0a65c832dcec592a64284910c01f595aa84a
Author: EuAndreh via Guix-patches via <guix-patches@gnu.org>
AuthorDate: Mon Oct 17 17:57:18 2022 -0300

    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>
---
 gnu/services/web.scm | 8 +-------
 1 file changed, 1 insertion(+), 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)