mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 13:58:15 -05:00
gnu: opensmtpd: Clarify phase name.
* gnu/packages/mail.scm (opensmtpd)[arguments]: Rename ‘install-compatibilitymode’ to ‘install-compatibility-links’ and avoid needless abbrevs while at it.
This commit is contained in:
parent
19fed04915
commit
a1eabab1a3
1 changed files with 5 additions and 5 deletions
|
@ -2030,12 +2030,12 @@ (define-public opensmtpd
|
|||
;; historical interfaces such as sendmail, newaliases or makemap, the
|
||||
;; smtpctl utility can operate in compatibility mode if called with the
|
||||
;; historical name.
|
||||
(add-after 'install 'install-compabilitymode
|
||||
(lambda _
|
||||
(let* ((out (assoc-ref %outputs "out"))
|
||||
(add-after 'install 'install-compability-links
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(sbin (string-append out "/sbin/")))
|
||||
(for-each (lambda (cmd)
|
||||
(symlink "smtpctl" (string-append sbin cmd)))
|
||||
(for-each (lambda (command)
|
||||
(symlink "smtpctl" (string-append sbin command)))
|
||||
'("makemap" "sendmail" "send-mail"
|
||||
"newaliases" "mailq")))
|
||||
#t)))))
|
||||
|
|
Loading…
Reference in a new issue