jetomit/monguix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

services/pam-mkhomedir: modernize

Browse source
This commit is contained in:
Timotej Lazar 2023-05-20 21:18:38 +02:00
parent 0563f84c7b
commit bc4023fcd1
1 changed files with 14 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

24
services/pam-mkhomedir.scm
View file

@ -13,16 +13,20 @@
(arguments pam-mkhomedir-configuration-arguments (default '())))
(define (pam-mkhomedir-pam-service config)
(let ((module #~(string-append #$linux-pam "/lib/security/pam_mkhomedir.so")))
(list (lambda (pam)
(pam-service
(inherit pam)
(session
(cons* (pam-entry
(control "optional")
(module module)
(arguments (pam-mkhomedir-configuration-arguments config)))
(pam-service-session pam))))))))
(list
(pam-extension
(transformer
(lambda (pam)
(define pam-mkhomedir-module
#~(string-append #$linux-pam "/lib/security/pam_mkhomedir.so"))
(pam-service
(inherit pam)
(session
(cons* (pam-entry
(control "optional")
(module pam-mkhomedir-module)
(arguments (pam-mkhomedir-configuration-arguments config)))
(pam-service-session pam)))))))))
(define-public pam-mkhomedir-service-type
(service-type