style: remove commented code from (radix services admin)
parent
94e87a5602
commit
7654ce25ed
|
@ -82,12 +82,7 @@
|
|||
(plain-file "doas.conf"
|
||||
(apply string-append
|
||||
(map (lambda (statement)
|
||||
(match-record
|
||||
statement <permit-statement>
|
||||
#;(cond ((permit-statement? statement) <permit-statement>)
|
||||
((deny-statement? statement) <deny-statement>)
|
||||
(else (error "Invalid statement in configuration"
|
||||
statement)))
|
||||
(match-record statement <permit-statement>
|
||||
(identity as-user command args setenv
|
||||
keepenv? nopass? nolog? persist?)
|
||||
((@@ (ice-9 format) format) #f
|
||||
|
@ -96,7 +91,7 @@
|
|||
~:[~;nopass ~]~
|
||||
~:[~;nolog ~]~
|
||||
~:[~;persist ~]~
|
||||
~@[setenv { ~{ ~a ~} } ~]~
|
||||
~@[setenv {~{ ~a~} } ~]~
|
||||
~a~@[ as ~a~]~
|
||||
~@[ cmd ~a~]~
|
||||
~@[ args~{ ~a~}~]~%"
|
||||
|
|
Loading…
Reference in New Issue