[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: services: opensmtpd: Extend the PAM service.
From: |
guix-commits |
Subject: |
01/01: services: opensmtpd: Extend the PAM service. |
Date: |
Thu, 20 Jun 2019 09:55:01 -0400 (EDT) |
nckx pushed a commit to branch master
in repository guix.
commit ace8e269a40b31a9c6f413c0674529880da6a48e
Author: Kristofer Buffington <address@hidden>
Date: Wed Jun 12 16:34:30 2019 -0400
services: opensmtpd: Extend the PAM service.
* gnu/services/mail.scm (%opensmtpd-pam-services): New variable.
(opensmtpd-service-type)[extensions]: Add it, extending
PAM-ROOT-SERVICE-TYPE.
Signed-off-by: Tobias Geerinckx-Rice <address@hidden>
---
gnu/services/mail.scm | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm
index 0e85ada..3de0b4c 100644
--- a/gnu/services/mail.scm
+++ b/gnu/services/mail.scm
@@ -3,6 +3,7 @@
;;; Copyright © 2017, 2018 Clément Lassieur <address@hidden>
;;; Copyright © 2017 Carlo Zancanaro <address@hidden>
;;; Copyright © 2017 Tobias Geerinckx-Rice <address@hidden>
+;;; Copyright © 2019 Kristofer Buffington <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -1667,6 +1668,9 @@ accept from local for any relay
(mkdir-p "/var/spool/smtpd")
(chmod "/var/spool/smtpd" #o711))))))
+(define %opensmtpd-pam-services
+ (list (unix-pam-service "smtpd")))
+
(define opensmtpd-service-type
(service-type
(name 'opensmtpd)
@@ -1675,6 +1679,8 @@ accept from local for any relay
(const %opensmtpd-accounts))
(service-extension activation-service-type
opensmtpd-activation)
+ (service-extension pam-root-service-type
+ (const %opensmtpd-pam-services))
(service-extension profile-service-type
(compose list opensmtpd-configuration-package))
(service-extension shepherd-root-service-type