diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-06-08 09:54:30 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2018-06-08 16:00:17 +0200 |
| commit | a1eabab1a3863a5e8e76d59cba451fa4f491726f (patch) | |
| tree | 0ee6a001395b223f46e7544805e24d413855352f | |
| parent | 19fed0491502bcd64cd51666449a4a384f42fef9 (diff) | |
| download | guix-a1eabab1a3863a5e8e76d59cba451fa4f491726f.tar.gz | |
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.
| -rw-r--r-- | gnu/packages/mail.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm index d04fc518c8..0effaa16a2 100644 --- a/gnu/packages/mail.scm +++ b/gnu/packages/mail.scm @@ -2030,12 +2030,12 @@ transfer protocols.") ;; 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))))) |