03/06: services: dovecot: 'stop' method returns #f upon success.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit b25ecfa2e0ab6642dc35f7f68a24117e33f5795f
Author: Ludovic Courtès <address@hidden>
AuthorDate: Mon Apr 20 22:30:09 2020 +0200

    services: dovecot: 'stop' method returns #f upon success.
    
    * gnu/services/mail.scm (dovecot-shepherd-service)[stop]: Use 'invoke'
    instead of 'make-forkexec-constructor'.  Previously, the 'stop' method
    would return the PID of the "dovecot stop" process, which would be
    interpreted as a failure to stop the service.
---
 gnu/services/mail.scm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm
index 7791780..cfcaf46 100644
--- a/gnu/services/mail.scm
+++ b/gnu/services/mail.scm
@@ -1544,9 +1544,10 @@ greyed out, instead of only later giving \"not 
selectable\" popup error.
            (start #~(make-forkexec-constructor
                      (list (string-append #$dovecot "/sbin/dovecot")
                            "-F")))
-           (stop #~(make-forkexec-constructor
-                    (list (string-append #$dovecot "/sbin/dovecot")
-                          "stop")))))))
+           (stop #~(lambda _
+                     (invoke #$(file-append dovecot "/sbin/dovecot")
+                             "stop")
+                     #f))))))
 
 (define %dovecot-pam-services
   (list (unix-pam-service "dovecot")))