nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: Whitespace changes 

* gnu/services/kerberos.scm: Fold lines to 80 character limit.
This commit is contained in:
John Darrington 2016-11-24 08:15:55 +01:00
parent 75675e4556
commit fc5dc4e81c
No known key found for this signature in database
GPG Key ID: 8A67719C2DE827B3
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gnu/services/kerberos.scm
View File

@ -38,15 +38,17 @@
"Return a PAM service for Kerberos authentication." "Return a PAM service for Kerberos authentication."
(lambda (pam) (lambda (pam)
(define pam-krb5-module (define pam-krb5-module
#~(string-append #$(pam-krb5-configuration-pam-krb5 config) "/lib/security/pam_krb5.so")) #~(string-append #$(pam-krb5-configuration-pam-krb5 config)
"/lib/security/pam_krb5.so"))
(let ((pam-krb5-sufficient (let ((pam-krb5-sufficient
(pam-entry (pam-entry
(control "sufficient") (control "sufficient")
(module pam-krb5-module) (module pam-krb5-module)
(arguments (list (arguments
(format #f "minimum_uid=~a" (list
(pam-krb5-configuration-minimum-uid config))))))) (format #f "minimum_uid=~a"
(pam-krb5-configuration-minimum-uid config)))))))
(pam-service (pam-service
(inherit pam) (inherit pam)
(auth (cons* pam-krb5-sufficient (auth (cons* pam-krb5-sufficient