diff --git a/gnu/services.scm b/gnu/services.scm index 6bb21722b69328db3e35e13be739d87ac44056f9..37ecc019ec43012a33ee9e81518cad31b28c128d 100644 --- a/gnu/services.scm +++ b/gnu/services.scm @@ -17,6 +17,7 @@ ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. (define-module (gnu services) + #:use-module (guix gexp) #:use-module (guix records) #:export (service? service @@ -47,9 +48,9 @@ (define-record-type* <service> (default '())) (respawn? service-respawn? ; Boolean (default #t)) - (start service-start) ; g-expression - (stop service-stop ; g-expression - (default #f)) + (start service-start) ; g-expression (procedure) + (stop service-stop ; g-expression (procedure) + (default #~(const #f))) (user-accounts service-user-accounts ; list of <user-account> (default '())) (user-groups service-user-groups ; list of <user-groups>