me/guix
Archived
1
0
Fork 0
Code Activity

gnu: dovecot: Indent arguments.

Browse source 
* gnu/packages/mail.scm (dovecot)[arguments]: C-M-q and tuck left.
This commit is contained in:
Tobias Geerinckx-Rice 2019-03-08 01:11:45 +01:00
parent 7969751f54
commit f762e49f28
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 23 additions and 26 deletions

49
gnu/packages/mail.scm
View file

@ -1303,32 +1303,29 @@ facilities for checking incoming mail.")
(arguments (arguments
`(#:configure-flags '("--sysconfdir=/etc" `(#:configure-flags '("--sysconfdir=/etc"
"--localstatedir=/var") "--localstatedir=/var")
#:phases (modify-phases %standard-phases #:phases
(add-before (modify-phases %standard-phases
'configure 'pre-configure (add-before 'configure 'pre-configure
(lambda _ (lambda _
;; Simple hack to avoid installing in /etc. ;; Simple hack to avoid installing in /etc.
(substitute* '("doc/Makefile.in" (substitute* '("doc/Makefile.in"
"doc/example-config/Makefile.in") "doc/example-config/Makefile.in")
(("pkgsysconfdir = .*") (("pkgsysconfdir = .*")
"pkgsysconfdir = /tmp/etc")) "pkgsysconfdir = /tmp/etc"))
#t)) #t))
(add-after (add-after 'unpack 'patch-file-names
'unpack 'patch-file-names (lambda _
(lambda _ (substitute* "src/lib-program-client/test-program-client-local.c"
(substitute* (("(/bin/| )cat") (which "cat"))
"src/lib-program-client/test-program-client-local.c" (("/bin/echo") (which "echo"))
(("(/bin/| )cat") (which "cat")) (("/bin/false") (which "false"))
(("/bin/echo") (which "echo")) (("/bin/sh") (which "bash"))
(("/bin/false") (which "false")) (("head") (which "head"))
(("/bin/sh") (which "bash")) (("sleep") (which "sleep")))
(("head") (which "head")) (substitute* (list "src/lib-smtp/test-bin/sendmail-exit-1.sh"
(("sleep") (which "sleep"))) "src/lib-smtp/test-bin/sendmail-success.sh")
(substitute* (("cat") (which "cat")))
(list "src/lib-smtp/test-bin/sendmail-exit-1.sh" #t)))))
"src/lib-smtp/test-bin/sendmail-success.sh")
(("cat") (which "cat")))
#t)))))
(home-page "https://www.dovecot.org") (home-page "https://www.dovecot.org")
(synopsis "Secure POP3/IMAP server") (synopsis "Secure POP3/IMAP server")
(description (description